Вниз
Скачать: CL | DM;

... как можно очистить Tempory Internet Files и Cookies ...   Найти похожие ветки 

← →
Delphi5.01 ©   (2004-10-22 09:38) [0]

Доброе время суток!
Может кто подскажет как можно очистить Tempory Internet Files и Cookies. Имею в виду с помощью какой функции, поиск на данном сайте ничего не дал даже королевство дельфи не помогло, ни буду говорить про результаты гугла, яндекса и рамблера!
Спасибо


← →
Prov   (2004-10-22 15:03) [1]

Очистка куки
uses ShellApi, ShlObj,....
procedure EraseCookie;         //ОЧИСТКА КУКИСОВ
 var ppidl: PItemIDList; CookiePath: array[0..255] of Char;
     SHC: TSHFileOpStruct; TmpStringC: PChar;
begin
 FillChar(CookiePath, SizeOf(CookiePath), 0);
 FillChar(SHC, SizeOf(SHC), 0);
 shlobj.SHGetSpecialFolderLocation(0, CSIDL_COOKIES, ppidl);
 shlobj.SHGetPathFromIDList(ppidl, CookiePath);
 TmpStringC:= PChar(PChar(@CookiePath) + "\*.*" + #00);
 SHC.Wnd:= 0;
 SHC.wFunc:= FO_DELETE;
 SHC.pFrom:= TmpStringC;
 SHC.fFlags:= FOF_NOCONFIRMATION or FOF_SILENT;
 SHC.fAnyOperationsAborted:= FALSE;
 SHFileOperation(SHC);
end;


очистка Теморени Инет Файлс

procedure EraseIECache;           //ОЧИСТКА ИНТЕРНЕТ КЭША
 var IE_CACHE_LIST: PItemIDList; IECachePath: array[0..255] of Char;
     SHIE: TSHFileOpStruct;  TmpStringIEC: PChar;
begin
 FillChar(IE_CACHE_LIST, SizeOf(IE_CACHE_LIST), 0);
 FillChar(SHIE, SizeOf(SHIE), 0);
 SHGetSpecialFolderLocation(0, CSIDL_INTERNET_CACHE, IE_CACHE_LIST);
 SHGetPathFromIDList(IE_CACHE_LIST, IECachePath);
 TmpStringIEC:= PChar(PChar(@IECachePath) + "\Content.IE5\*.*" + #00);
 SHIE.Wnd:= 0;
 SHIE.wFunc:= FO_DELETE;
 SHIE.pFrom:= TMPStringIEC;
 SHIE.fFlags:= FOF_SILENT or FOF_NOCONFIRMATION;
 SHIE.fAnyOperationsAborted:= FALSE;
 SHFileOperation(SHIE);
end;


← →
Anatoly Podgoretsky ©   (2004-10-22 15:16) [2]

Delphi5.01 ©   (22.10.04 09:38)  
Это делается настройками Интернет Эксплорер


← →
Delphi5.01 ©   (2004-10-22 17:31) [3]

2 Prov: Thanks bolshoe!
2 Anatoly Podgoretsky: a ia dumal chto posle win95 eta opcia udalena iz nastroek internet explorera! :D
Da bivaut je ludi ... :D



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.026 c
11-1083761063
H7LB
2004-05-05 16:44
2004.12.05
KOL editbox maxlength ?


14-1100697719
_none_
2004-11-17 16:21
2004.12.05
как сравнить 2 переменных типа TGUID...


8-1094471202
L@rs
2004-09-06 15:46
2004.12.05
BINK32W.DLL


8-1094225585
AzIN
2004-09-03 19:33
2004.12.05
время


1-1100693186
Tria
2004-11-17 15:06
2004.12.05
Как сохранить форму в текстовом формате?




   Наверх