home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / cb / setup / cbuilder / data.z / DBLOGDLG.INT < prev    next >
Text File  |  1997-02-28  |  1KB  |  37 lines
  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Delphi Visual Component Library                 }
  5. {                                                       }
  6. {       Copyright (c) 1995,96 Borland International     }
  7. {                                                       }
  8. {*******************************************************}
  9.  
  10. unit DBLogDlg;
  11.  
  12. {$P+}
  13.  
  14. interface
  15.  
  16. uses SysUtils, Windows, Messages, Classes, Graphics, Controls,
  17.   Forms, StdCtrls, ExtCtrls;
  18.  
  19. type
  20.   TLoginDialog = class(TForm)
  21.     Panel: TPanel;
  22.     Bevel: TBevel;
  23.     DatabaseName: TLabel;
  24.     UserName: TEdit;
  25.     Password: TEdit;
  26.     OKButton: TButton;
  27.     CancelButton: TButton;
  28.   end;
  29.  
  30. function LoginDialog(const ADatabaseName: string;
  31.   var AUserName, APassword: string): Boolean;
  32.  
  33. function LoginDialogEx(const ADatabaseName: string;
  34.   var AUserName, APassword: string; NameReadOnly: Boolean): Boolean;
  35.  
  36. implementation
  37.