![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с циклами. [D5, Win95/98]
Немировский Шурик © (2002-04-02 12:16:00){ Как при выполнении цикла в процедуре недожидаясь
окончания цикла и непрырывая его перейти к выполнению
следующей строки, допустим написать на Lable1. }
procedure Proc;
var
i: word;
begin
for i:=1 to 10000 do begin
Form1.Caption:=inttostr(i);
Application.ProcessMessages;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Proc;
Label1.Caption:="!!!!!!!!!!!!!!!!!!!!!!!!";
end;
С уважением Немировский Шурик.
Anatoly Podgoretsky (2002-04-02 13:11:00) [1]MBo © (02.04.02 12:39)
Так 1 апреля вообщето прошло.
Немировский Шурик (02.04.02 12:16)
Не мучайся, присвой в цикле или вызови отдельную процедуру.
Но только в любом случае "недожидаясь
окончания цикла и непрырывая его перейти к выполнению
следующей строки" не получится.
MBo (2002-04-02 12:39:00) [2]вызвать Button1Click
Digitman (2002-04-02 12:27:00) [3]>>"следующей строки"
Как это понимать ? "Следующий", "предыдущий", "текущий" - понятия относительные !
gek (2002-04-02 12:19:00) [4]использовать потоки