很多情况下，我们需要在程序中实现这样的功能：在自编写的程序里控制另外一软件中的某个按钮被按下。比如，有一天你在聊qq时觉得烦了，那么就想写程序来帮你按下“发送”按钮，省得你自己一次次动手了。那么，这个想法怎样才能实现呢？
其实做法很简单，它只用两条windows消息就能实现了。（当然，前提是你必须知道那个按钮的handle。我想这个对一般程序员来说简直是小菜一碟）这两条消息分别是：wm_lbuttondown和wm_lbuttonup。下面我给出一个简单的实例说明用法：
procedure tform1.button1click(sender: tobject);
var
btnhandle: hwnd; //要控制的那个按钮的句柄
begin
btnhandle:=strtoint(edit1.text ); //为了简单起见就这么设了，你要先写程序得到它
sendmessage(btnhandle,wm_lbuttondown,mk_lbutton, 0);
sendmessage(btnhandle,wm_lbuttonup,0,0);
end;
整个过程其实就是模拟了一下鼠标左键被按下又松开（注意，光有鼠标左键被按下是不行的）。怎么样？够简单吧！现在就可以把这个功能加进你的程序里面，实现一些有趣的效果了！:)
