Das erste Fenster macht Probleme mit wxPerl: aus Lichtkinds WxPerlTutorial - #45719 (Graphische Oberflächen)

legine

2006-07-05 16:33

User since
2006-06-30
32 Artikel
BenutzerIn
[default_avatar]

Mal wieder Hallo,

Nun mal mit einem ernsthaft zu lösendes Problem.

Nach dem wxPerl nun endlich intalliert ist

Code: (dl )

1
2
3

C:\>perl -MWx -e;

C:\>

sagt das hoffentlich doch aus oder?

Wollte ich das erste Beispiel aus dem tollen wxPerl Tutorial nur zu testzwecken ausprobieren.

Also schnell C&P
Und los gehts.
Aber nichts passiert.

Der Compiler gibt keine Fehlermeldung aus, und das Perlprogramm beendet sich nicht. (Was durchaus meinen erwartungen entspricht)
Aber ein neues Fenster ist nirgens zu sehen.

Was kann ich noch checken um zu sehen was schiefläuft? andere Ideen?
Gruß
Peter

[edit]
Das C&P Progrämchen ;)

Code: (dl )

use strict;
use warnings;

package ServusWelt;
use Wx; # Wx einbinden 
use base qw(Wx::App); # von Wx::App ableiten

sub OnInit { 
  my $app = shift;
  my $frame = Wx::Frame->new( 
    undef, # kein Eltern-Fenster 
    -1, # Fenter id 
    'Servus Welt', # Titel 
    [-1, -1], # Position x/y 
    [150, 150] # Gro?e x/y 
    ); 
  $app->SetTopWindow($frame); # Fenster als oberstes bestimmen 
  $frame->Show(1); # Fenster zeichnen 
}

package main;

ServusWelt->new->MainLoop; # Programminstanz erzeugen und starten

\n\n