怎样模拟点击！(50分)

大家可能都知道金山词霸有个“迷你背单词”吧，要用鼠标点击才会发声，我想模拟点击它
让它自动发声。又不知道它是哪种类型，也不知道CAPTION！
怎么办？

金山词霸“迷你背单词”可以设置为‘自动发声’，我用的是金山词霸2002。

如果要模拟点击的话，你可以这么做：
1、获得它的滚动框窗体的句柄 hwnd.
2、用GetWindowRect（hwnd,rect）获得窗体的区域。
3、模拟鼠标点击用
x= rect.Left;
y= rect.Top;
mouse_event(MOUSEEVENTF_LEFTDOWN,x,y,0,0);//鼠标左键按下
mouse_event(MOUSEEVENTF_LEFTUP,x,y,0,0); //鼠标左键松开

我太笨，CAO，居然没看到。
记到起，50太容易了，下次问你问题不给钱要不得？

procedure TForm1.Timer1Timer(Sender: TObject);
var
l_Rect : TRect;
begin
GetWindowRect(Handle, l_Rect);
mouse_event(MOUSEEVENTF_LEFTDOWN,l_Rect.Left,l_Rect.Top,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,l_Rect.Left,l_Rect.Top,0,0);
end;