Скачать: CL | DM;

Разные интерфейсы с одинаковыми методами   Найти похожие ветки 

← →
Michael   (2007-12-03 10:12) [0]

Здравствуйте, подскажите, пожалуйста, как можно реализовать объект, если он имеет два разных интерфейса с одинаковыми функциями?
Пример:

Int_1 = interface
 function My : BYTE; stdcall;
end;

Int_2 = interface
 function My : BYTE; stdcall;
end;

TMyObject = class (TInterfacedObject, Int_1, Int_2)
 // ...
 // реализация Int_1
 function My : BYTE; stdcall;
 // реализация Int_2
 function My : BYTE; stdcall;
 // ...
end;



Что делать в такой ситуации? Можно ли одной из функций назначить синоним и как это сделать?
Спасибо

---

← →
MBo ©   (2007-12-03 10:37) [1]

function Int1.My = My1;
function Int2.My = My2;

в справке - Method resolution clauses

---

← →
Michael   (2007-12-03 10:57) [2]

to MBo:
Спасибо, получилось.

Вопрос закрыт

---

← →
Kolan ©   (2007-12-03 19:19) [3]

Это как запах «Alternative Classes with Different Interfaces»
только наоборот.

Переименуйте метод, так чтобы его имя отражало то, что он делает. А если они делают одно и тоже, то тут «Duplicate code»

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c