OberonCore

Библиотека  Wiki  Форум  BlackBox  Компоненты  Проекты
Текущее время: Четверг, 05 Декабрь, 2019 22:14

Часовой пояс: UTC + 3 часа




Начать новую тему Ответить на тему  [ Сообщений: 4 ] 
Автор Сообщение
 Заголовок сообщения: Реализация абстрактних методов
СообщениеДобавлено: Среда, 20 Август, 2008 16:47 

Зарегистрирован: Среда, 31 Октябрь, 2007 18:58
Сообщения: 214
Откуда: Austria, Bruck
Код:
DIOPCGroupEvent = POINTER TO ABSTRACT RECORD (CtlT.OutObject)
         (this: DIOPCGroupEvent) AsyncCancelComplete (CancelID: INTEGER), NEW, ABSTRACT;
         (this: DIOPCGroupEvent) AsyncReadComplete (TransactionID, NumItems: INTEGER; ClientHandles, ItemValues, Qualities, TimeStamps, Errors: CtlT.Any), NEW, ABSTRACT;
         (this: DIOPCGroupEvent) AsyncWriteComplete (TransactionID, NumItems: INTEGER; ClientHandles, Errors: CtlT.Any), NEW, ABSTRACT;
         (this: DIOPCGroupEvent) DataChange (TransactionID, NumItems: INTEGER; ClientHandles, ItemValues, Qualities, TimeStamps: CtlT.Any), NEW, ABSTRACT;
         (this: DIOPCGroupEvent) GetIID (OUT iid: COM.GUID);
         (this: DIOPCGroupEvent) Invoke (id, n: INTEGER; VAR par: CtlT.ParList; VAR ret: WinOleAut.VARIANT)
      END;

Как в другом модуле реализовать абстрактние методы этого типа?


Вернуться к началу
 Профиль  
 
СообщениеДобавлено: Среда, 20 Август, 2008 16:56 

Зарегистрирован: Четверг, 17 Ноябрь, 2005 12:00
Сообщения: 79
Откуда: Россия, Санкт-Петербург
Насколько я понимаю, так:
Код:
...
My_DIOPCGroupEvent = POINTER TO RECORD (DIOPCGroupEvent) END;
...
PROCEDURE (this: My_DIOPCGroupEvent) AsyncCancelComplete (CancelID: INTEGER);
BEGIN
END AsyncCancelComplete;
...


Вернуться к началу
 Профиль  
 
СообщениеДобавлено: Среда, 20 Август, 2008 17:04 

Зарегистрирован: Среда, 31 Октябрь, 2007 18:58
Сообщения: 214
Откуда: Austria, Bruck
Пробовал - кричит: Абстрактние методы в базовом типе. Базовый модуль модифицировать нельзя.

UPD
Вопрос снимается - разобрался.


Вернуться к началу
 Профиль  
 
СообщениеДобавлено: Среда, 20 Август, 2008 17:15 

Зарегистрирован: Четверг, 17 Ноябрь, 2005 12:00
Сообщения: 79
Откуда: Россия, Санкт-Петербург
Надо переопределить все абстрактные методы, тогда кричать перестанет.


Вернуться к началу
 Профиль  
 
Показать сообщения за:  Поле сортировки  
Начать новую тему Ответить на тему  [ Сообщений: 4 ] 

Часовой пояс: UTC + 3 часа


Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 1


Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете добавлять вложения

Найти:
Вся информация, размещаемая участниками на конференции (тексты сообщений, вложения и пр.) © 2005-2019, участники конференции «OberonCore», если специально не оговорено иное.
Администрация не несет ответственности за мнения, стиль и достоверность высказываний участников, равно как и за безопасность материалов, предоставляемых участниками во вложениях.
Без разрешения участников и ссылки на конференцию «OberonCore» любое воспроизведение и/или копирование высказываний полностью и/или по частям запрещено.
Powered by phpBB® Forum Software © phpBB Group
Русская поддержка phpBB