Sehr Umfangreiche Webseite zum Programmieren in C Perl CGI, Skripting, Linux, SystemprogrammierungPerl Perl Kurs Skripting Tk-Modul use Tk; Tcl/Tk Checkbutton Radiobutton Listbutton Tk Checkbutton Radiobutton Listbutton Steuerelement Perl Skript Tk-Modul Tk use Tk Perl mit dem Tk-Modul Teil 7

Steuerelemente - Checkbutton Radiobutton Listbutton           zurück zum Inhaltsverzeichnis

Damit sich dieser Kurs etwas kürzer und kompakter haltet, folgen jetzt gleich 3 Steuerelemente auf einmal durch. Und zwar Checkbutton, Radiobutton und Listbox ...

#! /usr/bin/perl -w

use strict;
use Tk;

my $main = MainWindow->new;

my $check1=$main->Checkbutton(-text => "Kontrollkästchen 1")->pack;
my $check2=$main->Checkbutton(-text => "Kontrollkästchen 2")->pack;

my $radio1=$main->Radiobutton(-text => "Optionsfeld 1" )->pack;
my $radio2=$main->Radiobutton(-text => "Optionsfeld 2")->pack;

my $liste=$main->Listbox(-relief => 'sunken',
                         -width => -1, # Shrink to fit
                         -height => 5,
                         -setgrid => 1);
my @elemente = qw(Teil1 Teil2 Teil3 Teil4 Teil5);
foreach (@elemente) {
    $liste->insert('end', $_);
    }
$liste->pack;

MainLoop;

So siehts aus (Linux/Unix):

Steuerelement Checkbutton Radiobutton Listbutton Linux/Unix

So siehts aus (MS Windows):

Steuerelement Checkbutton Radiobutton Listbutton MS Windows

Hier nun erst mal wie Sie die einzelnen Methoden einsetzen können. Sie merken allmählich schon, dass sich die Kapitel im Prinzip immer wieder wiederholen.