Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: How can I get the index of the currently selected Tk::BrowseEntry element?

by glenn (Scribe)
on Jan 24, 2014 at 22:57 UTC ( [id://1072008]=note: print w/replies, xml ) Need Help??


in reply to How can I get the index of the currently selected Tk::BrowseEntry element?

Just to set the text within:
$dropdown->Subwidget("entry")->Subwidget("entry")->configure(-text=>"F +irst");
Use WidgetInspection to look into widgets
use Tk; sub WidgetInspection { my $widget = $_[0]; foreach my $secret ( ['SubWidget' => "Advertised Subwidgets"], ['Delegates' => "Delegated Methods"], ['Configure' => "configure( ) Options"], ['ConfigSpecs' => "Configure Specifications"], ) { printf "\n%-11s - %s\n", $secret->[0], $secret->[1]; foreach my $class (keys %{$widget->{$secret->[0]}}) { printf "%20s: %31s\n", $class, $widget->{$secr +et->[0]}->{$class}; } } } my $mw = MainWindow->new(); my $obj = $mw->BrowseEntry(-label=>"test")->pack(); WidgetInspection($obj); MainLoop;

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1072008]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others perusing the Monastery: (4)
As of 2024-03-19 10:57 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found