Registriert seit: 19. Apr 2007
Ort: Dresden
781 Beiträge
Turbo Delphi für Win32
|
Re: Break / Exit - Grundsatzfrage
19. Dez 2008, 11:30
Nehm eine while-Schleife und setz das, worauf du prüfst als Bedingung
Delphi-Quellcode:
begin
result := False;
i := 0;
while (not Result) and (i < (List.Count -1)) do
begin
inc(i);
Result := (Suchstring = List [i]);
end;
end;
Lars S. Wer nicht mit der Zeit geht, geht mit der Zeit.
|