1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21
| adotable1.Active:=true;
adotable1.First;
if adotable1.locate('util;mot_pass',vararrayof(['''+eutil.text+''','''+emot_pass.text+''']),[]) then
begin
fichier1.Enabled:=true;
cons1.Enabled:=true;
edition1.Enabled:=true;
statistique1.Enabled:=true;
lnom_c.Visible:=false;
label1.Visible:=false;
Eutil.Visible:=false;
Emot_pass.Visible:=false;
lutilisateur.Visible:=false;
lmot_pass.Visible:=false;
bok.Visible:=false;
label2.Visible:=true;
end;
else
showmessage('le nom utilisateur n''existe pas'); |
Partager