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

NAME

Curses::Forms::Dialog::Logon - Curses Forms Logon Dialog

MODULE VERSION

$Id: Logon.pm,v 0.4 2002/11/04 01:06:56 corliss Exp corliss $

SYNOPSIS

        use Curses::Forms::Dialog::Logon;

  ($rv, $user, $pass) = logon('User Logon', BTN_OK | BTN_CANCEL, 
    20, qw(white red yellow));

REQUIREMENTS

Curses Curses::Widgets Curses::Forms Curses::Forms::Dialog

DESCRIPTION

Provides a single function to displaying system logon dialogs.

FUNCTIONS

logon

  ($rv, $user, $pass) = logon('User Logon', BTN_OK | BTN_CANCEL, 
    20, qw(white red yellow));

This function displays an input dialog with the specified title, buttons, and text fields. The following constants are defined for specifying buttons, and can be or'ed to provide multiple choices:

  BTN_OK
  BTN_CANCEL
  BTN_HELP

The remaining arguments is the max string length and the desired colours (foreground, background, and caption colour).

The return value of the dialog will be the index value of the chosen button, as one would normally recieve from the Curses::Widgets::ButtonSet widget, and the string value of the TextField widgets.

HISTORY

2002/10/10 -- Rewritten in OO form.

AUTHOR/COPYRIGHT

(c) 2001 Arthur Corliss (corliss@digitalmages.com)