Потоки и CriticalSection

[vladimir0108]

Написал свой класс. Есть процедура прорисовки RedrawItem.

TMyList = class(TCustomControl)
public
RedrawItem(...);
...
procedure RedrawItem(...);
begin
CriticalSection.Enter;
...
CriticalSection.Leave;
end;

Прорисовка происходит по нажатию мышой и в отдельном потоке. Так вот, если одновременно происходит прорисовка в потоке и происходит нажатие мышой, то появляется ошибка. Вопрос - почему? Ведь прорисока находится в критической секции

[Человек_Борща]

у нажатия мышки и у потока разные обработчики. И слекдовательно в потоке юзается крит. секция а в нажатии мышкой - нет.

И где инициализация и финализация крит.секции?

Не проще ли сделать перерисовку в отдельном методе с исп. крит секций. А затем этот метод использовать и в нажатии мышкой и в потоке.

[vladimir0108]

Инициализация и финализация крит.секций в конструкторе и деструкторе класса соответственно.

Что значит в отдельном методе?

[Человек_Борща]

ок:

var
  CS:TCriticalSection; 

implementatation

{Общий метод класса....}
procedure TmySomeClass.SimpleGeneralMethod; 
begin
CS.Enter;
..
CS>Leave;
end;

{Модуль потока}

procedure TThreadObj.OnExecute;
begin
mySomeClass.SimpleGeneralMethod;
end;

{Модуль форм}

procedure TForm.ButtonClick(Sender: TObject);
begin
mySomeClass.SimpleGeneralMethod;
end;

Смысл ясен?

[veniside]

> TCustomControl

работа с любым VCL контролом должна происходить только в главном потоке.
Отсюда выводы:

1) Критическая секция до лампочки
2) про Synchronize() не забываем