Можно ли получить значение GUID на интерфейсе с использованием RTTI? - PullRequest
11 голосов
/ 09 декабря 2011

Если у меня есть такой интерфейс, как:

IPluginAPI = interface
['{590DFF0B-CA00-46CC-84B0-3848103D4C5A}']
   function add (a : double; b : double) : double;
   function sub (a : double; b : double) : double;
   function mult (a : double; b : double) : double;
   function divide (a : double; b : double) : double;
end;

Есть ли способ получить значение GUID с использованием RTTI? Я использую Delphi XE.

1 Ответ

22 голосов
/ 09 декабря 2011
uses
  TypInfo;

Guid := GetTypeData(TypeInfo(IPluginAPI))^.Guid;
...