CheckBox в Caption Column ListView

[Shouldercannon]

Доброго времени суток!
Задуманное получилось сделать на половину

procedure TForm1.FormCreate(Sender: TObject);
begin
CheckBox1.Parent := ListView1;
CheckBox1.Left := 0;
CheckBox1.Top := 0;
end;

Проблема: когда нажимаем на Caption самой первой колонки ListView, где находится CheckBox, то последний пропадает. Как решить эту проблему?

[Аватар]

И для чего это? ListView.CheckBoxes:=True и всех делов

[Shouldercannon]

Сообщение от Аватар

И для чего это? ListView.CheckBoxes:=True и всех делов

Для того, чтобы при клике по этому CheckBox были выделены/не выделены все CheckBox-сы в ListView

[Аватар]

Можно в заголовок не вставлять, а ориентироваться по значению Checked из первой строки. События на изменение Checked нет, придется свой WindowProc для ListView сделать. Даже примерчик нашел http://delphi.about.com/od/delphitip...iewchecked.htm

Или вообще заменить на CheckListBox