Registriert seit: 7. Jun 2002
Ort: Kirchheim unter Teck
1.036 Beiträge
Delphi 7 Personal
|
7. Mai 2003, 15:42
Würde auch mit ELSE gehen:
Delphi-Quellcode:
1 While Z = B Do
2 Begin
3 If Z = X then ... [hier muss ein Befehl der nur ausgeführt wird wenn z =X (ohne ; am ende)]
else
begin
4
...
15 End; //(else)
16 END; //(for)
bzw. in diesem fall einfach mit NOT:
Delphi-Quellcode:
1 While Z = B Do
2 Begin
3 If not(Z = X) then
begin // jetzt die befehle ...
4
...
15 End; //(if)
16 END; //(for)
Roman Keller Krieg ist Gottes Art den Amerikanern Geographie beizubringen!
|