RE: Perl GUI Programming
Hi Dirk, for your conceptual question I'd say, that you're already using the right things (-validateCommand, -invalidateCommand callbacks). If you want to force adherence to valid values - that's the job of the callbacks. If you want to tell the user somehow, it's only a moderately good idea to use a status line. Much better is the messageBox method, which opens a dialog. Like this: $main->messageBox(-title => 'Error', -message => "The value '$Job' is not a valid entry - please correct", -icon => 'error', -type => 'OK'); See 'perldoc Tk::messageBox' for details. To return to the widget, something like this should help: $jobEntry->selectionRange(0, 'end'); #select everything $jobEntry->focus(); # set focus back to Entry widget The 'bell' method works fine for me on WinXP, Perl 5.6.1. Check your 'Volume Controls' ! Does this answer your questions? Regards, Gerhard |-+> | || | || | || | || | || | |"Dirk Bremer" | | |<[EMAIL PROTECTED]> | | || | |2005-01-21 08:08 PM | | || |-+> >---| | | | To: Gerhard Petrowitsch/STN/SC/[EMAIL PROTECTED] | | cc: "perl-win32-users" | | Subject:RE: Perl GUI Programming | | | | Classification: | | | | | >---| First of all, thanks for everyone's suggestions on Perl GUI extensions. I have decided to use Tk. And thanks especially to Gerhard for his pointers. Here is the test program that I am working on: #! C:/perl/bin/perl -w use diagnostics; use strict; use warnings; # Declare modules. use FindBin qw($Bin); use lib $Bin; use Tk; my $main = MainWindow->new(-title => 'Testing a Perl Tk Application'); $main->bind('' => sub {exit}); $main->minsize(600,300); $main->geometry("600x300"); my $Frame1 = $main->Frame(-borderwidth=>'2', -relief=>'sunken', )->pack( -anchor => 'w', -fill => 'x', -ipady=>5, -ipadx=>5, -pady=>5, -padx=>10, -side=>'top'); my $Frame2 = $main->Frame(-borderwidth=>'2', -relief=>'sunken', )->pack( -anchor => 'w', -fill => 'x', -ipady=>5, -ipadx=>5, -pady=>5, -padx=>10, -side=>'top'); # Frame 1 widgets. my ($Coop, $Cycle, $Date, $Job, $Type); my $Label1 = $Frame1->Label(-text => 'Job Type'); my $jobEntry = $Frame1->Entry(-textvariable => \$Job, -validate => 'focusout', -validatecommand => sub {$_[1] = uc($_[1]); $_[1] =~ /[BD]/}, -invalidcommand => sub {print("Invalid data value for $_[0]\n")}, -width => 1); my $Label2 = $Frame1->Label(-text => 'Coop_ID'); my $coopEntry = $Frame1->Entry(-justify => 'right', -textvaria
RE: Perl GUI Programming
First of all, thanks for everyone's suggestions on Perl GUI extensions. I have decided to use Tk. And thanks especially to Gerhard for his pointers. Here is the test program that I am working on: #! C:/perl/bin/perl -w use diagnostics; use strict; use warnings; # Declare modules. use FindBin qw($Bin); use lib $Bin; use Tk; my $main = MainWindow->new(-title => 'Testing a Perl Tk Application'); $main->bind('' => sub {exit}); $main->minsize(600,300); $main->geometry("600x300"); my $Frame1 = $main->Frame(-borderwidth=>'2', -relief=>'sunken', )->pack( -anchor => 'w', -fill => 'x', -ipady=>5, -ipadx=>5, -pady=>5, -padx=>10, -side=>'top'); my $Frame2 = $main->Frame(-borderwidth=>'2', -relief=>'sunken', )->pack( -anchor => 'w', -fill => 'x', -ipady=>5, -ipadx=>5, -pady=>5, -padx=>10, -side=>'top'); # Frame 1 widgets. my ($Coop, $Cycle, $Date, $Job, $Type); my $Label1 = $Frame1->Label(-text => 'Job Type'); my $jobEntry = $Frame1->Entry(-textvariable => \$Job, -validate => 'focusout', -validatecommand => sub {$_[1] = uc($_[1]); $_[1] =~ /[BD]/}, -invalidcommand => sub {print("Invalid data value for $_[0]\n")}, -width => 1); my $Label2 = $Frame1->Label(-text => 'Coop_ID'); my $coopEntry = $Frame1->Entry(-justify => 'right', -textvariable => \$Coop, -width => 5); my $Label3 = $Frame1->Label(-text => 'Cycle'); my $cycleEntry = $Frame1->Entry(-justify => 'right', -textvariable => \$Cycle, -width => 2); my $Label4 = $Frame1->Label(-text => 'Date'); my $dateEntry = $Frame1->Entry(-width => 8, -textvariable => \$Date); my $Label5 = $Frame1->Label(-text => 'Type'); my $typeEntry = $Frame1->Entry(-width => 1, -textvariable => \$Type); $Label1->pack(-side => 'left', -padx => 5); $jobEntry->pack(-side => 'left', -padx => 5); $Label2->pack(-side => 'left', -padx => 5,); $coopEntry->pack(-side => 'left', -padx => 5); $Label3->pack(-side => 'left', -padx => 5); $cycleEntry->pack(-side => 'left', -padx => 5); $Label4->pack(-side => 'left', -padx => 5); $dateEntry->pack(-side => 'left', -padx =>5); $Label5->pack(-side => 'left', -padx => 5); $typeEntry->pack(-side => 'left', -padx => 5); # Frame 2 widgets. my $Search = $Frame2->Button(-text => 'Search', -command => sub{do_searchButton($jobEntry, $coopEntry, $cycleEntry, $dateEntry, $typeEntry)}); my $Done = $Frame2->Button(-text => "Done", -command => sub {exit}); $Search->pack(-side => 'left', -padx => 5, -pady => 5); $Done->pack(-side => 'left', -padx => 5, -pady => 5); $jobEntry->focus; MainLoop(); I have a conceptual question as well as a practical question. The conceptual question is what general methods do you use to validate the user's entered data and force adherence to recognized/valid values? The practical question can be taken from the example program. I am attempting to use the various validation features for $jobEntry. My concern is with the -invalidcommand. I tried the main->bell call without success, i.e. not sound was heard, but while a bell-sound would be nice, I am more concerned with not letting the user leave this entry until a valid value has been entered. I have experimented with the various focus properties without success. Basically what I would like to do here is this: 1. Validate the entry with the -validatecommand. This appears to be working. 2. If an invalid value is entered, have the cursor/focus remain in the field in error. 3. Display a context-specific message in the GUI. I have considered placing a label in the GUI for status messages. If the label refers to a variable for its text, will the label be updated in the GUI if the -invalidcommand sets the value of the variable? Would the program need to do another pack on the status label to refresh its view of the lable text variable? TIA! Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
Dirk, one frequently overlooked option for a windows GUI is to drive IE via the Win32::OLE module. This works pretty well for simple applications. If you already know HTML fairly well, there's less of a learning curve than some of the other options. There are some examples (in VBScript) at scriptinganswers.com. You'll have to register (free), then go to the script vault, misc scripts. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dirk Bremer Sent: Thursday, January 20, 2005 10:34 AM To: perl-win32-users Subject: RE: Perl GUI Programming wxPerl is interesting but very little documentation can be found. I will require documentation from a complete beginner's viewpoint (for the GUI) as I have literally no GUI programming experience although am well-versed in Perl. -Original Message- From: David Kaufman [mailto:[EMAIL PROTECTED] Sent: Wednesday, January 19, 2005 18:43 To: Dirk Bremer; perl-win32-users Subject: Re: Perl GUI Programming Hi Dirk, Dirk Bremer <[EMAIL PROTECTED]> wrote: > >I am ready to attempt some GUI programming in Perl. I have looked at >Win32::GUI and need more documentation for it than I can readily find. >I have looked at Tk and it looks a bit cumbersome. What are you >recommendations? I require something that is compatible with 5.6 Perl. >I would like something that I can get up and running on quickly and >that is well documented for beginners. My primary interest will be in >developing a GUI that lists files for the user to choose and another >GUI that will be strictly as a scrolling display that will be updated >often. Your suggestions will be appreciated. Check out wxPerl http://wxperl.sourceforge.net/ I use it to develop perl GUI apps on windows, and the PerlDevKit from www.activestate.com to compile them to windows.exe-cutables. Here's a nice (if a bit old) tutorial: http://www.perl.com/pub/a/2001/09/12/wxtutorial1.html hth, dave ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
Hi Dirk, I'm glad to see that you're giving Tk a try ;-) In general when using the pack geometry manager you use frames to group widgets in a special layout. Like this: use Tk; my $mw=MainWindow->new(); my $f1 = $mw->Frame()->pack(-side => 'top'); my $f2 = $mw->Frame()->pack(-side => 'top'); my $f3 = $mw->Frame()->pack(-side => 'top'); my $f4 = $mw->Frame()->pack(-side => 'top'); $f1->Label(-text => 'label1')->pack(-side => 'left'); $f1->Button(-text => 'button1')->pack(-side => 'left'); $f2->Label(-text => 'label2')->pack(-side => 'left'); $f2->Button(-text => 'button2')->pack(-side => 'left'); $f3->Label(-text => 'label3')->pack(-side => 'left'); $f3->Button(-text => 'button3')->pack(-side => 'left'); $f4->Label(-text => 'label4')->pack(-side => 'left'); $f4->Button(-text => 'button4')->pack(-side => 'left'); MainLoop; The disadvantage here is, that you don't get nice columns. If you want to have these, use this approach: use Tk; my $mw=MainWindow->new(); my $f1 = $mw->Frame()->pack(-side => 'left', -anchor => 'n'); my $f2 = $mw->Frame()->pack(-side => 'left'); $f1->Label(-text => 'label1')->pack(-side => 'top'); $f1->Label(-text => 'label2')->pack(-side => 'top'); $f1->Label(-text => 'label3')->pack(-side => 'top'); $f1->Label(-text => 'label4')->pack(-side => 'top'); $f2->Button(-text => 'button1')->pack(-side => 'top'); $f2->Button(-text => 'button2')->pack(-side => 'top'); $f2->Button(-text => 'button3')->pack(-side => 'top'); $f2->Button(-text => 'button4')->pack(-side => 'top'); MainLoop; The disadvantage here is, that you don't get nice rows (which here is a problem because of the different heights of Labels and Buttons): If you want both, use the grid geometry manager: use Tk; my $mw=MainWindow->new(); $mw->Label(-text => 'label1')->grid(-row => 0, -column => 0); $mw->Button(-text => 'button1')->grid(-row => 0, -column => 1); $mw->Label(-text => 'label2')->grid(-row => 1, -column => 0); $mw->Button(-text => 'button2')->grid(-row => 1, -column => 1); $mw->Label(-text => 'label3')->grid(-row => 2, -column => 0); $mw->Button(-text => 'button3')->grid(-row => 2, -column => 1); $mw->Label(-text => 'label4')->grid(-row => 3, -column => 0); $mw->Button(-text => 'button4')->grid(-row => 3, -column => 1); MainLoop; Get it? You can also grid Frames into grid positions and pack or grid other things in: my $container = $mw->Frame()->grid(-row =>0, -column => 0); $container->Label(-text => 'test')->pack(); $container->Button(-text => 'Press me')->pack(); But you should never use pack and grid within the same Frame or MainWindow/Toplevel (which actually are also Frames) Let me know if you need more - perhaps better over the Tk list! Regards, Gerhard |-+-> | | | | | | | | | | | | | | | | |"Dirk Bremer" <[EMAIL PROTECTED]> | | | | | |Sent by: | | |[EMAIL PROTECTED]| | |.com | | | | | |2005-01-21 03:22 PM | | | | |-+-> >---| | | | To: "perl-win32-users" | | cc: (bcc: Gerhard Petrowitsch/STN/SC/PHILIPS)
RE: Perl GUI Programming
You can wrap each label & button into a frame and then pack the frames together. Regards, Rick Michaud -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dirk Bremer Sent: Friday, January 21, 2005 9:22 AM To: perl-win32-users Subject: RE: Perl GUI Programming Let me pose a general Tk question as I'm having a bit of trouble understanding the placement of widgets. I would like the following layout: label button label button label button label button I have tried various settings of -anchor and -side and the best that I can come up with is: label button label button label button label button I have been using the pack geometry manager. Suggestions? Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
Let me pose a general Tk question as I'm having a bit of trouble understanding the placement of widgets. I would like the following layout: label button label button label button label button I have tried various settings of -anchor and -side and the best that I can come up with is: label button label button label button label button I have been using the pack geometry manager. Suggestions? Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
Gerhard, Can you direct me to the location of the mailing list? -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] Sent: Thursday, January 20, 2005 06:02 To: Dirk Bremer Cc: perl-win32-users Subject: Re: Perl GUI Programming Hi Dirk, I don't know, why Tk looks cumbersome to you - it's well documented, you get a great book about it ("Mastering Perl/Tk" by Steve Lidie, Nancy Walsh at O'Reilly) there's a living mailing list (Steve, Nick himself and a lot of other great Tk specialists contribute a lot) and it's very easy to use. It's also cross platform, of course. And you can re-use a lot of knowledge should you ever need to develop a GUI for Tcl (which God may save you from ;-) Once you get over the initial hurdles (which you will face with every GUI package), you won't find it cumbersome anymore. Regards, Gerhard |-+-> | | | | | | | | | | | | | | | | |"Dirk Bremer" <[EMAIL PROTECTED]> | | | | | |Sent by: | | |[EMAIL PROTECTED]| | |.com | | | | | |2005-01-19 11:21 PM | | | | |-+-> >--- | | | | To: "perl-win32-users" | | cc: (bcc: Gerhard Petrowitsch/STN/SC/PHILIPS) | | Subject:Perl GUI Programming | | | | Classification: | | | | | >--- | I am ready to attempt some GUI programming in Perl. I have looked at Win32::GUI and need more documentation for it than I can readily find. I have looked at Tk and it looks a bit cumbersome. What are you recommendations? I require something that is compatible with 5.6 Perl. I would like something that I can get up and running on quickly and that is well documented for beginners. My primary interest will be in developing a GUI that lists files for the user to choose and another GUI that will be strictly as a scrolling display that will be updated often. Your suggestions will be appreciated. Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
Have you looked here? http://wxperl.sourceforge.net/documentation.html -Erich- -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Dirk Bremer Sent: Thursday, January 20, 2005 10:34 AM To: perl-win32-users Subject: RE: Perl GUI Programming wxPerl is interesting but very little documentation can be found. I will require documentation from a complete beginner's viewpoint (for the GUI) as I have literally no GUI programming experience although am well-versed in Perl. -Original Message- From: David Kaufman [mailto:[EMAIL PROTECTED] Sent: Wednesday, January 19, 2005 18:43 To: Dirk Bremer; perl-win32-users Subject: Re: Perl GUI Programming Hi Dirk, Dirk Bremer <[EMAIL PROTECTED]> wrote: > >I am ready to attempt some GUI programming in Perl. I have looked at >Win32::GUI and need more documentation for it than I can readily find. >I have looked at Tk and it looks a bit cumbersome. What are you >recommendations? I require something that is compatible with 5.6 Perl. >I would like something that I can get up and running on quickly and >that is well documented for beginners. My primary interest will be in >developing a GUI that lists files for the user to choose and another >GUI that will be strictly as a scrolling display that will be updated >often. Your suggestions will be appreciated. Check out wxPerl http://wxperl.sourceforge.net/ I use it to develop perl GUI apps on windows, and the PerlDevKit from www.activestate.com to compile them to windows.exe-cutables. Here's a nice (if a bit old) tutorial: http://www.perl.com/pub/a/2001/09/12/wxtutorial1.html hth, dave ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
wxPerl is interesting but very little documentation can be found. I will require documentation from a complete beginner's viewpoint (for the GUI) as I have literally no GUI programming experience although am well-versed in Perl. -Original Message- From: David Kaufman [mailto:[EMAIL PROTECTED] Sent: Wednesday, January 19, 2005 18:43 To: Dirk Bremer; perl-win32-users Subject: Re: Perl GUI Programming Hi Dirk, Dirk Bremer <[EMAIL PROTECTED]> wrote: > >I am ready to attempt some GUI programming in Perl. I have looked at > Win32::GUI and need more documentation for it than I can readily > find. I have looked at Tk and it looks a bit cumbersome. What are you > recommendations? I require something that is compatible with 5.6 > Perl. I would like something that I can get up and running on quickly > and that is well documented for beginners. My primary interest will > be in developing a GUI that lists files for the user to choose and > another GUI that will be strictly as a scrolling display that will be > updated often. Your suggestions will be appreciated. Check out wxPerl http://wxperl.sourceforge.net/ I use it to develop perl GUI apps on windows, and the PerlDevKit from www.activestate.com to compile them to windows.exe-cutables. Here's a nice (if a bit old) tutorial: http://www.perl.com/pub/a/2001/09/12/wxtutorial1.html hth, dave ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl GUI Programming
Hi Dirk, I don't know, why Tk looks cumbersome to you - it's well documented, you get a great book about it ("Mastering Perl/Tk" by Steve Lidie, Nancy Walsh at O'Reilly) there's a living mailing list (Steve, Nick himself and a lot of other great Tk specialists contribute a lot) and it's very easy to use. It's also cross platform, of course. And you can re-use a lot of knowledge should you ever need to develop a GUI for Tcl (which God may save you from ;-) Once you get over the initial hurdles (which you will face with every GUI package), you won't find it cumbersome anymore. Regards, Gerhard |-+-> | | | | | | | | | | | | | | | | |"Dirk Bremer" <[EMAIL PROTECTED]> | | | | | |Sent by: | | |[EMAIL PROTECTED]| | |.com | | | | | |2005-01-19 11:21 PM | | | | |-+-> >---| | | | To: "perl-win32-users" | | cc: (bcc: Gerhard Petrowitsch/STN/SC/PHILIPS) | | Subject:Perl GUI Programming | | | | Classification: | | | | | >---| I am ready to attempt some GUI programming in Perl. I have looked at Win32::GUI and need more documentation for it than I can readily find. I have looked at Tk and it looks a bit cumbersome. What are you recommendations? I require something that is compatible with 5.6 Perl. I would like something that I can get up and running on quickly and that is well documented for beginners. My primary interest will be in developing a GUI that lists files for the user to choose and another GUI that will be strictly as a scrolling display that will be updated often. Your suggestions will be appreciated. Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters USA Central Time Zone 636-922-9158 ext. 8652 fax 636-447-4471 [EMAIL PROTECTED] www.nisc.cc ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl GUI Programming
You can try Prima (http://prima.eu.org) It works in Win32, Linux and Solaris and have a very very very nice GUI-builder. El Miércoles 19 Enero 2005 23:21, Dirk Bremer escribió: > I am ready to attempt some GUI programming in Perl. I have looked at > Win32::GUI and need more documentation for it than I can readily find. I > have looked at Tk and it looks a bit cumbersome. What are you > recommendations? I require something that is compatible with 5.6 Perl. I > would like something that I can get up and running on quickly and that > is well documented for beginners. My primary interest will be in > developing a GUI that lists files for the user to choose and another GUI > that will be strictly as a scrolling display that will be updated often. > Your suggestions will be appreciated. > > Dirk Bremer - Systems Programmer II - ESS/AMS - NISC St. Peters > USA Central Time Zone > 636-922-9158 ext. 8652 fax 636-447-4471 > > [EMAIL PROTECTED] > www.nisc.cc > > ___ > Perl-Win32-Users mailing list > Perl-Win32-Users@listserv.ActiveState.com > To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
RE: Perl GUI Programming
> I am ready to attempt some GUI programming in Perl. I have looked at > Win32::GUI and need more documentation for it than I can readily find. I > have looked at Tk and it looks a bit cumbersome. What are you > recommendations? wxPerl is the best way to go, in my opinion. Cross platform widgets for a cross platform language. -Erich- -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 265.6.13 - Release Date: 1/16/2005 ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Re: Perl GUI Programming
Hi Dirk, Dirk Bremer <[EMAIL PROTECTED]> wrote: I am ready to attempt some GUI programming in Perl. I have looked at Win32::GUI and need more documentation for it than I can readily find. I have looked at Tk and it looks a bit cumbersome. What are you recommendations? I require something that is compatible with 5.6 Perl. I would like something that I can get up and running on quickly and that is well documented for beginners. My primary interest will be in developing a GUI that lists files for the user to choose and another GUI that will be strictly as a scrolling display that will be updated often. Your suggestions will be appreciated. Check out wxPerl http://wxperl.sourceforge.net/ I use it to develop perl GUI apps on windows, and the PerlDevKit from www.activestate.com to compile them to windows.exe-cutables. Here's a nice (if a bit old) tutorial: http://www.perl.com/pub/a/2001/09/12/wxtutorial1.html hth, dave ___ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs