ePortal::HTML::DialogePortal::HTML::Dialog is a widget for generating HTML code for Dialogs. | |
Download |
ePortal::HTML::Dialog Ranking & Summary
Advertisement
- 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