Einzelnen Beitrag anzeigen

megaplage

Registriert seit: 27. Jan 2007
8 Beiträge
 
Delphi 2005 Professional
 
#8

Re: Problem mit COM Event Automation - EventSinkImp

  Alt 29. Jan 2007, 23:23
Einfaches Testprogramm

Session erstellen (automatisch in Demo-Konto einloggen) :
Delphi-Quellcode:
  var session :SessionFacade;
    login :LoginSettings;

  coinitialize(nil);
  session:=CoSessionFacade.Create;
  login:=session.GetLoginSettings(0);
  login.setLoginData('555555555','12345','');
  session.AutoLoginWithAddOnName('Test',false,login);
dann kann man alles was das session-Objekt hergibt machen ... z.B.

if session.isLoggedIn ... dann z.B. das Event für Logout-Erkennung einrichten

Delphi-Quellcode:
  var ev : SessionLogoutSubscription;

  ev:=session.GetSessionLogoutSubscription;
oder für eine Push-Quote (Wertpapierkurs/Umsatz)

Delphi-Quellcode:
var qk :quoteKey;
    qs :quoteSubscription;

  qk:=session.CreateQuoteKey;
  qk.Set_SecurityCode('710000');
  qk.Set_StockexchangeId('ETR');
  qs:=session.GetQuoteSubscription(qk);
und diese Ereignisse dann zu empfangen ist mein Problem (ev oder qs bieten dann diese Add_OnXXX / Remove_OnXXX Methoden die wohl der Schlüssel dazu sind) ?!

Im Tray ist das API-Symbol da kann man über das Kontextmenü den Status verfolgen und z.B. sehen wie Quotenereignisse ankommen
  Mit Zitat antworten Zitat