home *** CD-ROM | disk | FTP | other *** search
-
- {*******************************************************}
- { }
- { Delphi Visual Component Library }
- { }
- { Copyright (c) 1995 Borland International }
- { }
- {*******************************************************}
-
- unit DBPWDlg;
-
- {$S-}
-
- interface
-
- uses WinTypes, WinProcs, Classes, Graphics, Forms, Controls, StdCtrls,
- Buttons;
-
- type
- TPasswordDialog = class(TForm)
- GroupBox1: TGroupBox;
- Edit: TEdit;
- AddButton: TButton;
- RemoveButton: TButton;
- RemoveAllButton: TButton;
- OKButton: TBitBtn;
- CancelButton: TBitBtn;
- procedure EditChange(Sender: TObject);
- procedure AddButtonClick(Sender: TObject);
- procedure RemoveButtonClick(Sender: TObject);
- procedure RemoveAllButtonClick(Sender: TObject);
- procedure OKButtonClick(Sender: TObject);
- end;
-
- function PasswordDialog: Boolean;
-
- implementation
-