![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TIdHTTP, закачка файла, в случае если он обновлен. [D7, WinXP]
DarkGreen © (2004-05-12 17:54:00)Есть такой кусок кода:
type
TForm1 = class(TForm)
IdHTTP1: TIdHTTP;
Edit1: TEdit;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
Stream: TFileStream;
begin
Stream := TFileStream.Create('C:\Ranking.zip.gz', fmCreate, fmShareDenyWrite);
try
IdHTTP1.Get(Edit1.Text, Stream);
finally
Stream.Free;
end;//Try..Finally
end;
Вопрос: Как узнать дату создания/изменения файлка, который я хочу закачать, что бы не закачивать один и тот же, а только новые версии?
DarkGreen (2004-05-13 17:03:00) [1]и последний раз... ап...
DarkGreen (2004-05-13 04:21:00) [2]Up что-ли... Дополнение: Можно ли это сделать с помощью WinInet API?