The following snippet runs as it should on two machines, but fails on another two. All machines running XP SP2, installed from four different CDs.
<CODE>
FilePath=DataDirectory
cancelflag=0
?"going to Save file dialog
templong=SaveFileDialog (gmain, "MasterDrain",filename1,FilePath,Filter,DExt,Flags)
IF templong<>%IDOK THEN cancelflag=1: ?"cancelled":ShowWindow CBHNDL,%sw_shownormal:EXIT SELECT
?"back from Save file dialog"
filenumber=FREEFILE
OPEN filename1 FOR OUTPUT AS filenumber
</CODE>
On the failing machines, the dialog is not shown and the message 'cancelled' is displayed. This routine functions normally in other sections of the program - any thoughts on this one
Iain Johnstone
<CODE>
FilePath=DataDirectory
cancelflag=0
?"going to Save file dialog
templong=SaveFileDialog (gmain, "MasterDrain",filename1,FilePath,Filter,DExt,Flags)
IF templong<>%IDOK THEN cancelflag=1: ?"cancelled":ShowWindow CBHNDL,%sw_shownormal:EXIT SELECT
?"back from Save file dialog"
filenumber=FREEFILE
OPEN filename1 FOR OUTPUT AS filenumber
</CODE>
On the failing machines, the dialog is not shown and the message 'cancelled' is displayed. This routine functions normally in other sections of the program - any thoughts on this one
Iain Johnstone
Comment