Форум: "Основная";
Текущий архив: 2003.07.03;
Скачать: [xml.tar.bz2];
ВнизФорма тормозит... :( Найти похожие ветки
← →
Борис К. (2003-06-23 14:51) [0]Мастера, не подскажете как сделать чтобы при выполнении длительной процедуры копирования файла через интернет (и при считывании этих байтиков) форма не замерзала?
У меня сделано так:
Function Copy (...);
begin
...
Repeat
...
Application.ProcessMessages;
until (...)
end;
Как здесь можно побороть временное замерзание?
← →
Семен Сорокин (2003-06-23 14:54) [1]Application.ProcessMessages достаточно, но если какая-то из процедур долго выполняется уже в цикле, то это не поможет, здесь можно предложить тока использовать TThread
← →
Борис К. (2003-06-23 15:25) [2]Приведи плиз. пример TThread если есть.
← →
Семен Сорокин (2003-06-23 15:40) [3]type
tMyThread = class(tThread)
protected
procedure _Refresh;
procedure Execute; override;
end;
{ ------------------------------ tMyThread ------------------------------- }
procedure tMyThread._Refresh;
begin
// VCL - изменения
end;
procedure tMyThread.Execute;
begin
FreeOnTerminate := true;
// Твои длительные действия
Synchronize(_Refresh)
end;
А вообще TThread + F1 и в Demos"ах пример есть
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.07.03;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.136 c