ePortal::HTML::Dialog

ePortal::HTML::Dialog is a widget for generating HTML code for Dialogs.
Download

ePortal::HTML::Dialog Ranking & Summary

Advertisement

  • Rating:
  • License:
  • Perl Artistic License
  • Price:
  • FREE
  • Publisher Name:
  • Sergey Rusakov
  • Publisher web site:
  • http://search.cpan.org/~rusakov/ePortal-4.5/lib/ePortal/HTML/Calendar.pm

ePortal::HTML::Dialog Tags


ePortal::HTML::Dialog Description

ePortal::HTML::Dialog is a widget for generating HTML code for Dialogs. ePortal::HTML::Dialog is a widget for generating HTML code for Dialogs.SYNOPSISThis module is used to make a dialog windows. All drawing methods returns the HTML in scalar or array context or output it with $m- >print in void context. # Typical example: < % $dlg- >dialog_start( title = > 'Dialog's title', width = > 400) % > < % $dlg- >field( "field1", RO = > 1) % > < % $dlg- >field( "hidden_field", hidden= >1) % > < % $dlg- >field( "field") % > < % $dlg- >row(' ') % > < % $dlg- >buttons(delete_button = > 1) % > < % $dlg- >dialog_end % > < p > < %method onStartRequest >< %perl > $obj = new ePortal::ThePersistent::SupportObject; $dlg = new ePortal::HTML::Dialog( obj = > $obj); my $location = try { $dlg- >handle_request( ); } catch ePortal::Exception::DataNotValid with { my $E = shift; $session{ErrorMessage} = $E- >text; ''; }; if ($dlg- >isButtonPressed('ok') { ... } return $location if $location; < /%perl >< /%method > %#=== @metags once ========================================================= < %once > my ($dlg, $obj); < /%once > %#=== @metags cleanup ========================================================= < %cleanup > ($dlg, $obj) = (); < /%cleanup >Requirements:· Perl


ePortal::HTML::Dialog Related Software