Tags:
delphi
1) Hvilken kode skal man bruge, for at edit1.text skal være det samme som memo1.lines?
2) I denne kode:
begin
if Edit2.Text = Form3.Edit2.Text then begin
form2.Show
end
else
Showmessage('Forkert password');
Edit2.Text := '';
Edit2.Setfocus
end;
Hvordan får jeg den til at lukke form1 ned sammentidig med form2.show? Jeg kan jo ikke skrive 2 ting før 'end' ?
1 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 2 karma
1. Edit1.Text := Memo1.Text;
2. hehe jo du kan sagtens sætte ; ind efter hver linie, bare ikke ved end hvis du skal
have en else bagefter end
du kan ikke lukke form1 hvis form1 er din "main-form", så derfor har jeg valgt
form1.Hide, men hvis du bruger form2 som main-form så kan du godt indsætte
form1.close i stedet for
begin
if Edit2.Text = Form3.Edit2.Text then
begin
form2.Show;
form1.Hide;
end
else
Showmessage('Forkert password');
Edit2.Text := '';
Edit2.Setfocus;
end;
_______________________________________
-----------------------{ nife}------------------------_______________________________________
[Redigeret d. 09/04-04 01:08:40 af Nicolai Lyster Fersner]