Je nachdem um was für eine Art von Interface es sich
handelt kann es so oder so ähnlich aussehen:
Delphi-Quellcode:
uses
X_TLB, ComObj,
ActiveX;
...
TImplementingClass =
class(TAutoObject, IMyInterface)
...
// im Init-Abschnitt der Unit, die die implementierende Klasse enthält
initialization
TAutoObjectFactory.Create(ComServer, TImplementingClass, CLASS_MyInterface,
ciMultiInstance, tmApartment);
Gruss,
Markus