Главная страница
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.044 c
1-1102656677
onix
2004-12-10 08:31
2004.12.26
локальный вход


1-1102927057
Руслана
2004-12-13 11:37
2004.12.26
Подскажите как удалить файл с аттрибутами ReadOnly?


9-1093282124
Creep
2004-08-23 21:28
2004.12.26
Как ввести в игру свой шрифт? Стандартными средствами Delphi7.


8-1096004030
Submarine
2004-09-24 09:33
2004.12.26
Проблема с видеозахватом...


14-1102182152
ArMellon
2004-12-04 20:42
2004.12.26
У меня стоит Apache , как виртуальным хостам