- 博客(6)
- 资源 (30)
- 收藏
- 关注
转载 PETOOLS_LINK
PETOOLS_LINK.cmd ::petools扩展目录搜索安装程序 by chenall http://www.chenall.comhttp://www.chenall.com::思路来源:http://bbs.wuyou.com/viewthread.php?tid=140951http://bbs.wuyou.com/viewthread.php?tid=1409
2010-02-28 14:44:00 632
转载 delphi指针简单入门:
指针用法的例子: 1 var 2 X, Y: Integer; // X and Y 整数类型 3 P: ^Integer; // P 指向整数类型的指针 4 begin 5
2010-02-16 23:02:00 532
原创 Shutdown
//提权function SetPrivilege(sPrivilegeName: string; bEnabled: boolean): boolean;var TP, TPPre: TTokenPrivileges; Token: THandle; dwLength: DWORD;begin result := false; OpenProcess
2010-02-09 12:59:00 369
原创 DelTree(删除到回收站)
usesShellApiFunction DelTree(DirName : string): Boolean;varSHFileOpStruct : TSHFileOpStruct;DirBuf : array [0..255] of char;begintry Fillchar(SHFileOpStruct,Sizeof(SHFileOpStruct),0);
2010-02-08 13:37:00 494
原创 shellabout
shellabout(application.MainForm.Handle,52688226所有, [email protected],application.Icon.Handle);
2010-02-06 16:40:00 606
转载 UTF8ToAnsiString
function UTF8ToAnsiString(utf8str:string; CodePage:integer):AnsiString;vari:integer;buffer:widestring;ch,c1,c2:byte;beginresult:=;i:=1;while i ch:=byte(utf8str[i]); setlength(buffer,length(b
2010-02-03 20:22:00 861
TMS Component Pack 5.7.1.0 Full Source 安装版
2010-10-02
DELPHI全掌握(万一先生的博客)
2009-07-05
PASCAL精要(编程技巧)
2009-07-05
API函数的中文帮助文件
2009-07-05
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人