Think of something that you wish Authorware could do but it doesn't?
Let the our good friends at Macromedia know via the wishlist.
Please let us know if you find
any of the materials on this site inappropriate or offensive. Please include
the url and why the material should be reviewed.
Comments and questions about the site are also welcome. Please no Authorware
questions, use the AWARE
list.
|
Back
B5017 - How do I manipulate external files so that they're not easily seen by users?
by - Joseph Ganci
I'd like to use external .gif files but I don't want to make it easy for users to double-click the .gif files and open them up. I wonder if there is any way to have Authorware change the extension of all .gif files in
the current folder to have an extension of .ugl and vice-versa?
Here's a script to do convert .gif files to .ugl files:
files := Catalog(FileLocation, "f")
repeat with i := 1 to LineCount(files)
file := GetLine(files, i)
extension := SubStr(file, RFind(".", file), CharCount(file))
if extension = ".gif" then RenameFile(FileLocation^file, ¬ Replace(extension, ".ugl", file))
end repeat
To change the .ugl files back to .gif:
files := Catalog(FileLocation, "f")
repeat with i := 1 to LineCount(files)
file := GetLine(files, i)
extension := SubStr(file, RFind(".", file), CharCount(file))
if extension = ".ugl" then RenameFile(FileLocation^file,¬ Replace(extension, ".gif", file))
end repeat
There are 0 reviews
Add your review
Back
|