如何得到当前活动的ie地址栏的url(30分)

I

ie

Unregistered / Unconfirmed
GUEST, unregistred user!
http://www.delphibbs.com/delphibbs/dispq.asp?lid=634244
可以得到所有的ie地址栏的url,但要如何得到当前活动的ie的地址栏？
或者有没有其他的方法？
 
在ASP 中可以用request.ServerVariables
 
不是asp
 
我做过这种软件现在告诉你：
第一：你先枚举窗口（用EnumWindows），找到类名为IEFRAME的，IE的类名；
第二：再枚举子窗口（用EnumChildWindows），找到类名为EDIT的，地址栏的类名；
第三：用消息SenMessage发送消息给EDIT句柄，得到他的内容就是要找的地址了！
至于各个函数的详细用法，你在这个论坛中搜索一下就可以找到了！
-----------------------------------------------------------
如果还不明白mail to me:tufeiping@sina.com
 
楼上说得不错，但可以先用spy winsight32 之类的跟踪一下。
但估计还有其它办法，因为我昨天得到了对Word 菜单条的控制。
 
有很多方法来实现你的目的的，你可以用定时器组件配合GetForegroundWindow函数。只要
你启动了IE，那它必定要在前台（或总有在前台的那么一个时间被定时器捕捉到）。
下面是简单的实现代码：
procedure Timer1.timer (sender:tobject);
var x,y:Thandle;z:array[0..224]of char;
begin
x:=GetForegroundWindow();//得到当前窗口的句柄
GetClassName(x,z,225);//得到当前窗口的类名
if trim(z)='IEFRAME' then
//如果是IE的类
begin
//这里用EnumChildWindows枚举x中的子窗口，调用lpEnumFunc回调函数进行自己的处理
end;
end;
要详细代码告诉我地址！
 
iedelphi@hotmail.com
谢谢！
 
已经发送给你了，注意接收
 
晶晶：能不能给我一份，谢谢
tomol@163.com
 
tomol：发给你了
 
非常感谢，不过好象是d6下写的吧，我要安装一下d6的:)
 
没有用到D6中什么特殊的技术，你只要将代码直接在D5中编译一遍就可以使用了，使用的
技术都是系统提供的API，只是在程序装载时会有点问题。你仔细看看使用的组件，并将相
应组件加到窗体中，代码复制后编译就OK啦！
 
晶晶：多谢
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
L
如何用DELPHI编程在IE的地址栏中输入URL地址？？？100分(100分)
回复
15
查看
113
lmy
L
吴
哪位大狭知道在ie地址栏禁止输入盘符访问硬盘（如输入 "c:"）,就可打开硬盘c盘(20分)
回复
7
查看
77
吴明桓
吴
M
怎样取IE地址栏的内容(20分)
回复
10
查看
107
zw84611
Z
A
（300分求助）如何编写一个程序截获IE浏览器的地址栏中的地址？(300分)
回复
3
查看
118
幸福鸟
幸
顶部