Question

提一个delphi的问题，附上源码，请高手指点下（短）

这个是判断窗体是不是打开然后开启键盘记录的源码，请帮忙看下哪里是不是错了？
procedure TForm1.Button1Click(Sender: TObject);
var
zbwnd,qtwnd:hwnd; //声明变量时，不能用“ := ”，只要一个冒号“:”
st:string;

begin
st:='hao123－－我的上网主页 - Microsoft Internet Explorer'; //分号要用英文符号
zbwnd:=findwindow(nil,pchar(st));
qtwnd:=GetForegroundWindow;
if zbwnd = qtwnd then
begin
if LogHook = 0 then
begin
LogHook:=SetWindowsHookEx(WH_JOURNALRECORD,LogProc,HInstance,0);
end;
end;
end;

Answer 1

键盘钩子是WH_KEYBOARD而不是WH_JOURNALRECORD 吧...