InteractiveBrokersTWS EOleSysError Klasse nicht Registriert

[luisk]

Hallo,
ich habe ein Problem mit folgendem Quellcode:

Delphi-Quellcode:

unit TWSLib_TLB;
  IID_IContract: TGUID = '{AE6A66F3-8FA9-4076-9C1F-3728B10A4CC7}';
  IContract = interface;

    procedure reqMktDataEx(tickerId: Integer; const contract: IContract; 
                           const genericTicks: WideString; snapshot: Integer); dispid 101;

Delphi-Quellcode:

procedure Tfrm_Interactive_Brokers_TWS.Button3Click(Sender: TObject);
var l_contract:icontract;  //interface
begin
   l_contract:=CreateComObject(IID_IContract)as icontract;
   l_contract.symbol:='eur.usd';
   TWS1.reqMktDataex(1,l_contract,'1',1);
end;

Ich bekomme die Fehlermeldung:
" EOleSysError Meldung:'Klasse nicht Registriert' "
bei:
l_contract:=CreateComObject(IID_IContract)as icontract; Was mache ich falsch?

Danke für schnelle Hilfe.

[sirius]

Das COM Objekt ist nicht registriert. (Das musst du bei Windows machen (regsrv32)

Und wenn du den Aufruf über die DispID machen willst, dann solltest du vielleicht dispinterface verwenden.