Mam taki kod:
procedure GetIPThreadProc(Param : Pointer); stdcall;
var
url, ip : string;
DocStr : string;
Lista : TStringList;
I : Integer;
HTTP : THttpSend;
s : TStream;
code : Integer;
begin
Lista := TStringList(Param);
url := 'http://%s/stalker_portal/c/';
HTTP :=ThttpSend.Create;
with HTTP do
begin
Protocol := '1.1';
UserAgent := '';
KeepAlive := True;
TimeOut := 300;
HTTPMethod('HEAD',Format(url, [ip]));
Free;
end;
Cokolwiek bym nie przydzielił TimeOut, to zawsze Synapse swoje odczeka. Czy można to jakoś zmienić? Zależy mi na krótkim Timeout. Być może istnieje inna możliwość?