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

Вниз

Thread?   Найти похожие ветки 

← →
aglar   (2004-09-18 10:24) [0]

Вот кусок кода:

if Speedbutton1.Hint = "Найти" then
   begin
   Speedbutton1.Glyph.LoadFromFile("New.bmp");
   Speedbutton1.Hint:="Новый поиск";
   MaskEdit1.Enabled:=false;
   MaskEdit2.Enabled:=false;
   Label4.Caption:=Поиск допустимых значений из" ;
   Label5.Caption:="диапазона " + MaskEdit1.Text + " >< "+ MaskEdit2.Text+" ...";
   try
     process(MaskEdit1.Text, MaskEdit2.Text);
     label5.Caption:=Label5.Caption+"Ok";
   finally
   end;
 end{if}
---

После нажатия на такую кнопку сначала должны лейбелы получиться свои значения, после чего выхолняется процедура process, однако и надписи на лейбелах, и битмап на кнопке меняется только после окончания выполнения всех процедуры. Предполагаю что здесь нужны thread"ы, однако никогда с ними не работал. Есть ли другое решение вопроса, если нет, будьте добры пример со thread"ом. Спасибо.

---

← →
Alx2 ©   (2004-09-18 10:28) [1]

Вставь Application.ProcessMessages перед process(...)

---

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

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

Наверх

Память: 0.46 MB
Время: 0.047 c