Código Delphi [-] uses idHTTP; function GetInternetFileDateTime(aFileName: string): TDateTime; begin with TidHTTP.Create(nil) do try Head(aFileName); Result:= Response.LastModified; finally Free; end; end;
uses idHTTP; function GetInternetFileDateTime(aFileName: string): TDateTime; begin with TidHTTP.Create(nil) do try Head(aFileName); Result:= Response.LastModified; finally Free; end; end;