How about...
Dim bs As BinaryStream
Dim f as FolderItem
f=GetFolderItem(FileName)
If Not (f Is Nil) then
bs = f.CreateBinaryFile(FileName)
if Not (bs Is nil) then
// Your save file routine here
else
MsgBox "Unable to create file"
End If
End If
> I am trying to save a file without displaying the dialog box
> when the user selects Save from the file menu.
> I tried to find the answer in the tutorial but it was
> difficult to relate to my app.
> I have set the textHasChanged flag and need to bypass
> f=GetSaveFolderItem("myFileType",gFileName) in the SaveAs method.
> The SaveAs method starts as follows:
>
> Dim bs As BinaryStream
> Dim f as FolderItem
> f=GetSaveFolderItem("myFileType",gFileName)
> If f = Nil then
> // "Cancelled"
> else
> bs = f.CreateBinaryFile("myFileType")
> if bs = nil then
> MsgBox "Unable to create file"
> else
> // save data here
>
> If I bypass this line: f=GetSaveFolderItem("myFileType",gFileName)
> how do I get the folderItem f without displaying a dialog?
> Should I use a global folderItem in the SaveAs?
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
|