Stahovani dat se servru v Delphi

Dobry den.
Proč když stahnu takto soubor s meho servru ma v info datum vytvořeni datum kdy byl stažen a ne ten co je na servru.
Připada mi to jako by se soubor nestah, ale vytvořil novy a do něj nakopirovala data.

If HTTPMethod('GET', 'http://xx.xx.xx.xx/test.txt') then
      if ResultCode = 200 then
        Document.SaveToFile('test.txt');

Jsou zobrazeny jen nové odpovědi. Zobrazit všechny

Předmět	Autor	Datum
Mohl by mi prosim ještě někdo napsat jak funguje toto. with THTTPSend.Create do try If HTTPMethod(… Kukajda 20.06.2012 08:13	Kukajda	20.06.2012 08:13
No mně by zajimalo spiš to zamrznuti při stahovani co je uvedeno nahoře. Když necham sosnout nějaky… poslední Mireček 27.06.2012 06:55	Mireček	27.06.2012 06:55

Mohl by mi prosim ještě někdo napsat jak funguje toto.

with THTTPSend.Create do
try
If HTTPMethod('GET', '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ějaky maly souborek, tak ok.
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.

No mně by zajimalo spiš to zamrznuti při stahovani co je uvedeno nahoře.
Když necham sosnout nějaky velky soubor tak mi program zamrzne dokud se soubor nestahne.
Je třeba to dat do vlakna nebo je jine řešeni.

Zpět do poradny Odpovědět na původní otázku Nahoru