Vielleicht müssen erst alle Cookies von nasdaq.com gelöscht werden, um in kürzeren Abständen neue Daten zu laden.
Suchfeld “Temporary Internet Files”.
Click “Browserverlauf löschen”
Oder:
Delphi-Quellcode:
program Delete_IE_Cache;
uses
WinInet;
{sc-----------------------------------------------------------------------
Name: DeleteIECache
Parameters: -
-----------------------------------------------------------------------sc}
procedure DeleteIECache;
var
lpEntryInfo: PInternetCacheEntryInfo;
hCacheDir: LongWord;
dwEntrySize: LongWord;
begin { DeleteIECache }
dwEntrySize := 0;
FindFirstUrlCacheEntry(nil, TInternetCacheEntryInfo(nil^), dwEntrySize);
GetMem(lpEntryInfo, dwEntrySize);
if dwEntrySize>0 then
lpEntryInfo^.dwStructSize := dwEntrySize;
hCacheDir := FindFirstUrlCacheEntry(nil, lpEntryInfo^, dwEntrySize);
if hCacheDir<>0 then
begin
repeat
DeleteUrlCacheEntry(lpEntryInfo^.lpszSourceUrlName);
FreeMem(lpEntryInfo, dwEntrySize);
dwEntrySize := 0;
FindNextUrlCacheEntry(hCacheDir, TInternetCacheEntryInfo(nil^), dwEntrySize);
GetMem(lpEntryInfo, dwEntrySize);
if dwEntrySize>0 then
lpEntryInfo^.dwStructSize := dwEntrySize;
until not FindNextUrlCacheEntry(hCacheDir, lpEntryInfo^, dwEntrySize)
end; { hCacheDir<>0 }
FreeMem(lpEntryInfo, dwEntrySize);
FindCloseUrlCache(hCacheDir)
end; { DeleteIECache }
begin
DeleteIECache
end.
Ausserdem:
Delphi-Quellcode:
{ declaration }
Function DnsFlushResolverCache: DWord; stdcall; external 'dnsapi.dll';
...
{ call it }
procedure CallIt;
begin
{ call it, ignore return code }
DnsFlushResolverCache;
end;