Thread Nochmal Subwidget (5 answers)
Opened by pktm at 2007-03-13 18:24

pktm
 2007-03-14 01:49
#46267 #46267
User since
2003-08-07
2921 Artikel
BenutzerIn
[Homepage]
user image
[quote=ptk,13.03.2007, 23:38]1: $widget->children()
2: $child->parent()[/quote]
Probier mal folgenden Code:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
#!/Perl/bin/perl

use strict;
use warnings;
use Data::Dumper qw/Dumper/;
use Perl6::Say;
use Tk;
use Tk::Pane;

my $mw = Tk::MainWindow->new();

my $sf = $mw->Scrolled(
'Frame',
-scrollbars => 'se',
-bg => 'green',
)->pack();

my $wasmussichhiereinsetzen = 'frame'; # ???
say ref $sf->Subwidget($wasmussichhiereinsetzen);

$mw->MainLoop();


Ich bekomme das Frame nicht.
Eventuell stehe ich ja auch mit dem Namen auf der Leitung.
Tk::Frame, Tk::Pane, Frame, Pane, .frame und frame bringen kein Ergebnis.
http://www.intergastro-service.de (mein erstes CMS :) )

View full thread Nochmal Subwidget