如何获取新打开的IE窗体的句柄
主要是 新开的IE的句柄我想 让程序 新开一个IE 然后获取句柄 然后发送点击消息 然后再关闭现在就是不知道如何获取新打开的IE窗体的句柄
主要是 新开的IE的句柄我想 让程序 新开一个IE 然后获取句柄 然后发送点击消息 然后再关闭现在就是不知道如何获取新打开的IE窗体的句柄
解决方案 »
- 5年不编程的来学delphi的老头子有希望吗?
- 全部家当了,来看看吧
- 关于以太网通讯
- adoquery.sql.add(strSql),弹出"oracle error occurred,but error message could not be retrieved from oracle",这是啥意思
- 函数调用的问题!
- 好痛苦,高手过来救命啊!
- 怪事:for循环中循环变量值竟然大于边境值
- 我要使DBGrid中显示的记录以某一个字段ID升序排列,怎么设置?而且在添加一行的时候,这个字段自动加1,不用人工输入呢?
- StoredProc奇怪的问题??解决马上给分!!!
- chm文件的格式是怎样的?在delphi中如何实现编译html文件成chm文件
- 麻烦大家帮我解决一下DELPHI问题,多谢!
- 如何转换成十六进制?
var DDEClient: TDDEClientConv;
AddressStr: PChar;
s:string;
i:integer;
begin
DDEClient:= TDDEClientConv.Create(nil);
try
with DDEClient do
begin
SetLink('IExplore', 'WWW_GetWindowInfo');
AddressStr:= RequestData('0xFFFFFFFF');
s:= StrPas(AddressStr); if pos('://',s)=0 then exit; StrDispose(AddressStr);
CloseLink;
delete(s,1,1);
i:=pos('","',s);
delete(s,i,length(s)-i+1);
Result:=s;
end;
finally
DDEClient.Free;
end;
end;
var
IEHandle:THandle;
buf1:Dword;
begin
IEHandle:=Findwindow('IEFrame',nil);
GetWindowThreadProcessId(IEHandle,@buf1);
if Buf1<>0 then
TerminateProcess(OpenProcess(PROCESS_TERMINATE,False,buf1),$FFFFFFFF);
end;