控制IE问题，如何获得用户回车或者点击“转到”按钮后IE地址栏中的字符串，并在条件成熟的情况下替换成其他字符串。(100分)

首先，一个用户，可能打开至少一个或者多个IE窗口，要获得用户当前活动的IE窗口，当用户在这个IE中进行操作时，比如在地址栏中输入了一些信息，然后去按回车键或者点击“转到”的时候，程序在这个时候进行对这个IE地址栏内容信息的提取。比如提取到的字符串为“中国”的话，这里是例子，就将其转到http://www.xxxxxx.com，这个如何做到？希望得到大家帮助。谢谢。

自己先顶一下。

再顶一下。

再顶。

问题的标题是：如何取得当前IE窗口的URL和TITLE(50分)
问题的分类是：OLE / Automation , 分坛主: houyg, 分坛主: lhz 来自：
liguang 时间：00-3-15 15:20:20 ID:200223

同题.这个问题我急着解决.只要能解决,不管是你自己答和或者是从论坛以前记
录中贴的,都给分.


来自：wjiachun 时间：00-3-15 15:33:55 ID:200225
来自：sunstone 时间：00-3-12 07:57:04 ID:198292
这分怎吗分?

我的例子

//callback过程,用于查找窗口控件
function EnumChildWindowsProc(H: HWnd; lparam: longint): Boolean; stdcall;
var
Buffer: array[0..10] of Char;
begin
Result := True; //設定為True才會再找下一個
getclassname(h,buffer,10);
if trim(StrPas(Buffer))='Edit' then
begin
ThisUrl:= StrAlloc(250);
SendMessage(h,WM_GETTEXT,249,Integer(ThisUrl));
Result:=False;//設定為false不找下一個
end;
end;

procedure GetUrl;
begin
EnumChildWindows(getforegroundwindow, @EnumChildWindowsProc, 0);
end;

多人接受答案了。