|
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.201 Beiträge
Delphi 12 Athens
|
Re: repeat ... until
17. Mär 2004, 16:05
Delphi-Quellcode:
repeat
...
{writeln('Soll das und das gemacht werden? (j/n):');}
repeat
readln(a);
if (a <> 'j') and (a <> 'n') then writeln('Falsche Eingabe');
until (a = 'j') or (a = 'n');
until a = 'n';
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher. 
 my Delphi wish list : BugReports/FeatureRequests
|