鼠标模拟点击的一个简单问题 关于mouse_event的用法
我需要实现的效果是这样的：

在程序自身的指定坐标点击！（注意是相对于程序窗口的坐标 不是屏幕绝对坐标）
var
pt: TPoint;

GetCursorPos(pt);
pt := ScreenToClient(pt);
setcursorpos(pt.X,pt.Y);
mouse_event(MOUSEEVENTF_LEFTDOWN and MOUSEEVENTF_ABSOLUTE,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTDOWN and MOUSEEVENTF_ABSOLUTE,0,0,0,0);
------不知道为撒 点击的位置不对
再就是 能不能隐藏点击？？？ --这样我可以在程序运行之后干其他的事！！！不能隐藏点击也没关系


请注意： 1 是相对于程序本身的相对坐标 不是屏幕绝对坐标
2 关于 获取句柄，然后再SENDMESSGE之类的 就不要说了 这个我知道怎么实现
3 用上面的方法能否隐藏鼠标指针而模拟点击操作？
TMD 这方法实在是太恶心了！！如果不隐藏的话 运行这个程序就不能运行其他程序了！！！不能隐藏点击也没关系


[解决办法]
不要再ScreenToClient了，得到pt就可以了，点击的那个位置就会点击到你的程序上（如果你的程序处于活动）
[解决办法]
想隐藏的话，发鼠标事件消息呗