Registriert seit: 30. Nov 2005
Ort: München
5.780 Beiträge
Delphi 10.4 Sydney
|
Re: if Klausel: Wort für "aktiv"?
1. Dez 2008, 13:58

Zitat von nixalsverdruss:
Hey,
ich hab noch ein Problem zu if-Klauseln: Wie schreibe ich: "wenn das und das nicht im Editfeld eingetragen wurde, dann das und das machen"? Also wenn etwas richtig eingetragen wurde passiert etwas. Das habe ich so gelöst:
Delphi-Quellcode:
procedure TForm15.Button1Click(Sender: TObject);
begin
if (edit1.Text= 'Grotvadder') and (edit2.Text= 'lääwt') then Form16.Show;
if (edit1.Text= 'Grotvadder') and (edit2.Text= 'lääwt') then close;
Danke schon mal im Voraus
nixalsverdruss
Delphi-Quellcode:
procedure TForm15.Button1Click(Sender: TObject);
begin
if (edit1.Text= 'Grotvadder') and not (edit2.Text= 'lääwt') then Form16.Show;
if (edit1.Text= 'Grotvadder') and not (edit2.Text= 'lääwt') then close;
oder
Delphi-Quellcode:
procedure TForm15.Button1Click(Sender: TObject);
begin
if (edit1.Text= 'Grotvadder') and (edit2.Text <> 'lääwt') then Form16.Show;
if (edit1.Text= 'Grotvadder') and (edit2.Text <> 'lääwt') then close;
Grüße
Klaus
Klaus
|
|
Zitat
|