Bonjour Damien,
You use an integer as a variable name :-)
And Rev does not crash: kudos!
May be some more generic approach like the following might help you:
put InsertTab(the fontnames,1) after tMenu
function InsertTab pList,pNumOfTabs
sort pList
repeat for each line tLine in pList
put tab & tLine & cr after tFormattedList
end repeat
delete last char of tFormattedList
return tFormattedList
end InsertTab
Le 30 juin 05 à 14:53, Damien Girard a écrit :
I need to get a list of font, and put a tab before each line of the
fontlist
(is it for a font menu).
This is my script :
put fontnames() into TheList
sort TheList
put "0" into LineToDo
repeat for each line 1 in TheList
put LineToDo +1 into LineToDo
put tab before line LineToDo of TheList
end repeat
Best Regards from Paris,
Eric Chatonet.
----------------------------------------------------------------
So Smart Software
For institutions, companies and associations
Built-to-order applications: management, multimedia, internet, etc.
Windows, Mac OS and Linux... With the French touch
Free plugins and tutorials on my website
----------------------------------------------------------------
Web site http://www.sosmartsoftware.com/
Email [EMAIL PROTECTED]/
Phone 33 (0)1 43 31 77 62
Mobile 33 (0)6 20 74 50 86
----------------------------------------------------------------
_______________________________________________
use-revolution mailing list
[email protected]
Please visit this url to subscribe, unsubscribe and manage your subscription
preferences:
http://lists.runrev.com/mailman/listinfo/use-revolution
