IdHTTP.Request.CacheControl := 'no-cache';
IdHTTP.Request.CustomHeaders.Add('Pragma: no-cache');
IdHTTP.HandleRedirects := false;
+ IdAntiFreeze.Active := true;
for i := 0 to URLs.Count - 1 do begin
- IdAntiFreeze.Active := true;
try
ResStream.Clear;
IdHTTP.Get(URLs[i], ResStream);
{$ENDIF}
end;
end;
- IdAntiFreeze.Active := false;
end;
-
+ IdAntiFreeze.Active := false;
if (newURLs.Count > 0) and (oldURLs.Count > 0) then begin
ReplaceURLs(oldURLs, newURLs);
GikoForm.FavoritesURLReplace(oldURLs, newURLs);