请教各位,如何用delphi编程控制 IE,有相关的资料请推荐
解决方案 »
- indy10 idhttp post 模拟登录 网站 怎么也不成功 ?
- 用Delphi实现简单多文档编辑器--查找、替换时无法选定文字
- 【急求】把截屏保存成wmv
- delphi程序员的价值在于享受生活(不好意思没分给就只有100分)
- 我想请问各位,cxgrid得到当前行和当前列的函数是啥?好比dxgrid的FocusedColumn
- 关于热键的问题
- 在做数据库查询时如何点击 查询 按钮 后弹出一个小窗体在上面显示进度条,当然这个进度条可以为假的,并不表示数据库查询的进度。
- Delphi中如何实现万能查询?,请大家讨论.
- opendialog打开和保存的是???
- 我想把几幅BMP图象放在IMAGELIST中,然后根据需要取出放在IMAGE中,可惜不行~~
- 请问怎么实现任意一个控件的透明。
- 在delphi中,我要使 被shellexecute所调用的exe文件执行完后 ,我的主程序才执行后面的代码,我应该怎样做??
流行的技术是用COM,
这类的资料网上很少的,
我也想找一些,
但都无功而返。
1、让已打开的IE打开另一个指定的主页(地址在程序中指定)。
2、如何让正在打开的IE停止。(即停止按扭被按下的功能)。
3、在程序中如何关闭一个IE。uses Comobj, ... ... ;
{...}
var
Form1: TForm1;
IEApp: Variant;{...}
procedure TForm1.Button1Click(Sender: TObject);
begin
IEApp := CreateOLEObject('InternetExplorer.Application');
IEApp.visible := true;
IEApp.Top := 0;
IEApp.Left := 0;
IEApp.width := screen.width;
IEApp.height := screen.height;
IEApp.Navigate('http://www.delphibbs.com');
end;IE的其它的控制:
IEApp.GoForward ;
IEApp.GoBack ;
IEApp.GoHome ;
IEApp.Refresh ;
IEApp.Stop ;
IEApp.GoHome ;
IEApp.FullScreen := true;
IEApp.StatusText := 'My Status Text';
IEApp.Path := Show Path to IE
IEApp.FullName := Full Path to IE
IEApp.LocationURL := Get active Url
IEApp.quit;