Can somebody point me in the right direction for dialog popup with textfields
Can somebody point me in the right direction for dialog popup with textfields
- Subject: Can somebody point me in the right direction for dialog popup with textfields
- From: Bjorn Van Blanckenberg <email@hidden>
- Date: Wed, 10 Jul 2002 14:29:04 +0200
Want to display dialog with Dialog Director
With 3 popup's
First one you can choose Client
Second one has to look at the server client folder (wich is the chosen
client of first popup) and list the folders wich are the client jobs
third one has to look at the server client folder and then the client job
(wich is the chosen job of second popup) folder and list the folder in the
job wich are the pages
If started with a dialog like this
If the client is chosen list the active jobs that are found on te servers
client folder
But don9t get any listing
Property Client_list :
{2Client12,2Client22,2Client32,2Client42,2Client52,2Client62,2Client72,2Clie
nt82}
set theDialog to: {size:[280, 160], name:"Settings", style:movable dialog,
contents:[,
{class:push button, bounds:[198, 120, 258, 140], name:"OK"},,
{class:pop up, bounds:[240, 33, 275, 53], contents:Client_list, text
field:3},,
{class:text field, bounds:[140, 35, 235, 51], name:"Wich Client?", name
bounds:[10, 35, 130, 51], value:""},,
{class:pop up, bounds:[240, 58, 275, 78], contents:Client_job, text
field:5}, ,
{class:text field, bounds:[140, 60, 235, 76], name:"Wich job of Client?",
name bounds:[10, 60, 130, 76], value:""},,
{class:pop up, bounds:[240, 83, 275, 103], contents:Client_Page, text
field:7}, ,
{class:text field, bounds:[140, 85, 235, 101], name:"Wich Client page?",
name bounds:[10, 85, 130, 101], value:""},,
{class:static text, bounds:[10, 10, 180, 19], contents:"Settings."}]}
set d to dd make dialog TheDialog with grayscale
repeat
set i to dd interact with user
if item 3 of theClient then
set the chosen_Client to the first item of the Client_list
repeat with i from 1 to the count of the Client_list
if item i of the Client_list is the chosen_Client then
set the the_Client to item i of the Client_Folder
set targetClientfolder to the_Client as string
set the Client_jobsList to list folder targetClientfolder without
invisibles
dd set contents of item 4 of d to Client_jobsList
end if
end if
end repeat
--
Oooo.
oooO ( )
( ) ) /
\ ( (_/
\_)
Met vriendelijke groeten
Bjorn Van Blanckenberg
Technical Support
Rechtstreeks nummer: ++32 3 780.68.41
--
PPC nv | Oostjachtpark 5 | 9100 St Niklaas
Tel: ++32 3 777 04 44 | Fax: ++32 3 777 15 23
http://www.ppc.be
_______________________________________________
applescript-users mailing list | email@hidden
Help/Unsubscribe/Archives:
http://www.lists.apple.com/mailman/listinfo/applescript-users
Do not post admin requests to the list. They will be ignored.