用程序控制 软件安装过程中出现问题

Question

用程序控制 软件安装过程中出现问题当程序打开软件进行安装的时候，当软件出现“下一步”这个按钮的时候，
程序自动点击，但是用程序点击一下却不管用，变成点击两次 之后，就跳过这个页面了，但是程序却被软件锁住了。
只有把这个软件给关掉，程序才能正常运行。这个是为什么呀，下面的是 点击下一步的代码：procedure TForm1.Button2Click(Sender: TObject);
var a,b:PAnsiChar;
h,h1:HWND;
beginh:= FindWindow(nil,'AVI软件 安装 ');
h1:= FindWindowEx(h,0,'Button','下一步(&N) >');SendMessage(h1,WM_LBUTTONDOWN,0,0);
SendMessage(h1,WM_LBUTTONUP,0,0);SendMessage(h1,WM_LBUTTONDOWN,0,0);
SendMessage(h1,WM_LBUTTONUP,0,0);
end;