Скачать: CL | DM;

Как выйти из ступора?   Найти похожие ветки 

← →
burbuluc ©   (2008-11-17 19:11) [0]

Всем добрый вечер.
У меня простая задача:
Пусть есть форма, на которой две кнопки: button1 и button2. Обработчик первой выглядит примерно так:
Onbutton1Click
flag:=false;
fid:=filecreate....
for i:=1 to 1 000 000 (!!!)..
 filewrite(fid,buf,16)...
 if flag then break;
end;
Обработчик второй попроще:
Onbutton2Click...
flag:=true;

Но когда я запускаю эту прогу и нажимаю первую кнопку, я не могу нажать на вторую кнопку, чтобы остановить выполнение Onbutton1click. Вопрос: какие средства мне использовать, чтобы все кнопки и другие элементы управления получали данные от клавитатуры и мыши, а как я могу во время подобных затяжных процедур правильно - без тормозов - отображать разные тексты и прочее.
Заранее благодарен.

---

← →
Германн ©   (2008-11-17 19:31) [1]

1. Application.ProcessMessages
2. TThread

---

← →
burbuluc ©   (2008-11-17 20:16) [2]

2 Германн. (Application.ProcessMessages)
Огромное спасибо. Я знал, но забыл ;-)
Ещё раз спасибо.

---

← →
KilkennyCat ©   (2008-11-17 23:02) [3]

только вставляй не в каждую итерацию.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.007 c