Mohl by mi prosim ještě někdo napsat jak funguje toto.
Pokud to použiji na nějaky maly souborek, tak ok.
with THTTPSend.Create do
try
If HTTPMethod('GET', 'http://xx.xx.xx.xx/test.text') then
if ResultCode = 200 then
Begin
datum:= Headers[6];
Delete(datum, 1, 15);
MyDate:= DecodeRfcDateTime(datum);
TS := Headers;
end
finally
Pokud to použiji na nějakou obludu tak se projekt na chvili sekne.
Ja myslel že si to stahne se servru jen hlavičky ale vypada to že to stahuje cely soubor.