THTTPCli, обработчик события выполняется в контексте основного потока

[profaller]

ну вообщем есть что-то типа

type
  TSomeThread = class(TThread)
  private
    procedure HTTPClientRequestDone(Sender: TObject; RqType: THttpRequest; ErrCode: Word);
  ...

procedure HTTPClientRequestDone(Sender: TObject; RqType: THttpRequest; ErrCode: Word);
begin
  ...
end;


constructor TSomeThread.Create;
  ...
  HTTPClient := THttpCli.Create(nil);
  HTTPClient.OnRequestDone := HTTPClientRequestDone;

ну так вот, данный оброботчик почему-то выполняется в контексте основного потока, а не того который его инициировал. вообщем порылся в исходниках ентого компонента, но увы, ничего особо не понял. вот и надеюсь, может кто из форумчан уже сталкивался с этим западлом. хелп вообщем.

[mss]

> а не того который его инициировал

А в твоем коде никакой инициацией и не пахнет.
Где она, инициация-то ?

[veniside]

> в контексте основного потока, а не того который его инициировал

так и инициирован он, судя по всему, в основном потоке.
Перенеси код из TSomeThread.Create() в перекрытый TSomeThread.Execute(); тогда и будет инициализация не в основном потоке.

[profaller]

А в твоем коде никакой инициацией и не пахнет.
Где она, инициация-то ?

да какая разница та, ну вот например инициация события OnRequestDone

procedure TSomeThread.Execute();
...
HTTPClient.Get;
...

вот код из исходников либы

procedure THttpCli.WMHttpRequestDone(var msg: TMessage);
...
    if Assigned(FOnRequestDone) then
        FOnRequestDone(Self, FRequestType, FRequestDoneError);
...

поидее все должно распрекрасно работать, ан нет, не хотит. почему-то этот код обрабытывается в основном потоке. там у них (ICS) все на сообщениях построенно, и разобраться я никак не могу че там да как.

[exn]

Я всегда думал, что главное достоинство ics то, что у нее основной режим работы асинхронный. )
В пятой версии этой либы, есть нужные вам примеры.