Changes between Version 54 and Version 55 of PadrePluginCookbookRecipie05

Timestamp:

11/22/12 20:32:41 (6 months ago)

Author:

bowtie

Comment:

--

PadrePluginCookbookRecipie05

@@ -348 +348 @@
 
 ----
+=== about_dialog
+
+The following are from wxperl_demo.pl both work in a Plugin, chose and edit to taste.
+
+{{{#!perl
+sub simple_about_dialog {
+    my $self = shift;
+    my $info = Wx::AboutDialogInfo->new;
+
+    $info->SetName( 'The wxPerl demo' );
+    $info->SetVersion( '0.01 alpha 12' );
+    $info->SetDescription( 'The cool and pluggable wxPerl demo' );
+    $info->SetCopyright( '(c) 2001-today Me <me@test.com>' );
+
+    Wx::AboutBox( $info );
+}
+}}}
+
+{{{#!perl
+sub complex_about_dialog {
+    my $self = shift;
+    my $info = Wx::AboutDialogInfo->new;
+
+    $info->SetName( 'The wxPerl demo' );
+    $info->SetVersion( '0.01 alpha 12' );
+    $info->SetDescription( 'The cool and pluggable wxPerl demo' );
+    $info->SetCopyright( '(c) 2001-today Me <me@test.com>' );
+    $info->SetWebSite( 'http://wxperl.eu/', 'The wxPerl demo web site' );
+    $info->AddDeveloper( 'Mattia Barbon <mbarbon@cpan.org>' );
+    $info->AddDeveloper( 'I wish there was somebody else...' );
+
+    $info->SetArtists( [ 'Unluckily', 'none', 'so', 'the',
+                         'graphic', 'is', 'bad' ] );
+
+    Wx::AboutBox( $info );
+}
+}}}
+
+----
 === plugin_preferences