Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.09.23;
Скачать: CL | DM;

Вниз

остановка работы цикла   Найти похожие ветки 

 
новЫчек   (2007-08-31 14:34) [0]

по событию кнопки начинает работать цикл, скажем:
for i:=1 to 10000 do
begin
...
...
...
...
end;
и прога начинает работать оч долго, много данных считаеться, как по нажатию на другую кнопку остановить цикл?


 
Reindeer Moss Eater ©   (2007-08-31 14:36) [1]

Из цикла выходят по Break


 
Denis_ ©   (2007-08-31 14:37) [2]

application.ProcessMessages в цикле и переменную глоб. при нажатии на кн. пер=тру
если в цикле тру, то break
тупо конешно


 
TUser ©   (2007-08-31 14:49) [3]

Правильнее сделать отдельный поток с помощью класса TThread.


 
Jeer ©   (2007-08-31 14:55) [4]


> TUser ©   (31.08.07 14:49) [3]


Правильнее учитывать уровень спрашивающего и здесь [2] вполне адекватный совет.


 
Anatoly Podgoretsky ©   (2007-08-31 14:58) [5]

> новЫчек  (31.08.2007 14:34:00)  [0]

Остановить или прекратить?
Но по сути это почти одно и тоже


for i := A to B do begin
  if StopCondition then begin
    a := I;
    Break; // только куда и что далее делать
  end;
  ...
end;


 
Anatoly Podgoretsky ©   (2007-08-31 14:59) [6]

> Jeer  (31.08.2007 14:55:04)  [4]

Точно, только вот вопрос не адекватный, далеко не адекватный.


 
iXT ©   (2007-08-31 15:01) [7]

+ Note:
Break does not violate the flow of control dictated by a try..finally construct. If a break occurs inside the try clause, the finally clause is entered.


 
fd979 ©   (2007-08-31 15:29) [8]

Ко всему вышеперечисленному можно вместо for использовать while или repeat until


 
новЫчек   (2007-08-31 17:33) [9]


> Правильнее учитывать уровень спрашивающего и здесь [2] вполне
> адекватный совет.


то что я новичек в программировании не означит что я не хочу совершенствоваться


> Правильнее сделать отдельный поток с помощью класса TThread.


Спасибо, пошел копать инфу.

Всем спасибо за ответы!



Страницы: 1 вся ветка

Текущий архив: 2007.09.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.024 c
11-1171922028
Виталий*
2007-02-20 00:53
2007.09.23
Проблема с прозрачностью на ровном месте.


15-1187947154
sample01
2007-08-24 13:19
2007.09.23
Explorer


15-1187871209
Synset
2007-08-23 16:13
2007.09.23
Драйвера


15-1188072665
Kostafey
2007-08-26 00:11
2007.09.23
С днем рождения ! 26 августа


1-1184328518
ambhtr
2007-07-13 16:08
2007.09.23
Как проверить строку на заданый формат (шаблон)