Re: [MacPerl] Dialogs?

["Jefferson R. Lowrey" <lowrey@postoffice.sells.com>]

>Alternatively, If you are running OS8.5.x, know some AppleScript, and are lazy
>like me, the Standard Additions OSAX includes the Choose From List event
>and you
>could use something like:
>
>set theList to {"blue", "green", "red", "yellow"}
>set theChoice to choose from list theList with prompt Â
>    "Pick A Color:" default items ("blue") Â
>    OK button name "Done" cancel button name Â
>    "Later" multiple selections allowed false Â
>    without empty selection allowed
>if theChoice = false then
>    error number -128
>else
>    display dialog "You chose " & result with icon note buttons Â
>    "Yep" default button 1
>end if
>
>[note that email usually screws up the soft returns that AS uses for line
>continuation, so if any characters look weird, they are supposed to be
>Option-Returns.]
>
>No radio buttons, but you could set up your choices as strings in the pick
>list
>and use the results in MacPerl via Do Script.
>

Right.  But, if you're going to bother with using AppleScript from within
MacPerl, you might as well be *slightly* less lazy, and use the dialog
director OSAX instead.

It seems to be pretty full featured, and will let you do progress bars,
thermometers, radio buttons, check boxes, it seems like the whole kit and
the caboddle too.

Not that I'd expect Arved to sully his hands with it.

-Jeff Lowrey



***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch