If the samples aren't working you probably don't have the latest version, or you grabbed active perl's ppm (which seems to be flaky). It is best if you download it from dada.perl.it. Below is a piece of code that should show you "Hello World".
use strict;
use Win32::GUI;
# First we create a window
my $window = Win32::GUI::Window->new (
-width => 200, # Set the width
-height => 200, # Set the height
-text => "Hello World Title", # Set the title
-name => "window1", # Set the name (used for event handlers)
);
# Next we create a font (optional)
my $font = Win32::GUI::Font->new (
-size => 20, # Set the size (in points)
-name => "Comic Sans MS", # Name of the font
);
# Then we add a lable to our window
my $lable = $window->AddLabel(
-text => "Hello World", # Set the text in the label
-font => $font, # Set the font
-foreground => [0, 0, 255], # Set the color of the text
);
# Make sure you show your window
$window->Show ();
# This starts the event loop so we can now respond to events
Win32::GUI::Dialog();
# The only event we want to respond to is the terminate event
# The name of a sub to run an event is in the form "name_event"
# If the terminate event sub is not specified your program won't exit
+if you hit the x
sub window1_Terminate {
return -1; # Return -1 to end the event loop
}
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|