Chris, this is a good idea, but I personally would much prefer if someone to spend their time fleshing out the official documentation. Putting examples there would be the most appropriate place and there are still a lot of methods in there with "TDB". The main reason I bring this is up is that I have recently had to start really playing with Java for my work and the official Javadoc stuff is horribly lite on examples, (unlink most perl modules out there, which are usually fairly good).
Joe Frazier, Jr. <editorial> A good example is the Date class. Many of the methods and constructors in this class are depreciated, and it points you to the Calendar Class or the DateFormat class. One would logically think that these two classes would be subclasses so that you can pass these to a method that takes a date, but no.... You have to convert to a date object explicitly. Stupid Java.... </editorial> > -----Original Message----- > From: [EMAIL PROTECTED] > [mailto:[EMAIL PROTECTED] On > Behalf Of Chris Wearn > Sent: Monday, November 15, 2004 7:28 AM > To: Jez White > Cc: Win32-GUI List > Subject: RE: [perl-win32-gui-users] Website - Code snippets gallery > > Hiya Jez, > > I agree that a Win32::GUI cookbook would be a great idea, > available as a document that you can print out and read, > while being able to download an electronic copy, to enable > the 'cutting & pasting' of examples. > > To ease editing, add styles and colour coding, a MS Word > document would probably be the most common format. It can > then be read in Star Office, and a PDF version could also be output. > > I'm happy to do some assembly... and make a > 'work-in-progress' version available via a link on my domain. > > Once we have got to various stages we can commit it to CVS on > sourceforge. > > Unless someone else with a degree in publishing, a Mac with > Quark and nothing else to do, wishes to volunteer... > > Otherwise, start emailing me content/examples... > > Chris Wearn > > -----Original Message----- > From: Jez White [mailto:[EMAIL PROTECTED] > Sent: Monday, 15 November 2004 06:59 > To: Glenn Linderman; Chris Wearn > Cc: Win32-GUI List > Subject: Re: [perl-win32-gui-users] Website - Code snippets gallery > > > >> There are many examples / small snippets of code that > could serve as > >> examples to others, we just need a place to easily store and > >> collectively showcase them. Something like a forum (I run > one using > >> phpBB). Is there any way of doing this on Sourceforge or > some other > >> place where people can paste in 'how to' snippets, or do we start > >> one. > > I too think we need a place for these snippets - a Win32::GUI > cookbook of sorts. It's a question of who is prepared to > maintain/organise it? Any offers? > > > It is always delightful when someone offers some of the hard-won > > fruits of their labors to share with others. Thanks for > thinking of it. > > > > This is probably a nice snippet of code... but it isn't complete > > enough to run, so I can't tell for sure. Probably adding a > few lines > > at the top to use strict; use warnings; use Win32::GUI; and to > > initialize the > > I've created an example, and have added to CVS - the code is > also below. The only thing you need to do is to have a bitmap > of some description - I was going to add a bitmap to CVS so > the script would run, but I don't think the world is ready > for my art skills:) > > Cheers, > > jez. > > ------------- > use Win32::GUI; > use strict; > > my ($width,$height); > my $mainwin; > > #try to load the splash bitmap from the exe that is running > my $splashimage= new Win32::GUI::Bitmap('SPLASH'); unless > ($splashimage) { > #bitmap is not in exe, load from file > $splashimage= new Win32::GUI::Bitmap('SPLASH.bmp'); > die 'could not find splash bitmap' unless $splashimage; > #get the dimensions of the bitmap > ($width,$height) = $splashimage->Info(); > } > > #create the splash window > my $splash = new Win32::GUI::Window ( > -name => "Splash", > -text => "Splash", > -height => $height, > -width => $width, > -left => 100, > -top => 100, > -addstyle => WS_POPUP, > -popstyle => WS_CAPTION | WS_THICKFRAME, > -addexstyle => WS_EX_TOPMOST > ); > > #create a label in which the bitmap will be placed > my $bitmap = $splash->AddLabel( > -name => "Bitmap", > -left => 0, > -top => 0, > -width => $width, > -height => $height, > -bitmap => $splashimage, > ); > $bitmap->SetImage( $splashimage ); > > #center the splash and show it > $splash->Center; > $splash->Show(); > #call do events - not Dialog - this will display the window > and let us #build the rest of the application. > Win32::GUI::DoEvents; > > #A good way of building your application is to keep > everything in packages, and eval those #into scope in this > phase. In this case, we'll create the main window and sleep > to simulate #some work. > my $string = q ` > $mainwin = new Win32::GUI::Window ( > -name => "Main", > -text => "Main window", > -height => 400, > -width => 400, > ); > sleep(2); > $mainwin->Center(); > $mainwin->Show(); > `; > #eval the code and report any errors > eval $string; > if ($@) { > my $message = $@; > Win32::GUI::MessageBox($splash, $message ,"Build Error", > MB_OK | MB_ICONWARNING); > } > #hide the splash and enter the Dialog phase $splash->Hide; > Win32::GUI::Dialog(); > > > > > > ------------------------------------------------------- > This SF.Net email is sponsored by: InterSystems CACHE FREE > OODBMS DOWNLOAD - A multidimensional database that combines > robust object and relational technologies, making it a > perfect match for Java, C++,COM, XML, ODBC and JDBC. > www.intersystems.com/match8 > _______________________________________________ > Perl-Win32-GUI-Users mailing list > Perl-Win32-GUI-Users@lists.sourceforge.net > https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users >
