Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
if (edit1.text='123') and (edit2.Text='123') then
begin
 
 form2.Show   ;
 form1.hide ;
 edit1.Clear ;
 edit2.Clear;
  end
  else
  label1.Caption:=('merci de verifier vos données svp');
//ce message reste comment le faire disparaître apres 3 ou 4 sec
  end;