![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
По поводу TypeLib Editor а
gagarkin © (2002-12-20 11:21:00)Доброе время суток!
Есть маленькая проблемка.
создаю в ActiveX Libriary.
Далее допустим в ней:
MyObj1 + IMyObj1 (IDispatch).
Потом делаю
MyObj2 + IMyObj2, при этом IMyObj2 (IMyObj1)
в коде исправляю руками (вот здесь мне кажется я делаю что, то не так)
TMyObj2 = class (TAutoObject, IMyObj2) ...
на
TMyObj2 = class (TMyObj1, IMyObj2) ...
Так вот, по хорошему Delphi"а не должна генерировать в TMyObj2 процы из
IMyObj1,
так как они уже реализованы в TMyObj1, а она это, гадина, делает!
Как-нибудь ей можно указать, чтобы она не делала этого?
Ведь она же не генерирует в TMyObj1(TAutoObject, IMyObj1), например Invoke
из IDispatch!
_________________________________________
С уважением, Гагаркин Владимир Геннадьевич
gagarkin (2002-12-20 19:06:00) [1]Энто я понимаю!
Но я надеялся, что есть некая опция, которая указывала бы, что не надо вставлять в класс реализацию, которая уже есть в базовом классе!
Бесит просто, когда я допустим из TMyObj2 удаляю некоторые методы реализующие IMyObj1, а потом лезу в Editor, изменяю там, что-нибудь и он мне в код опять вставляет эти методы!
Просто напрягает в них писать:
Result := inherited Get_...;
У меня просто к концу иерархии около ста методов!
Обидно тыкать тупой код.
asmith (2002-12-20 13:17:00) [2]ИМНО это невозможно. Интерфейс - не более, чем договоренность, контракт между двумя сторонами. Поэтому если я создал класс, реализующий IMyObj2(IMyObj1), реализация должна включать методы обеих интерфейсов. В этом интерфейсы и просто классы разнятся - наследование интерфейсов не означает наследования реализаций, а для классов это справедливо.