如何取得当前IE窗口的URL和TITLE(50分)

  • 主题发起人 主题发起人 liguang
  • 开始时间 开始时间
L

liguang

Unregistered / Unconfirmed
GUEST, unregistred user!
同题.这个问题我急着解决.只要能解决,不管是你自己答和或者是从论坛以前记
录中贴的,都给分.
 
来自: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;


 
wjiachun兄你好:
你的答案正常,现在问题已经全部解决.这里50分就全给你了.
 
后退
顶部