Um Befehle nur bei bestimmten Situation durchzuführen stehen uns zwei verschiedene Konstruktion zu Verfügung:
1. If (else)

In diesem Tuturial wollen wir auf "if" und "else" eingehen:
If-konstruktionen werden folgendermaßen gebildet:
if Bedingung then Befehl

Bedingungen können mithilfe der Vergleichsoperatoren gebildet werden, diese sind wie folgt:

= ... gleich
< ... kleiner
> ... größer
<> ... ungleich
<= .. kleinergleich
>= ... größergleich

Es können auch mehrere Bedingungen geprüft werden,
dazu verwenden wir "and" oder "or". Alerdings müssen diese Abfragen dann in runde Klammern () gesetzt werden. Verwenden wir "and" müssen beide Bedingungen erfüllt sein, bei "or" nur eine oder auch mehrere.

Wenn wir mehrer Befehle ausführen möchten, müssen wir diese zwischen "begin" nud "end;" setzen.

Beispiel:
procedure Button1click(Sender: TObject);
var
i: integer;
begin
if i<11 then begin
tform1.caption:=('Die Zahl ist niedriger als 11');
end
else if (i<=15) and (i>=10) then tform1.caption:=('Die Zahl ist größer als 9 und niedriger als 16')
else tform1.caption:=('Zahl ist größer als 15');
end;

In diesem Beispiel haben wir "if else" und "else" benutzt. Falls die Bedingung von "If" nicht erfüllt ist wird die Bedingung von "else if" geprüft, sollte keine Bedingung erfüllt sein kommt der Befehl "else" zum einsatz.
Vor einem "else" oder "else if" darf niemals ein Semikolon stehen!
Veröffentlicht on Thursday 8. May 2003 at 21:58
Tags: