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

Interface ID   Найти похожие ветки 

← →
Karluha   (2005-07-28 11:09) [0]

Есть такой интерфейс
 ITst = interface(IDispatch)
   ["{4A783C3A-69C0-4ED4-AD26-26A9FF434146}"]
   procedure Method1;
 end;

И есть:
var
 a: ITst;
Как из переменной a получить {4A783C3A-69C0-4ED4-AD26-26A9FF434146}

---

← →
jack128 ©   (2005-07-28 11:16) [1]

В интерфейсы автоматом приобразуются к guid"ам

Например:
type
 ITest= interface
 ["{65507433-7E91-4BBF-B4AC-61295E61954A}"]
 end;

procedure TForm1.Button1Click(Sender: TObject);
var
 guid: TGuid;
begin
 guid := ITest;
 Caption := GuidToString(ITest);
end;

---

← →
Karluha   (2005-07-28 11:21) [2]

Интерфейсы да, а ссылки на интерфейчы нет.
Т.е. в моем примере нельзя написать:
GuidToString(a);
т.к. a не тип а ссылка

---

← →
jack128 ©   (2005-07-28 11:32) [3]

Karluha   (28.07.05 11:21) [2]
а ты что, не знаешь какого типа у тебя ссылка??

---

← →
Karluha   (2005-07-28 11:45) [4]

Нет не знаю. Знал бы, взял бы напрямую, а так это может быть любой наследник

---

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

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



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