Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.13;
Скачать: CL | DM;

Вниз

Еще нужна помощь мастеров!   Найти похожие ветки 

 
ProtoSoft ©   (2002-11-27 19:19) [0]

Есть такая трабла, с тем же THRead другого потока.
Функция, которую я запускаю в отдельном потоке сканирует каталоги на диске, собирает инфо о файлах и т.д., если я ее в процедуре execute запускаю свою функция с помощью
...
procedure TScanDir.Execute;
begin
Synchronize(DoScanProc);
end;

procedure TScanDir.DoScanProc;
begin
ScanDirThRead; //Моя функция
end;

Все работает хорошо абсолютно, вот только мое окно "мертвое", пока не закончится выполняться поток.

А если я убираю Synchronize() и втыкаю без него, все работает ОК, окно "живое", но все ОК пока не закончится процедура ScanDirThRead, затем возникает ошибка, что-то там OS critical error или что-то вроде этого.
Поможите плз, с меня пиво!


 
©   (2002-11-27 19:31) [1]

ответ очевиден
в случае Synchronize(DoScanProc); DoScanProc выполняется в основном потоке, вешая твою прогу.

да и зачем Synchronize нужен, если DoScanProc использует VCL и не обработывает мессаги?


 
ProtoSoft ©   (2002-11-27 20:16) [2]

k Мне нужно, чтоб мое окно статуса работодабельное было! Чтоб я его мог переместить, установить другие параметры и т.д.


 
Cobalt ©   (2002-11-27 21:42) [3]

Создавай для потока отдельный метод без параметров (в кач-ве их можно использовать поля TThread) типа DrawChanges, в котором будешь обращаться к форме и прочим контролам. И когда надо(только отрисоваться и т.п.), вызывай Synchronize(DrawChanges);
Можно несколько методов сделать, главное, чтоб без входных параметров


 
ProtoSoft ©   (2002-11-27 23:02) [4]

//Cobalt
//Создавай для потока отдельный метод без параметров (в кач-ве их можно использовать поля TThread) типа DrawChanges, в котором будешь обращаться к форме и прочим контролам. И когда надо(только отрисоваться и т.п.), вызывай Synchronize(DrawChanges);
Можно несколько методов сделать, главное, чтоб без входных параметров

А можно поподробней, честно говоря я не совсем понял, а если еще пример, то вообще ОК.

Да если хочешь я могу кинуть тебе вырезку из моего кода, как я все это делаю. Мыль на мыло, я тебе вышлю исходник



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

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

Наверх




Память: 0.48 MB
Время: 0.019 c
7-37402
Dron_fox
2002-11-01 09:06
2003.01.13
Form+DLL 2


6-37257
RV
2002-11-14 13:44
2003.01.13
Почему WebBrowser1.ReadyState = READYSTATE_COMPLETE раньше,


4-37470
Дед Анвирыч
2002-11-27 10:01
2003.01.13
MCI - Video Capture


3-36955
Mr.Hunter
2002-12-18 09:10
2003.01.13
Быть InterBase или не быть, вот в чем вопрос!


1-37110
malkolinge
2003-01-04 11:19
2003.01.13
DFM ?