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

Вниз

Мой метод Create скрывает виртуальный метод базового класса...   Найти похожие ветки 

 
SnapIn   (2004-12-09 06:15) [0]

Мой метод Create скрывает виртуальный метод базового класса TCustomForm. Почему?

public
 constructor Create(Owner: TCustomForm; iEditStatus: Integer = iAddState);
...

constructor TfmDialog.Create(Owner: TCustomForm; iEditStatus: Integer = iAddState);
begin
 inherited Create(Owner);
end;


еще в справке создание конструктора описывается с директивой override
если же я дописываю в объявлении override - выдается сообщение:
Объявление Create отличается от предыдущего объявления...


 
ЮЮ ©   (2004-12-09 07:07) [1]

>Объявление Create отличается от предыдущего объявления...

А почему оно отличается? Если Create у наследника виртуальный, значит это ему зачем-то понадобилось. Значит и параметры у контсруктора объекта-потомка должны быть те же, что и предка.

iEditStatus можно или сделать свойством, которое устанавливать после созжания обекта или Написать ещё один конструктор, например,  
 constructor CreateWithStatus(Owner: TCustomForm; iEditStatus: Integer = iAddState);
и уже его использовать в своих целях.

З.Ы. Компонент, небось, был унаследован от TControl, но создается только в RunTime?


 
KSergey ©   (2004-12-09 08:51) [2]

> public

constructor Create(Owner: TCustomForm; iEditStatus: Integer = iAddState);  reintroduce;


 
SnapIn   (2004-12-09 10:50) [3]

Спасибо всем за ответы!



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

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

Наверх




Память: 0.47 MB
Время: 0.03 c
1-1102503043
mefisto
2004-12-08 13:50
2004.12.26
Как передать сообщение своей программе с коммандной строки?


14-1102152210
_1008_
2004-12-04 12:23
2004.12.26
Первый шаг к победе.


14-1102186050
easy
2004-12-04 21:47
2004.12.26
Эксклюзив


3-1101714110
nstur
2004-11-29 10:41
2004.12.26
Как определить обязательное поле или нет?


14-1102013412
PurchaseDelphi
2004-12-02 21:50
2004.12.26
Где можно купить Лицензионную Delphi 3-6