Delphi ООП: Как изменить property?

Аллоха, All!
А я вот щас как сморожу очередную глупость:
Я хочу к компоненту TListView добавить фичу - свойство Visible к
колонкам.
Реализация скрытия уже давно готова, просто решил сделать себе
"красиво" :)
Требуется у TListView изменить в Columns(TListColumns) TListColumn:
Нужно добавить к TListColumn свойство Visible для последующей
проверки.
Вот тут-то и запарка:
Насколько я понимаю нужно во всех изменяемых классах последовательно
заменить упоминание TListColumns на TListColumns_ (мой класс) и
TListColumn на TListColumn_, но я столкнулся с проблемой:
procedure TCustomListView.SetListColumns(Value: TListColumns);
эта процедура описана в private и следовательно в моем модуле я ее не
вижу, а эта процедура как раз property и заведует.
Вопрос: как ее overrid-нуть?
Здравствуйте, Александр.
Вы писали 24 мая 2005 г., 1:04:09:
Модуль ComCtrls класс TCustomListView перенеси свойство куда надо, и
откомпиль заново проект.