home *** CD-ROM | disk | FTP | other *** search
- on maccopypress
- global presstxtPath
- set name_presstxt to the name of member the member of sprite 2
- openXLib(":Xtras:macxtra:filextra")
- set fileName to the pathName & presstxtPath & name_presstxt
- if fileName > EMPTY then
- put fileName
- set loc to "desktop folder:"
- put loc & name_presstxt
- set wFileName to FileSaveAsDialog(loc, name_presstxt, "Save As")
- if wFileName > EMPTY then
- put wFileName
- set result to CopyFile(fileName, wFileName)
- put result
- end if
- end if
- closeXLib(":Xtras:macxtra:filextra")
- abort()
- end
-