Sergey, in my case comdlg32.ocx is present on all machines of all endusers, so your solution should indeed be the solution for me. Thanks, and points given.
>It's commdlg32.ocx (commdlg32.msm merge module). You can distribute it with your application if you're not sure.
>
>>Hi Sergey, your code works fine on my machine. Do you think all users will have the COMMDLG.DLL already installed as part of Windows?
>>
>>>You can try Common Dialog Control.
oDlg = Createobject("GetFileEx")
>>>? oDlg.GetFile()
>>>
>>>DEFINE CLASS GetFileEx AS form
>>> Left = 100
>>> Top = 100
>>> Name = "GetFIleEx"
>>> DoCreate = .T.
>>> Visible = .F.
>>> cFileSelected = ""
>>> lUserCancel = .F.
>>>
>>> ADD OBJECT oCDC AS OleControl WITH ;
>>> OleClass = "MsComDlg.CommonDialog"
>>>
>>> PROCEDURE oCDC.Init
>>> This.CancelError = .T.
>>> ENDPROC
>>>
>>> PROCEDURE Error
>>> LPARAMETERS nError, cMethod, nLine
>>> IF nError = 1429
>>> This.lUserCancel = .T.
>>> ENDIF
>>> ENDPROC
>>>
>>> PROCEDURE GetFile(tnInitColor)
>>> Thisform.oCDC.ShowOpen()
>>> IF This.lUserCancel
>>> This.cFileSelected = ""
>>> ELSE
>>> This.cFileSelected = Thisform.oCDC.FileName
>>> ENDIF
>>> RETURN This.cFileSelected
>>> ENDPROC
>>>ENDDEFINE
>>>
>>>
>>>>Hi,
>>>>
>>>>In a very small executable I want to let the user choose an app. Then the app, containing a form, will be executed. The app is chosen with the help of GETFILE(). In that phase I don't want the main vfp-window, so I put SCREEN=OFF in the config.fpw. However, this also prevents the visibility of Getfile().
>>>>
>>>>Any other solution?
Groet,
Peter de Valença
Constructive frustration is the breeding ground of genius.
If there’s no willingness to moderate for the sake of good debate, then I have no willingness to debate at all.
Let's develop superb standards that will end the holy wars.
"There are three types of people: Alphas and Betas", said the beta decisively.
If you find this message rude or offensive or stupid, please take a step away from the keyboard and try to think calmly about an eventual a possible alternative explanation of my message.