Opened by zipster at 2006-01-31 16:08
User since
2004-09-06
458 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2004-09-06
458 Artikel
BenutzerIn
Fürs ganze Main Window brauche ich es aber nicht.
Ich bräuchte es nur für eins oder zwei Notebooks.
Hab versucht ihn bei mir einzubauen. Hat aber leider nicht so funktioniert.
Kannst du mir vieleicht weiterhelfen?
Ich bräuchte es nur für eins oder zwei Notebooks.
Hab versucht ihn bei mir einzubauen. Hat aber leider nicht so funktioniert.
Kannst du mir vieleicht weiterhelfen?
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
...
my $w = $hauptfenster->NoteBook()->grid();
...
my $page8 = $w->add("page8", -label=>'Zusatzleistung');
...
my $gruppenfeld1 = $page8->LabFrame(-label => "Zimmer", -labelside => "acrosstop");
...
my $gruppenfeld6 = $page8->LabFrame(-label => "Sontiges", -labelside => "acrosstop");
$gruppenfeld1->Checkbutton(-text => "Großes Zimmer (<16,5m²)",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Kühlschrank anschließen",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Kühlschrank leihen",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Fernseher an die Antennenanlage mit SAT anschließen",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Fernseher Leihgerät",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Telefon amtsberechtigt",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
$gruppenfeld1->Checkbutton(-text => "Telefongebühren je Einheit",
-variable => \my $erste_telefonnummer,)->grid( -sticky => "w");
....
my ($columns, $rows) = $page8 -> gridSize();
for (my$i = 0; $i < $columns; $i++) {
$page8 -> gridColumnconfigure($i, -weight => 1);
}
for (my$i = 0; $i < $rows; $i++) {
$page8 -> gridRowconfigure($i, -weight => 1);
}
$gruppenfeld1->grid(
$gruppenfeld2,
$gruppenfeld3);
$gruppenfeld4->grid(
$gruppenfeld5,
$gruppenfeld6);
....
