Delphi > Obecné

Pole objektů a jejich události do procedury

(1/1)

jarex:
Mám problém, mám vytvořeno 100 účtů SIP klientů. A k nim potřebuji nějak přiřadit eventy tak, aby se v zaregistrované proceduře vědělo, od kterého klienta event dorazil.


--- Kód: Delphi --- for I := 0 to 99 do    begin    FSipCaller[i] := TSipClient.Create(nil);    FSipCaller[i].OnAnswer := SipClientAnswer;    FSipCaller[i].OnBye := SipClientBye;    FSipCaller[i].OnCall := SipClientCall;    FSipCaller[i].OnRegistration := SipClientRegistration;    end;
Pokud to mám takto, tak každý určitý event padne do procedury, ale tam už nevím, ze kterého zaregistrovaného SIP to přišlo.

 

Jan Fiala:
Proc nema objekt nejakou identifikaci, aby sis ho pak v poli dohledal?
Jinak muzes projit pole a testovat, zda ten ktery byl predan do udalosti soyhlasi s nejakym v poli

--- Kód: Delphi ---For i ...If sender is FSipCaller[i] then...

jarex:
Moc děkuji, toto mi moc pomohlo.

Navigace

[0] Seznam témat