|
NAMEPrima::Dialog::FindDialog - wrapper module for Prima::Dialog::FindDialog and Prima::Dialog::ReplaceDialog to find and replace text. SYNOPSIS use Prima qw(Dialog::FindDialog Application);
my $dlg = Prima::Dialog::FindDialog-> create( findStyle => 0);
my $res = $dlg-> execute;
if ( $res == mb::Ok) {
print $dlg-> findText, " is to be found\n";
} elsif ( $res == mb::ChangeAll) {
print "all occurrences of ", $dlg-> findText,
" is to be replaced by ", $dlg-> replaceText;
}
DESCRIPTIONThe module provides two classes - Prima::Dialog::FindDialog and Prima::Dialog::ReplaceDialog; Prima::Dialog::ReplaceDialog is exactly same as Prima::Dialog::FindDialog except that its default findStyle property value is set to 0. One can use a dialog-caching technique, arbitrating between findStyle value 0 and 1, and use only one instance of Prima::Dialog::FindDialog. The module does not provide the actual search algorithm; this must be implemented by the programmer. The toolkit currently include some facilitation to the problem - the part of algorithm for "Prima::Edit" class is found in "find" in Prima::Edit, and the another part - in examples/editor.pl example program. Prima::HelpWindow also uses the module, and realizes its own searching algorithm. APIPropertiesAll the properties select the user-assigned values, except findStyle.
AUTHORDmitry Karasik, <dmitry@karasik.eu.org>. SEE ALSOPrima, Prima::Window, Prima::Edit, Prima::HelpWindow, examples/editor.pl
|