Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Getfile - Alternative Needed
Message
From
31/01/1999 14:15:16
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00182231
Message ID:
00182298
Views:
56
Hi, Robert-
I hope I'm not intrepreting your question too simplistically, but couldn't you simply write your own function that "wraps" GetFile--Something like the following? (Code is off the top of my head...)

FUNCTION get_File( tcType, tcDir )
LPARAMTER tcType, tcDir
LOCAL lcDefaultDir, lcDefaultDrive, lcfile
tcDir = IIF( TYPE( 'tcDir' ) <> 'C', SYS(2003), tcDir )
tcType = IIF( TYPE( 'tcType' ) <> 'C', 'BMP,GIF', tcType

lcDefaultDIR = SYS(2003)
lcDefaultDrive = SYS(5)

SET DEFAULT TO tcDir

lcFile = GETFILE( blah, blah, blah )
*!* Check that a file was really selected, etc, etc.

SET DEFAULT TO (lcDefaultDrive + lcDefaultDir)

RETURN lcFile

>I want:
>lcFile = getfile('bmp,gif', 'graphics') or similar
>where graphics is the subdirectory.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform