Текущий архив: 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.47 MB
Время: 0.041 c
