originally posted by Terry Ford
You look at the examples in the LR.
Terry
On Sep 26, 2006, at 3:22 PM, Brian Heibert wrote:
Hi,
progresswheel1.visible=true
Dim TextTypes as New FileType
TextTypes.Name= "Text Files"
TextTypes.Extensions=".txt"
Dim f as FolderItem
dim fs as TextInputStream
f.mactype = "Text"
f.maccreator = "UKBH"
f= GetOpenFolderItem(textTypes)
If f <> Nil then
//MsgBox f.AbsolutePath
fs.
End if
'dim i as integer
'dim File as FolderItem
'dim FileStream as TextOutputStream
'file=GetSaveFolderItem("","URL Database")
'If file <> Nil then
'file.macType = "Text"
'file.macCreator = "UKBH"
'FileStream = file.CreateTextFile
'If FileStream <> Nil then
'For i = 0 to urlsv.ListCount - 1
'FileStream.WriteLine urlsv.List(i)
'Next
'End if
'End if
'
'
'
I have the above code to create a text file
now how do I open it?
_______________________________________________
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>
----- Original Message -----
From: "Brian Heibert" <[EMAIL PROTECTED]>
To: "Getting Started" <[email protected]>
Sent: Thursday, September 28, 2006 1:56 AM
Subject: Open a file
I am using this to save files
progresswheel1.visible=true
//urlsv.text
Dim file As FolderItem
Dim fileStream as TextOutputStream
file=GetSaveFolderItem("","URL Database")
if file = nil then
MSGBOX "Can't save file."
else
file.MacType = "Text"
file.MacCreator = "UKBH"
fileStream=file.CreateTextFile
fileStream.WriteLine urlsv.text
fileStream.Close
end if
Can someone refer me to a page in a manual or something that would
show me how to open a file
I looked at the TextEdit tutorial example
Dim f as FolderItem
Dim w as TextWindow
#If TargetWin32 then
f=GetOpenFolderItem("text;rtf") //displays open-file dialog
#else //Linux and Macintosh
f=GetOpenFolderItem("text")
#endif
If f<>Nil then //the user clicked Open
w=New TextWindow //create new instance of TextWindow
f.OpenStyledEditField w.TextField
w.Document=f //assign f to the Document property
w.Title=f.Name //assign name of f to the Title property of w
End if
But It doesn't look like it's what i need I am a bit confused (like
usual)
Brian
_______________________________________________
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>
_______________________________________________
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>
