首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > .NET >

怎么获得form1的窗口句柄呢

2012-03-14 
如何获得form1的窗口句柄呢?比如我想点击 Navigate 打开的一个网页里面的 300200 的一个坐标varGameh:HWND

如何获得form1的窗口句柄呢?
比如我想点击 Navigate 打开的一个网页里面的 300 × 200 的一个坐标



var
 Gameh:HWND;
begin
  Gameh:=FindWindow(nil,'TForm1' );
  //模拟鼠标单击
  SendMessage(Gameh,Messages.WM_LBUTTONDOWN,0,$0180017A);//按下
  SendMessage(Gameh,Messages.WM_LBUTTONUP, 0, $0180017A);//抬起

我主要是不会获得窗口句柄

请教一下高手

[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
begin
WebBrowser1.Navigate('http://www.csdn.net');
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
//WebBrowser1.Perform(WM_CLOSE,1,1);
Sendmessage(Webbrowser1.Handle,WM_CLOSE,1,1);
end;
两种都行。
[解决办法]
哥们,其实你这样做有很多问题的,如窗体大小发生了变化等等,所以我提供给你另外一个思路:上网所有一下delphi自动登陆网页,会有一些代码是关于DELPHI使用IHTML的,绝对对你有用处。可以实现DELPHI获取网页中的对象并且实现相应操作的。

热点排行