DELPHI 通過窗口句柄或窗口标题得到进程句柄2009年05月08日 星期五 10:15procedure TForm1.Button1Click(Sender: TObject);varhWindow: HWND; { 窗体句柄 }dwProcessID: DWORD; { 进程 ID }hPr Read More
posted @ 2016-02-25 19:06
findumars
Views(617)
Comments(0)
Diggs(0)
TObject = class //创建 constructor Create; //释放 procedure Free; //初始化实列 class function InitInstance(Instance: Pointer): TObject; //清除实列 procedure Cleanu Read More
posted @ 2016-02-25 19:04
findumars
Views(598)
Comments(0)
Diggs(0)
delphi指针简单入门: 看一个指针用法的例子: 1 var 2 X, Y: Integer; // X and Y 整数类型 3 P: ^Integer; // P 指向整数类型的指针 4 begin 5 X :=17; // 给 X 赋值 6 P := @X; // 把 x的地址赋给p 7 Y Read More
posted @ 2016-02-25 19:03
findumars
Views(5995)
Comments(0)
Diggs(0)
我发现了一篇发表在1999.11.29 b13版的 《令win32应用程序跳入系统层》东南大学 卢威 luwei@126.com 是用vc++嵌汇编做的, 很接近了,可试试 BCB或DELPHI进入Ring0 东南大学卢威1999.12发表在<<计算机世界>>报上的一篇 <<WIN32跳入系统0层> Read More
posted @ 2016-02-25 19:02
findumars
Views(594)
Comments(0)
Diggs(0)
设置PageControl的owndraw属性为TRUE. procedure TForm1.pgc1DrawTab(Control: TCustomTabControl; TabIndex: Integer; const Rect: TRect; Active: Boolean); var cc: Read More
posted @ 2016-02-25 18:59
findumars
Views(506)
Comments(0)
Diggs(0)