各位大虾:一个问题(130分)(130分)

  • 主题发起人 主题发起人 TonyWang
  • 开始时间 开始时间
T

TonyWang

Unregistered / Unconfirmed
GUEST, unregistred user!
各位大虾:
鄙人在用API时,总是不太尽如人意,不知为何,具体如下:
本人在程序中嵌入IE ACTIVEX的WebBrowser控件,当响应其saveas时,
IE自动打开“保存为”的窗口,我想让程序自动响应回车。

我的方法为:
procedure TForm1.Timer1Timer(Sender: TObject);
var FindHandle:Thandle;
begin
FindHandle:=findwindow(nil,'另存为');
if FindHandle<>0 then
sendMessage(FindHandle,WM_KEYDOWN,VK_RETURN,1);
end;

小弟不知哪里错了,请英雄们赐教!
 
给form送return有什么用
应该是给button送return,找childwindow吧
 
FindHandle:=findwindow(nil,'另存为');
if FindHandle<>0 then
sendMessage(FindHandle,WM_KEYDOWN,VK_RETURN,1);
 
SendMessage执行了没有?
 
用对API更菜。。。
 
WebBrowser控件的saveas事件好像有参数可以不弹出对话框而自动保存。
 
接受答案了.
 
后退
顶部