by Gale FORd » Mon Jun 05, 2006 2:51 pm
I am not sure about that.
My source file is c:\fwh\source\function\dlgs32.prg
The function cGetFile32() uses
nRet := WinExec( "rundlg32 " + If( lSave, "2", "1" ) )
if nRet > 21 .or. nRet < 0
StopUntil( {|| GetPvProfString( cSection, "working", "0", INIFILE ) != "1" } )
/*while GetPvProfString( cSection, "working", "0", INIFILE ) == "1"
SysRefresh()
end*/
cFile := GetPvProfString( cSection, "lpstrFile", "", INIFILE )
nFilterIndex := Val( GetPvProfString( cSection, "nFilterIndex", "", INIFILE ) )
else
cFile := cGetFile( cFileMask, cTitle, nDefaultMask, cInitDir, lSave,, nFlags )
endif