Einzelnen Beitrag anzeigen

Klaus01

Registriert seit: 30. Nov 2005
Ort: München
5.768 Beiträge
 
Delphi 10.4 Sydney
 
#7

Re: if Klausel: Wort für "aktiv"?

  Alt 1. Dez 2008, 14: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
  Mit Zitat antworten Zitat