If you have a look at your Tk installation you should find a "demos"
directory. On RHEL 3 it is in /usr/share/tk8.3/demos. Run "wish widget"
and you should get a nice array of sample apps with fairly easy to
understand code. (filebox.tcl and colrs.tcl are probably closest to your
reqs)

Martin

Martin Visser ,CISSP
Network and Security Consultant 
Consulting & Integration
Technology Solutions Group - HP Services

3 Richardson Place 
North Ryde, Sydney NSW 2113, Australia 

Phone: +61-2-9022-1670    
Mobile: +61-411-254-513
Fax: +61-2-9022-1800     
E-mail: martin.visserAThp.com
 
 

> -----Original Message-----
> From: [EMAIL PROTECTED] 
> [mailto:[EMAIL PROTECTED] On Behalf Of Ken Foskey
> Sent: Wednesday, 28 July 2004 11:29 PM
> To: slug
> Subject: [SLUG] tcl script - help needed
> 
> 
> I need to write a tcl script to provide a GUI over a shell 
> script.  Like every other work project this is a yesterday 
> project and I cannot find a site easily on how to write tcl.  
> I have a sample script but it is fairly rough, so I have the 
> 'script structure' it is the gui elements that I need help 
> with.  The tcl site, scriptix i think, is a little broken and 
> does not give me a direct pointer to gui guides.
> 
> 
> I need to:
> 
> Generate a file list and allow users to select a list of 
> files from a single user selectable directory.
> 
> If they select a single filename then the filename should be 
> dropped into a text box so that the user can change the filename.
> 
> suck in a list of printers from a parameter file and create a 
> drop box from that list of names.  Name will then be built 
> into a command line.
> 
> Has anyone got any pointers to sample code or a tutorial that 
> can help me do this?
> 
> --
> Thanks
> KenF
> OpenOffice.org developer
> 
> --
> SLUG - Sydney Linux User's Group Mailing List - 
> http://slug.org.au/ Subscription info and FAQs: 
> http://slug.org.au/faq/mailinglists.html
> 
> 
--
SLUG - Sydney Linux User's Group Mailing List - http://slug.org.au/
Subscription info and FAQs: http://slug.org.au/faq/mailinglists.html

Reply via email to