The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

  SearchDialog.pm--Search Dialog Widget for Perl/Tk Text.

SYNOPSIS

  use Tk::SearchDialog;

  my $dialog = $mw -> SearchDialog;
  my @searchoptions = $dialog -> Show;

DESCRIPTION

The Tk::SearchDialog widget opens a dialog window that allows entry of search and/or replacement text, and the selection of search options.

The SearchDialog returns a list of ($option, $value) pairs (see below) when the user clicks the "Search!" button, and undef if the user clicks the "Cancel" button.

SEARCH OPTIONS

The SearchDialog returns a list with the following search specifications. All specifications are string scalar values. The '-option*' options are set to '1' when selected, and '0' or undef if not selected. Labels and titles are read-only.

-searchstring

-replacestring

-optioncase

-optionregex

-optionbackward

-optionquery

-entrylabel

-replacelabel

-optiontitle

-optcaselabel

-optregexlabel

-optbackwardlabel

-optquerylabel

-searchlabel

-cancellable

-accept

BUGS

Allow all option defaults to be set by the calling module. Should have some entry validation.

VERSION INFORMATION

$Id: SearchDialog.pm,v 0.43 2002/08/22 16:34:50 kiesling Exp $

Author: Robert Allan Kiesling <rkiesling@earthlink.net>