WWW.ИСХОДНИКИ.РУ cpp.sources.ru
java.sources.ru web.sources.ru soft.sources.ru
jdbc.sources.ru asp.sources.ru api.sources.ru

  Форум на исходниках
  Pascal
  ООП

СПРОСИТЬ  ОТВЕТИТЬ
профайл | регистрация | faq

Автор Тема:   ООП
Demo_S опубликован 10-07-2001 23:34 MSK   Click Here to See the Profile for Demo_S   Click Here to Email Demo_S  
Какая-то фигня с ООП в паскале происходит.
Есть type shape=object
procedure move(...):virtual;
procedure draw(...):virtual;
...
Далее наследуется
type FillCircle=object(shape)
в котором пеереопределяются
procedure move(...):virtual;
procedure draw(...):virtual;
и уже от него наследуется
BarShape=object(FillCircle)
и в нем в свою очередь переопределяется
procedure draw(...):virtual;
причем всегда проц move использует draw.
Как мне сделать, чтобы переменная типа BarShape при вызове метода move использовала свой draw.
То есть для bs:BarShape
вызывается bs.move;
но почему-то(?) из bs.move вызывается не BarShape.draw а FillCircle.draw.
Вроде ж все виртуальные, в чем же дело...
Буду благодарен за любые советы.
Demo_S опубликован 10-07-2001 23:43 MSK     Click Here to See the Profile for Demo_S  Click Here to Email Demo_S     
Виноват.
Уже работает.
Глупая была ошибка.

СПРОСИТЬ  ОТВЕТИТЬ
Перейти:


E-mail | WWW.ИСХОДНИКИ.RU

Powered by: Ultimate Bulletin Board, Freeware Version 5.10a
Purchase our Licensed Version- which adds many more features!
© Infopop Corporation (formerly Madrona Park, Inc.), 1998 - 2000.