當前位置:編程學習大全網 - 編程語言 - 在vfp編程中另存為對話框的程序如何寫

在vfp編程中另存為對話框的程序如何寫

PUTFILE([cCustomText] [, cFileName] [, cFileExtensions])

返回值

字符型

參數

cCustomText

指定在“另存為 …”對話框上部顯示的標題。

cFileName

指定在文本框中顯示的默認文件名。

cFileExtensions

指定文件的擴展名。當清除“所有文件”復選框時,在“另存為 …”對話框的可滾動列表中,只顯示具有指定擴展名的文件名。如果輸入的文件名不包含擴展名,cFileExtensions 中的第壹個擴展名會自動加到文件名上。有關 Visual FoxPro 中文件擴展名列表和相應的生成器類型,請參閱 文件擴展名與文件類型。

字符表達式 cFileExtensions 可以是下列某壹形式:

cFileExtensions 可以包含單個的擴展名(例如 PRG),只有帶這個擴展名的文件名才被顯示。

cFileExtensions 可以包含用分號分隔的文件擴展名列表。例如,如果包含 PRG;FXP,Visual FoxPro 將顯示所有帶 PRG 和 FXP 擴展名的文件名。

如果文件名具有相同的基本名,但擴展名不同(例如,CUSTOMER.PRG 和 CUSTOMER.FXP),Visual FoxPro 所顯示的文件是其擴展名在 cFileExtension 中位置靠前的文件。

cFileExtensions 可包含用豎線分隔的文件擴展名列表,例如 PRG|FXP。在這種情況下,即使文件有相同的基本名,Visual FoxPro 也把所有具有指定擴展名的文件名顯示出來。

如果 cFileExtensions 只包含壹個分號 (;),Visual FoxPro 顯示所有不帶擴展名的文件名。

如果 cFileExtensions 是個空字符串,Visual FoxPro 顯示當前目錄中的所有文件名。

如果 cFileExtensions 包含 MS-DOS 通配符,例如問號 (?) 和星號 (*),Visual FoxPro 顯示所有擴展名符合通配符條件的文件名。例如,如果 cFileExtensions 包含 ?X?,擴展名為 .FXP,.EXE,.TXT 等等的文件都會顯示。

備註

可以使用 PUTFILE( ) 選擇現有的文件名或指定新文件名,PUTFILE( ) 返回壹個文件名及其路徑。如果不輸入文件名,PUTFILE( ) 返回默認的文件名 (由 cFileName 指定) 和擴展名 (由 cFileExtensions 指定);如果選定“取消”或按 ESC 鍵,PUTFILE( ) 返回壹個空字符串。可以使用 PUTFILE( ) 返回的文件名命名壹個文件並把它保存到磁盤上。

示例

下面的例子從任意用戶選中的已存儲表中創建壹個分隔數據文件。getfile( ) 用來查找並打開壹個表,putfile( ) 用來返回目標文件名。

gcTableName = GETFILE('DBF', 'Open Table:')

USE (gcTableName)

gcDelimName = ALIAS() + '.DLM'

gcDelimFile = PUTFILE('Delimited file:', gcDelimName, 'DLM')

IF EMPTY(gcDelimFile) && Esc pressed

Cancel

ENDIF

COPY TO (gcDelimFile) DELIMITED && Create delimited file

MODIFY FILE (gcDelimFile) NOEDIT

  • 上一篇:設置顯示器刷新率的技巧
  • 下一篇:求高人指點下RSC-164芯片
  • copyright 2024編程學習大全網