![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как выйти из ступора?
burbuluc © (2008-11-17 19:11:00)Всем добрый вечер.
У меня простая задача:
Пусть есть форма, на которой две кнопки: 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. Вопрос: какие средства мне использовать, чтобы все кнопки и другие элементы управления получали данные от клавитатуры и мыши, а как я могу во время подобных затяжных процедур правильно - без тормозов - отображать разные тексты и прочее.
Заранее благодарен.
KilkennyCat (2008-11-17 23:02:00) [1]только вставляй не в каждую итерацию.
burbuluc (2008-11-17 20:16:00) [2]2 Германн. (Application.ProcessMessages)
Огромное спасибо. Я знал, но забыл ;-)
Ещё раз спасибо.
Германн (2008-11-17 19:31:00) [3]1. Application.ProcessMessages
2. TThread