Главная страница
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.025 c
1-1110130168
Checist [root]
2005-03-06 20:29
2005.03.20
TTreeView


3-1108636507
msguns
2005-02-17 13:35
2005.03.20
Изменение имени IB-процедуры в IBExpress


14-1109439817
Местный
2005-02-26 20:43
2005.03.20
Возможно ли восстановить файлы, если отформатировал диск???


4-1107249743
Bez
2005-02-01 12:22
2005.03.20
Отрисовывание компонентов в стиле ХР


1-1109749428
tmpGuest
2005-03-02 10:43
2005.03.20
Как пропустить поиск в определенных каталогах ?