我刚看到HOOK函数中的回调函数,很不理解什么是回调函数,它的意义在哪儿呢?
解决方案 »
- 如何判断磁盘文件损坏
- InnoSetup 做的安装程序,能不能在 64bit 的 XP 中运行?
- 怎样把一个存有图片的字段内容赋值给另外一个DBImage1?
- 请教VCLZIP控件压缩目录的方法
- Delphi连接上Mysql数据库后如何取出所连接服务器中的数据库列表??急~!在线等
- 如何以Xor方式显示一个实心矩形
- 请教高手关于“日期查询”
- 一个比较急的问题。。。。。。。。
- 如何解决:access violation at 016af795:read of address of 0x0181a630
- 如何在delphi 5中,制作局域网聊天室?????
- 急!数据库中real类型的数据显示问题
- 请教一个dbgrid配合查询问题!
符合某种协约; 如下是实例
function Enumwndproc( Hwindow:Hwnd;param: lparam): boolean stdcall ;
var
buffer1,buffer2:Pchar;
//FoundCaption:boolean;
// FoundClname:boolean;
begin
result:=true;
getmem(buffer1,255);
getmem(buffer2,255);
try
if GetWindowText(Hwindow,buffer1,255)>0 then
if pos( PwindowstructInfo(param).caption,strpas(buffer1))>0 then
result := false; if GetClassName(hwindow,buffer2,255)>0 then
if pos( PwindowstructInfo(param).calname,strpas(buffer2))>0 then
Result := False; if Result = False then
PwindowstructInfo(param).wndhandle:=Hwindow; //返回查找到的窗口句柄
finally
freemem(buffer1);
freemem(buffer2);
end;
end;这是调用;
function FindAwindow(caption, clname: string): Thandle;
var
wndInfo:Twindowstruct;
begin
wndInfo.caption:=caption;
wndInfo.calname:=clName;
wndInfo.wndhandle:=0;
EnumWindows(@Enumwndproc,Lparam(@wndInfo));
FindAwindow:=wndInfo.wndhandle;
end;