COM Typenbibliothek - dispinterface und Records

[jensw_2000]

Ich habe eine ActiveX Bibliothek mit einem Automatisierungs-Objekt angelegt.
In der Typenbibliothek habe ich unter Anderem einige Enum-Typen und einige Records deklariert.

Die Records werden in der _TLB in den "dispinterface Deklarationen" nicht erkannt, und durch OleVariant ersetzt.
Bei den IDiapatch Deklarationen klappt das mit den Records.

Im Typenbibliotheks-Editor sieht noch alles richtig aus ...

Delphi-Quellcode:

IPDDAPIaxEvents = dispinterface
  [ uuid '{12345678-A8C6-44CE-BFF9-F5257644C83D}', 
    version 1.0, 
    helpstring 'Ereignis-Schnittstelle für PDDAPIax-Objekt' ]
  procedure OnErrorInfo(var aErrorInfo: TRecErrorInfo) [dispid $000000CE]; stdcall;
end;

... in der _TLB steht die Deklaration nachher falsch drin ...
procedure OnErrorInfo(var aErrorInfo: {??TRecErrorInfo}OleVariant); dispid 206;
TRecErrorInfo enthält einen Enum.Typen, einen Integer und einen WideString

Delphi-Quellcode:

TErrorSource = (
  [ uuid '{12345678-9482-4133-8FF8-3442B2D34AE2}', 
    version 1.0 ]
  esApplication = 1;
  esPDDAPI = 2;
  esNetwork = 3;
  esServer = 4;
);

TRecErrorInfo = record
  [ uuid '{12345678-DE0C-48AA-94FE-2855D7D9942B}', 
    version 1.0 ]
  ErrorSource: TErrorSource;
  ErrorID: Integer;
  ErrorText: WideString;
end;

Wie übergebe ich Records an ein EventObjekt bzw. an das dispinterface ?
Kann mit jemand stichpunktartig die Hintergründe erläutern ?

Danke,
schönen Feiertag,
Jens