E2232 Interface 'x' besitzt keine Interface-Identifikation?

[Union]

Nein, Du brauchst 2:

Delphi-Quellcode:

const

  MyStringIntfAGuid = '{23D5751F-8368-4672-ACFC-3BF667F1F544}';
  MyGuidIntfAGuid : TGUID = MyStringIntfAGuid;

Type
  IMyIntfA = Interface(IUnknown)
    [MyStringIntfAGuid]  // Hier den Stringtyp verwenden, wird vom Compiler umgewandelt in Recordtypen
    procedure foo;
  End;
  ...
  // so gibts ein Interface
  if LMy.QueryInterface(MyGuidIntfAGuid, LIMyA) = S_OK then

Und das Free unterläßt Du besser