Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > виртуальные методы в паскале

Автор: AgereS 20.8.2004, 15:44

можно-ли в паскале сделать так как в дельфи, т.е.

есть объект:

Код


TObject = object
procedure Set(X: integer); virtual;
end;

а в объекте потомке мы этот метод переопределяем:

Код


TOtherObject = object(TObject)
procedure Set(str_: string); virtual;
end;

я слышал про overload, подойдет ли оно ?

Автор: Pakshin A. S. 20.8.2004, 22:23

Использование virtual проходит точно и работает всегда хорошо, а вот про overload нечего не сказано.

Поступить можно проще: попробовать методом научного тыка, т. е. упоребить overload и посмотреть на реакцию компилятора.

Автор: Vit 20.8.2004, 23:02

Код

TOtherObject = object(TObject)
  procedure Set(str_: string); virtual; overload;
  procedure Set(X: integer); virtual; overload;
end;


procedure  TOtherObject.Set(str_: string); 
begin
  Showmessage(str_);
end;

procedure  TOtherObject.Set(X: integer); 
begin
  Showmessage(Inttostr(X));
end;

Автор: <Spawn> 20.8.2004, 23:42

Кхм, странно, но когда в этом году мы в инсте проходили Паскаль, то оказалось, что перезагрузки там нет. Может только в поздних версиях?

Автор: AgereS 23.8.2004, 14:37

всем спасибо. указанные замезания учту.

Автор: Петрович 24.8.2004, 00:52

Цитата(Vit @ 20.8.2004, 23:02)

TOtherObject = object(TObject)
procedure Set(str_: string); virtual; overload;
procedure Set(X: integer); virtual; overload;
end;

А мой BP7 ругается на overload (END expected), что вообщем-то для меня естественно. Мне его там всегда не хватало

.
PS. на Set тоже ругается - в BP7 это зарезервированное слово

Автор: qwerty009 24.8.2004, 22:31

Цитата

Цитата(Vit @ 20.8.2004, 23:02)

TOtherObject = object(TObject)
procedure Set(str_: string); virtual; overload;
procedure Set(X: integer); virtual; overload;
end;

А мой BP7 ругается на overload (END expected), что вообщем-то для меня естественно. Мне его там всегда не хватало

.
PS. на Set тоже ругается - в BP7 это зарезервированное слово

kgde ty v BP7 vidal komandu overload?
u menja dazhe v helpe netu