Delphi 中如何发送一个窗体上的按钮，按下消息？

即将测试下面代码

SendMessage(hwnd, WM_LBUTTONDOWN, Null, Null);
//其中hwnd为按钮的句柄，可以用EnumChildWindows的方法得到
SendMessage(hwnd, WM_LBUTTONUP, Null, Null);
//一定要随后发一个WM_LBUTTONUP的消息，否则按钮只下去，不起来^_