At 17:44 +0100 02/13/2002, Tony �str�m wrote:
>I can�t make it (to eliminate Windows to apply .TXT after projectname.ecd).
>I use the lingo below. Please help meeeeee!!!!!!!!!
The code I initially sent discussing how to remove the .txt would be
best implemented immediately following this line:
> pFileName = displaySave(gFile,infoText,defaultFile)
pFileName is the path to your file to be saved, and it is to this
path that FIO on Win appends the .txt.
Note, by the way, that if the user clicks cancel in the FIO dialog,
your code will crash because you would then be attempting operations
with either a void variable, or an empty string. :\
Here's what to add...
if voidP ( pFileName ) or pFileName = "" then
exit
end if
sDelimSave = the itemDelimiter
the itemDelimiter = "."
if the last item of pFileName = "TXT" then
delete the last item of pFileName
end if
the itemDelimiter = sDelimSave
Then you may resume your code with...
> openFile(gFile,pFileName,1)
>
> if status(gFile) = 0 then
--etc.
Enjoy!
--
Warren Ockrassa | http://www.nightwares.com/
Director help | Free files | Sample chapters | Freelance | Consulting
Author | Director 8.5 Shockwave Studio: A Beginner's Guide
Published by Osborne/McGraw-Hill
http://www.osborne.com/indexes/beginners_guides.shtml
[To remove yourself from this list, or to change to digest mode, go to
http://www.penworks.com/lingo-l.cgi To post messages to the list, email
[EMAIL PROTECTED] (Problems, email [EMAIL PROTECTED]). Lingo-L is for
learning and helping with programming Lingo. Thanks!]
