注册 登录
编程论坛 VB.NET论坛

如何编程动态控制Internet浏览器的大小和位置

nhhykly9d2009 发布于 2008-03-10 11:40, 1479 次点击
如何编程动态控制Internet浏览器的位置:
实现目标:1:使Internet浏览器位置保持设为屏幕最前面
2:鼠标进入Internet浏览器范围时,Internet浏览器能自动移动到另一个位置.
给了关键代码或思路,或指出网上可查资料,谢谢!
4 回复
#2
fairy42008-03-11 10:13
使用windows  API,我對這個不熟悉,
思路大概是,你先獲取瀏覽器的窗體句柄,根據你自己的觸發時間發送消息(sendmessage)給該句柄,讓它執行某種操作
我現在的水平,也就是用API讓它顯示,隱藏,或者關閉!其他的我還無法實現!
抱歉!
#3
nhhykly9d20092008-03-11 17:18
能不能让它移动呢?
能不能让它移动?
#4
gantanhao2008-03-13 16:38
我也很想知道,帮忙顶起来
#5
nhhykly9d20092008-03-14 18:11
谢谢二楼朋友,已自己解决了
先把浏览器搞成窗口显示,不要全屏显示,然后把浏览器右上角放在屏幕右上角重合就可以操作了,还有其它办法
const HWND_TOPMOST=-1
const HWND_NOTOPMOST=-1
private structure POINTAPI
dim x as string
dim y as string
end structure
private sub button1_click()
dim P as POINTAPI
p.X=10
p.Y=10
dim myhwnd as integer
myhwnd=WindowFromPoint(P.x,P.y)
dim mywin as integer
mywin=SetWindowPos(myhwnd,HWND_TOPMOST,200,100,800,600,0)
这样做了后你的浏览器就只显示一个窗口,并总在最前面,这样省得你去关以前开的窗。如果你想把它恢复原样,用HWND_NOTOPMOST=-1,搞不好别怪我。
根椐这个思路,其它windows 窗体应都能控制,不成问题了,。。。

[[it] 本帖最后由 nhhykly9d2009 于 2008-3-14 18:22 编辑 [/it]]
1