Help for this page

Select Code to Download


  1. or download this
       $addRefdesListbox = $addRefdesFrame2->BrowseEntry(-variable=>\$sear
    +chString,
    -fg=> 'black',
    ...
    -browsecmd => sub{$addRefdesEntry->insert('end',$refdesMaxValue{$searc
    +hString}+1)},
    -listcmd=> \&doSearch,
    )->pack(-side=>'left');
    
  2. or download this
    $refdesListbox->see($addRefdesListbox->Subwidget('slistbox')->curselec
    +tion());
    
  3. or download this
    Tk::Error: wrong # args: should be ".toplevel.frame.frame.frame.frame.
    +frame1.frame.listbox see index" at C:/Perl/site/lib/Tk.pm line 228.
     Tk callback for .toplevel.frame.frame.frame.frame.frame1.frame.listbo
    +x
     [\&tepsTools::__ANON__]
     (menu invoke)