Schrift
[thread]5325[/thread]

Tk Listbox und Textfenster: listboxelement in textbox einfügen



<< >> 5 Einträge, 1 Seite
tricipitinus
 2007-06-03 18:16
#46410 #46410
User since
2007-06-03
6 Artikel
BenutzerIn
[default_avatar]
hi!

ich habe 2 Textfenster und eine Listbox.
ich habe es bereits geschafft, markierten text aus dem textfeld 1 in die listbox zu üebrtragen

Code: (dl )
1
2
3
sub wb { my $val = $textIN->getSelected; 
$listbox->insert(0,$val);
}


nun würde ich aber gerne einen markierten eintrag der listbox in die 2. textbox übertragen, und zwar am ende bzw. an der aktuellen cursorposition.

habe es mal so versucht:
Code: (dl )
1
2
3
sub auswahl { my $val2 = $listbox->getSelected;
$textOUT->insert (0,$val2);
}

das haut aber nicht hin - kann mir jemand einen guten tipp geben? =)
Gast Gast
 2007-06-03 20:39
#46411 #46411
du musst anstatt

Code: (dl )
$textOUT-> insert (0,$val2);


diesen code benutzen:

Code: (dl )
$textOUT-> insert ('end',$val2);
tricipitinus
 2007-06-03 20:48
#46412 #46412
User since
2007-06-03
6 Artikel
BenutzerIn
[default_avatar]
ahh...ich habs schon mal mit end versucht, aber ohne apostroph!

danke!!
Gast Gast
 2007-06-03 20:51
#46413 #46413
außerdem glaube ich, dass der befehl bei der listbox nicht

Code: (dl )
$val2 = $listbox->getSelected;


heißt, sondern

Code: (dl )
$val2 = $listbox->get (active);
renee
 2007-06-03 21:03
#46414 #46414
User since
2003-08-04
14371 Artikel
ModeratorIn
[Homepage] [default_avatar]
mit
Code (perl): (dl )
my @elements = $listbox->curselection
kann man auch arbeiten.
OTRS-Erweiterungen (http://feature-addons.de/)
Frankfurt Perlmongers (http://frankfurt.pm/)
--

Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
Perl-Entwicklung: http://perl-services.de/
<< >> 5 Einträge, 1 Seite



View all threads created 2007-06-03 18:16.