Вниз
Скачать: 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.021 c
8-1094308103
AndersoNRules
2004-09-04 18:28
2004.12.05
Flash & Delphi


14-1100605511
Cerber
2004-11-16 14:45
2004.12.05
cапер


3-1099574728
DelphiN!
2004-11-04 16:25
2004.12.05
Глюки фильтра TClientDataSet


1-1100967790
Matrex
2004-11-20 19:23
2004.12.05
TList и расход памяти


1-1100881842
VitGun
2004-11-19 19:30
2004.12.05
"Invalid pointer operation" при закрытии.




   Наверх