with THTTPSend.Create dotry
If HTTPMethod('GET', 'http://84.47.113.9:4022/udp/234.1.1.54:1234') then
if ResultCode = 200 then Document.SaveToFile('.\soubor');
finally
Free;
end;
var
sl: TStringList;
begin
ifnot HttpGetText('http://84.47.113.9:4022/udp/234.1.1.54:1234', sl) then
ShowMessage('Nepodařilo se');
end;
Děláme co je v našich silách, aby byly zdejší diskuze co nejkvalitnější. Proto do nich také mohou přispívat pouze registrovaní členové. Pro zapojení do diskuze se přihlas. Pokud ještě nemáš účet, zaregistruj se, je to zdarma.
