Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как выйти из ступора?


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


Наверх

Титульная страница Поиск, карта сайта Написать письмо