Anfrage an die FAQ: Grundsätzliches TK-Problem - #46330 (Graphische Oberflächen)

styx-cc

2007-05-19 17:33

User since
2006-05-20
533 Artikel
BenutzerIn

user image

Damit er dir das splittet und untereinander anzeigt kannste die activate(); wie folgt umbauen:

Code: (dl )

sub activate {
    my ($liste, $listbox_ref) = @_;

    my $string = $entry1->get();
    $string = reverse($string) if ($text eq 'rückwärts');
    my @string = split/ /,  $string;
    @$listbox_ref[$liste]->insert('end', "$_") for (@string);
}

und um eine Listbox zu leeren nimmste:

Code: (dl )

$listbox->delete(index1,index2)

vielleicht geht auch:

Code: (dl )

$listbox->deleteAll();

Steht aber auch alles in der Tk::Listbox - Doku : -)

MfG

Pörl.