回复 楼主 zzgzjsj
不太明白你的诉求,如果仅仅是显示打开文件选择窗口,使用内置的 GETFILE() 函数,显示文件打开标准对话框即可:
LOCAL Get_FileName
Get_FileName = GETFILE("DBF;SCX;PRG;TXT", "选择文件", "打开", 0, "选择要打开的文件")
IF !EMPTY(Get_FileName)
Wait Window
"选择的文件: " + Get_FileName Nowait
ENDIF
Retu Get_FileName