Thread Farbe für jeden Eintrag in Optmenü einstellen: Tk (3 answers)
Opened by alexus-777 at 2004-07-01 09:13

Crian
 2004-07-02 17:16
#42264 #42264
User since
2003-08-04
5873 Artikel
ModeratorIn
[Homepage]
user image
Ich nehme an Du redest über Perl/Tk (edit: ja - steht im Titel :-) und meinst ein Radio-Button-Feld?!

Also sowas:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
my $f2 = $fo->Frame(-borderwidth => 3,
                    -relief      => 'groove',
                   )
             ->pack(-side        => 'right',
                    -expand      => 1,
                    -fill        => 'both',
                   );

my @streuselsorten = ('keine Streusel',
                      'Schokoladenstreusel',
                      'bunte Streusel',
                      'Krokantstreusel',
                      'Zartbitterabrieb',
                     );
my $streusel = 0;
for my $i (0..$#streuselsorten) {
    $f2->Radiobutton(-text     => $streuselsorten[$i],
                     -variable => \$streusel,
                     -value    => $i,
                    )
              ->pack(-anchor   => 'w');
}


Oder meinst Du Radiobuttons, die in ein Menü eingehängt wurden?\n\n

<!--EDIT|Crian|1088774278-->
s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

View full thread Farbe für jeden Eintrag in Optmenü einstellen: Tk