The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.


Tk::ObjEditorDialog - Tk composite widget obj editor popup dialog


  use Tk::ObjEditorDialog;
  my $editor = $mw->ObjEditorDialog( caller => $object, 
                                      direct => [1|0],
                                      [title=>"windows"]) ;

  $editor -> Show;


This widget is a ObjEditor within a DialogBox widget. I.e. it will appear in its own toplevel window when you invoke the Show() method like the FileDialog widget.

Constructor parameters

  • caller: The ref of the object or hash or array to edit (mandatory).

  • title: the title of the menu created by the editor (optional)

  • direct: Set to 1 if you want to perform direct edition.



As in Tk::DialogBox, this method displays the dialog box, until user invokes one of the buttons in the bottom frame. If the grab type is specified in grab, then Show uses that grab; otherwise it uses a local grab. Returns the name of the button invoked.


Like Tk::ObjScanner ObjEditor does not detect recursive data structures. It will just keep on displaying the tree until the user gets tired of clicking on the HList items.


Dominique Dumont.

Copyright (c) 2001 Dominique Dumont. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.


perl(1), Tk, Tk::HList, Tk::ObjScanner, Tk::ObjEditor, Tk::DialogBox