Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

вызвать property класса-родителя [D5, 2000]

Yaro © (2006-07-02 18:23:00)
Добрый день!

проблема такая:
есть класс-родитель "TCustomGrid", есть класс-потомок, "TMyCustomGrid"
у класса-родителя есть property:
property RowCount: Longint read FRowCount write SetRowCount default 5;
в классе-потомке реализуется новая имплементация этого метода.
property RowCount: Longint read FRowCount write SetRowCount default 5;

Вопрос:

как из НОВОГО метода SetRowCount
вызвать старый метод с параметрами, если он в классе-родителе находится в секции Private?

или

как из НОВОГО метода SetRowCount
вызвать старый property?

yaro (2006-07-02 18:51:00) [1]
Leonid Troyanovsky
громаднейщее спасибо!
(Даже в хелпе про это написано)
А я дурак... ну да ладно.
Хорошо, что не перевелись еще хорошие люди!

Всем пока.

yaro (2006-07-02 18:44:00) [2]
PSPF2003
Лучше бы не фигню писал, а помог. а то толку нет от твоей писанины.

Да, опечатался немного: класс-родитель НЕ "TCustomGrid", а "TStringGrid"

Очень не хочется изменять имя НОВОГО property. если менять имя, то выглядеть это будет так:
1. описываеам property RowCount в секцию ПРИВАТ класса-потомка, тем самым скрывая его
2. описываем новый property NewRowCount, который спокойно обращается к старому property.

проблема в том, что не хочется изменять имя НОВОГО property. на то есть причины:
1. мой класс много где использется (далеко не в одном проэкте)
2. действия необходимы для исправления одного бага, связанного и изменением длинны динамического массива при изменении количества строк в таблице.

Leonid Troyanovsky (2006-07-02 18:39:00) [3]

> yaro (02.07.06 18:32) [2]

> мне необходимо выполнять кое-какие действия при изменении
> размера таблицы!!!

TCustomGrid.SizeChanged

--
Refards, LVT.

PSPF2003 (2006-07-02 18:37:00) [4]

> ЛЮДИ ПОМОГИТЕ!!!!!!!!!!!!!!!!!!!

Кричи громче может услышат :)))

> в НОВОЙ процедуре SetRowCount, ошибки не выдает, но ничего
> не делает.

А что он должен делать ?

yaro (2006-07-02 18:35:00) [5]
пытаюсь делать так:
inherited RowCount := Value;

в НОВОЙ процедуре SetRowCount, ошибки не выдает, но ничего не делает.

yaro (2006-07-02 18:32:00) [6]
Надо, причем срочно!!!!!
мне необходимо выполнять кое-какие действия при изменении размера таблицы!!!
ЛЮДИ ПОМОГИТЕ!!!!!!!!!!!!!!!!!!!

PSPF2003 (2006-07-02 18:28:00) [7]
А зачем тебе такие извращения?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »