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

Вниз

Наследники   Найти похожие ветки 

 
webpauk   (2005-03-05 14:03) [0]

Можеть ли функция быть inherited;

Tcontrol = class
public
  function F: Boolean; virtual;
end;

TCControl = class(TControl)
public
  function F: Boolean; override;
end;


function TCControl.F: Boolean;
begin
 inherited;
 - ошибка
end;


 
webpauk   (2005-03-05 14:08) [1]

Точнее

function TCControl.F: Boolean;
begin
Result:=... or inherited;
 - ошибка
end;


 
MU   (2005-03-05 14:14) [2]

function TCControl.F: Boolean;
begin
Result:=... or inherited F;
end;


 
begin...end ©   (2005-03-05 14:15) [3]

> webpauk   (05.03.05 14:08) [1]

> Result:=... or inherited

Result := ... or inherited F

P.S. Использование имён стандартных классов (TControl) для наименования своих классов когда-нибудь плохо кончится.



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

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

Наверх




Память: 0.47 MB
Время: 0.029 c
4-1102351819
maxistent
2004-12-06 19:50
2005.03.20
ПРО МОДЕМ


3-1108493039
mefisto
2005-02-15 21:43
2005.03.20
Правильная инсталяция Oracle 8i (2)


14-1109698606
Nikolay(DW)
2005-03-01 20:36
2005.03.20
Поместить в орешник :)


3-1108621132
Denmin
2005-02-17 09:18
2005.03.20
Как запретить Append в таблице?


6-1106013209
Cryon
2005-01-18 04:53
2005.03.20
Определить IP клиента pop3 сервера (Indy)