Using Delphi code to clear cookies, how to implement them is urgent and high-score sending. If the score is not enough, add the score again. The top score is Delphi/Windows SDK/API.
Http://www.delphi2007.net/DelphiAPI/html/delphi_20061116105108222.html
Use Delphi Code How to clear cookies, how to implement them, and how to deliver high scores. If the score is not enough, add the score again.
Principle:
CMD:
Del/Q "C: \ Documents ents and Settings \ <User Name> \ cookies
Use winexec!
Top. There is no better way... It is better to give the code to me. I am in urgent need.
Ding ding ~
I already spoke about it on the first floor.
Uses
Shlobj;
{$ R *. DFM}
Function getspecialfolder (const csidl: integer): string;
VaR
Recpath: pansichar;
Begin
Recpath: = stralloc (max_path );
Try
Fillchar (recpath ^, max_path, 0 );
If shgetspecialfolderpath (0, recpath, csidl, false) then begin
Result: = recpath;
End else result: = '';
Finally
Strdispose (recpath );
End;
End;
Procedure delfiles (const Directory: string );
VaR
Dirinfo: tsearchrec;
Finder: integer;
Dir: string;
Begin
Dir: = directory;
Finder: = findfirst (DIR + '\ *. *', faanyfile, dirinfo );
While finder = 0 do
Begin
Deletefile (pchar (DIR + '\' + dirinfo. Name ));
Finder: = findnext (dirinfo );
End;
Findclose (dirinfo );
End;
Procedure tform1.btndelcookiesclick (Sender: tobject );
Begin
Delfiles (getspecialfolder (csidl_cookies ));
End;
Close sanmaotuo (laifeng) (100 ),
SZ