Boite de dialogue mot de passe

Fermé
laamamel Messages postés 163 Date d'inscription mercredi 26 octobre 2011 Statut Membre Dernière intervention 1 avril 2015 - 3 mars 2014 à 10:07
Bonjour,

svp , je voudrais créer une boite de dialogue qui a un label user et password pour accéder à l'interface principale d'un projet créer par Delphi 7 sachant que ma table user est créer avec Access 2007 càd que j'ai créer une table user avec des attributs user et password

mais je ne sais pas comment créer cette boite de dialogue
voilà ce que j'ai fait dans ma fiche .

unit u_mot_passe;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Buttons, DBCtrls, Mask, DB, ADODB, ComCtrls;

type
Tfrm_mot_passe = class(TForm)
DBEdit1: TDBEdit;
DBEdit2: TDBEdit;
BitBtn1: TBitBtn;
ADOConnection_mot: TADOConnection;
ADOTable_mot: TADOTable;
DataSource_mot_passe: TDataSource;
BitBtn2: TBitBtn;
Label1: TLabel;
Label2: TLabel;
DateTimePicker1: TDateTimePicker;
procedure BitBtn1Click(Sender: TObject);
private
{ Déclarations privées }
public
{ Déclarations publiques }
end;

var
frm_mot_passe: Tfrm_mot_passe;

implementation
uses u_principal;
{$R *.dfm}

procedure Tfrm_mot_passe.BitBtn1Click(Sender: TObject);
begin
frm_principale.show;
end;

end.

j'espère que vous avez compris ma question et merci
j'ai vraiment besoin d'aide
j'attends une réponse.