Как передать управление другой процедуре?

[Lex]

Delphi.

В одной процедуре выполняется цикл - перебор символов в dbedit. При нахождении какого-то символа - например порбела, нужно передать управление другой процедуре, а цикл остановить.

Подскажите как??

Буду примного благодарен:)

[dmc]

В теле цикла вызывай другую процедуру, а после вызова ставь оператор "break".

[Shurr]

Для прерывания цикла существует команда break.

При нахождении символа вызови процедуру, а после вызова поставь break.

for i:=1 to N do if symbols[i] = ' ' then begin   DoSomething();   break; end;

Или заведи себе флаг и при нахождении символа установи его в true, затем сделай break. А вызов процедуры поставь после цикла с условием, что значение флага = true.

Success := false;for i:=1 to N do if symbols[i] = ' ' then begin   Success := true;   break; end;if Success then DoSomething();