[BiG-BennY]

Hallo Forumianer,

ich hab ein Problem bei meiner IF-Schleife in Delphi 7!
So sieht mein Code aus -

  IF Zahl2 = 0
		THEN Edit2.Font.Size := 20;
			 Edit2.Font.Color:=ClRed;
			 Edit2.Text := 'Fehler! Division durch 0!';
		//ELSE Label5.Caption := FloatToStr ( Zahl1 / Zahl2 );
	  end;

Wie mach ich das, dass auch die zweite und dritte Anweisung zu dem THEN gehört?
Bei mir macht er nach der ersten ( Size ) weiter, als wäre die IF schleife vorbei.

Und wenn ich die ELSE Schleife einfüge verlangt er von mir anstelle des ELSE ein END.

Nun ist meine Frage was ich falsch mache?

mfG
Benny

Dieser Beitrag wurde von BiG-BennY bearbeitet: 25. Februar 2009 - 20:51

[tavoc]

Wie wärs denn mit einem Begin end Block?

z.b.

IF (Zahl2 = 0) THEN 
Begin
			Edit2.Font.Size := 20;
			Edit2.Font.Color:=ClRed;
			Edit2.Text := 'Fehler! Division durch 0!';
end;
ELSE 
			Label5.Caption := FloatToStr ( Zahl1 / Zahl2 );

Dieser Beitrag wurde von tavoc bearbeitet: 25. Februar 2009 - 20:40

[BiG-BennY]

Vielen Dank!

Funktioniert nun und wieder etwas dazugelernt!

mfG
Benny

ps. Wieder ein Schritt näher am perfekten Rechner

Dieser Beitrag wurde von BiG-BennY bearbeitet: 25. Februar 2009 - 20:44

[mibtng]

Nur mal so am Rande: IF/THEN/ELSE hat nichts mit Schleifen zu tun. Es gibt keine IF-Schleife. Eine Schleife ist etwas sich wiederholendes, was wiederholt sich denn beim IF?