Hallo,

Ich habe immer Error Outout:
Win32::GUI: the -style option is deprecated! at C:/Perl/site/lib/Win32/GUI.pm line 276, <DATA> line 164.

Linie 276 das ist:
my $handle = Win32::GUI::Create($self, $type, @input);

im Sub:

sub _new {
# this is always Win32::GUI (class of _new):
my $xclass = shift;

# the window type passed by new():
my $type = shift;

# this is the real class:
my $class = shift;

my %tier;
my $oself = $tier{-OSELF} = {};
tie %tier, $class, $oself;
my $self = bless \%tier, $class;

# print "OSELF = $oself\n";
# print " SELF = $self\n";

my (@input) = @_;
# print "PM(Win32::GUI::_new) self='$self' type='$type' input='@input'\n";
my $handle = Win32::GUI::Create($self, $type, @input);

if($handle) {
return $self;
} else {
return undef;
}
}

Was ist falsch ?

Mirko

Schau mal dort: http://perl-win32-gui.sourceforge.net/cgi-bin...._05
Probier evtl. einfach mal:

Hallo,

vielen Dank für "tausender"-Punkte. Aber ich habe noch eine Frage.
Ich hab immer Error Outout:
Win32::GUI: the -style option is deprecated! at C:/Perl/site/lib/Win32/GUI.pm line 276, <DATA> line 164.

Linie 276 das ist:
my $handle = Win32::GUI::Create($self, $type, @input);

im Sub:

sub _new {
   # this is always Win32::GUI (class of _new):
   my $xclass = shift;

   # the window type passed by new():
   my $type = shift;

   # this is the real class:
   my $class = shift;

   my %tier;
   my $oself = $tier{-OSELF} = {};
   tie %tier, $class, $oself;
   my $self = bless \%tier, $class;

   # print "OSELF = $oself\n";
   # print " SELF = $self\n";

   my (@input) = @_;
   # print "PM(Win32::GUI::_new) self='$self' type='$type' input='@input'\n";
   my $handle = Win32::GUI::Create($self, $type, @input);

   if($handle) {
       return $self;
   } else {
       return undef;
   }
}

Was ist falsch ?

Mirko

Falsch ist direkt nichts. Du wirst daraufhin gewiesen das die "-style" Option deprecated ist. Sprich sie wird nicht mehr Supported und kann in einer nächsten version nicht mehr vorhanden sein. Was bedeutet das dein Programm dann nicht mehr laufen wird.

Du solltest schauen das du eine Alternative zu der "-style" Option gibt. Die Doku sollte da eigentlich immer genaueres zu sagen können.

*Aus zwei mach eins...*