Hi,
Thanks for the advise, i've added those two lines to my save method
and it does not seem to make any difference,
double clicking on the document still opens up in TextEdit.
If it helps here are my settings:
FileType:
Display Name: Personal Money Bank Document
Object Name: PersonalMoneyBankDocument
macType: TEXT
MacCreator: Pmbk
Extension: pmb
My Constants:
kMacType = TEXT
kMacCreator = Pmbk
App Properties:
MacCreator: Pmbk
AcceptFileTypes: FileTypes.PersonalMoneyBankDocument
Heres the saving code method:
Document as FolderItem
If Document = Nil or DisplaySaveDialog then
Dim sDialog as SaveAsDialog
sDialog = New SaveAsDialog
sDialog.Filter = FileTypes.PersonalMoneyBankDocument
sDialog.SuggestedFileName = Title + ".pmb"
// If they have selected 'Save As', then set some document details.
if sDialog.ShowModalWithin(self) <> nil then
Document =sDialog.Result
Title=Functions.gGetFileName(Document.Name) //window Title
gets document name
End if
End if
// Save the document.
If Document <> Nil then
Document.MacCreator=kMacCreator
Document.MacType=kMacType
mWriteAccount // This writes the XML file using TextOutputStream
End if
Help that helps
Mark
_______________________________________________
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>
