Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];
ВнизРабота с циклами. Найти похожие ветки
← →
Немировский Шурик (2002-04-02 12:16) [0]{ Как при выполнении цикла в процедуре недожидаясь
окончания цикла и непрырывая его перейти к выполнению
следующей строки, допустим написать на 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;
С уважением Немировский Шурик.
← →
gek (2002-04-02 12:19) [1]использовать потоки
← →
Digitman (2002-04-02 12:27) [2]>>"следующей строки"
Как это понимать ? "Следующий", "предыдущий", "текущий" - понятия относительные !
← →
MBo (2002-04-02 12:39) [3]вызвать Button1Click
← →
Anatoly Podgoretsky (2002-04-02 13:11) [4]MBo © (02.04.02 12:39)
Так 1 апреля вообщето прошло.
Немировский Шурик (02.04.02 12:16)
Не мучайся, присвой в цикле или вызови отдельную процедуру.
Но только в любом случае "недожидаясь
окончания цикла и непрырывая его перейти к выполнению
следующей строки" не получится.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.04.15;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.007 c