文档章节

TWebBrowser 与 MSHTML(2): 获取 window 对象的时机

涂孟超
 涂孟超
发布于 2014/09/26 15:36
字数 145
阅读 6
收藏 0
点赞 0
评论 0

这是在页面下载完毕后即刻获取:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OleCtrls, SHDocVw, StdCtrls;

type
  TForm1 = class(TForm)
    WebBrowser1: TWebBrowser;
    Button1: TButton;
    Button2: TButton;
    procedure FormCreate(Sender: TObject);
    procedure WebBrowser1DocumentComplete(ASender: TObject;
      const pDisp: IDispatch; var URL: OleVariant);
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

uses MSHTML;
var window: IHTMLWindow2;

{建立时同时打开页面}
procedure TForm1.FormCreate(Sender: TObject);
begin
  WebBrowser1.Align := alTop;
  WebBrowser1.Navigate('http://del.cnblogs.com');
end;

{当页面打开完毕时获取 window 对象}
procedure TForm1.WebBrowser1DocumentComplete(ASender: TObject;
  const pDisp: IDispatch; var URL: OleVariant);
begin
  if pDisp = (ASender as TWebBrowser).Application then
  begin
    window := ((ASender as TWebBrowser).Document as IHTMLDocument2).parentWindow;
  end;
end;

end.

 
 
 
 
 

 

 

  

本文转载自:http://www.cnblogs.com/del/archive/2009/03/13/1410930.html

共有 人打赏支持
涂孟超
粉丝 12
博文 2004
码字总数 14107
作品 0
深圳
程序员
IE编程2(.net)——通过应用程序打开google并进行搜索

本博客(http://blog.csdn.net/livelylittlefish)贴出作者(三二一、小鱼)相关研究、学习内容所做的笔记,欢迎广大朋友指正! IE编程——通过应用程序打开google并进行搜索 通过应用程序操...

晨曦之光 ⋅ 2012/03/09 ⋅ 0

delphi中Webbrowser

1.获得网页中变量值 htm中<script> var currID=123</script> 程序中可以这么调用 id := Form1.WebBrowser1.OleObject.Document.script.currID 值得说明的是,变量可以是javascript定义的,也可......

任远 ⋅ 2015/05/08 ⋅ 0

delphi 设置 TwebBrowser 背景色与所在form颜色一致

uses SHDocVw, mshtml IHtmlDocument2(WebBrowser1.Document).body.style.background := ColorToWebColorStr(Form1.Color);...

jingshishengxu ⋅ 2010/11/30 ⋅ 0

delphi与网页交互

HTML的界面有以下特点:图文混排,格式灵活,可以包含Flash、声音和视频等,实现图文声像的多媒体界面,而且易于建立和维 护。另外,HTML的显示环境一般机器上都具备,通常不需要安装额外的软...

伽罗kapple ⋅ 2015/01/04 ⋅ 0

Context Activity Service Application之间的关系

Context: 1、它描述的是一个应用程序环境的信息,即上下文。 2、该类是一个抽象(abstract class)类,Android提供了该抽象类的具体实现类(后面我们会讲到是ContextIml类)。 3、通过它我们可以...

TedYin ⋅ 2013/11/12 ⋅ 0

JavaScript函数介绍

一、函数定义 1、函数声明 2、函数表达式 3、对象实例化(一般不使用) 二、函数声明与对象实例化、函数表达式的区别 1、函数声明可以在函数声明之前调用。 而对象实例化、函数表达式只能在定义...

AAASSSSddd ⋅ 2016/10/16 ⋅ 0

怎么才能用 ie 插件(不是控件)拿到 当前页面的 dom 对象

需求是拿到另外一个系统中拿到段文本,但改不了另外一个系统的代码,目前限定的是 IE6,想通过编写一个 IE 插件(类型 IE 的 F12 网页调试工具),通过这个 IE 插件 来拿到当前活动页面的 DOM ...

clt ⋅ 2014/06/27 ⋅ 2

怎样访问Internet Explorer中的WebBrowser

[Delphi]怎样访问Internet Explorer中的WebBrowser [转贴 2009-12-30 19:10:38] 字号:大 中 小 下面就是一个例子展示如何从打开的Internet Explorer中取得其网页元素的HTML源代码: const ...

伽罗kapple ⋅ 2014/12/27 ⋅ 0

01-老马jQuery教程-jQuery入口函数及选择器

前言 这套jQuery教程是老马专门为寒门子弟而录制,希望大家看到后能转发给更多的寒门子弟。视频都是免费,请参考课程地址:https://chuanke.baidu.com/s5508922.html 1.什么是jQuery? 1.1 ...

aicoder ⋅ 2017/11/24 ⋅ 0

三、jQuery事件处理

一、加载DOM 在页面加载完毕后,浏览器会通过Javascript为DOM元素添加事件。在常规的Javascript代码中,通常使用window.onload方法,而在jQuery中,使用的是$(document).ready()方法。 1、执...

Winnie007 ⋅ 2015/11/16 ⋅ 1

没有更多内容

加载失败,请刷新页面

加载更多

下一页

用ZBLOG2.3博客写读书笔记网站能创造今日头条的辉煌吗?

最近两年,著名的自媒体网站今日头条可以说是火得一塌糊涂,虽然从目前来看也遇到了一点瓶颈,毕竟发展到了一定的规模,继续增长就更加难了,但如今的今日头条规模和流量已经非常大了。 我们...

原创小博客 ⋅ 今天 ⋅ 0

MyBatis四大核心概念

本文讲解 MyBatis 四大核心概念(SqlSessionFactoryBuilder、SqlSessionFactory、SqlSession、Mapper)。 MyBatis 作为互联网数据库映射工具界的“上古神器”,训有四大“神兽”,谓之:Sql...

waylau ⋅ 今天 ⋅ 0

以太坊java开发包web3j简介

web3j(org.web3j)是Java版本的以太坊JSON RPC接口协议封装实现,如果需要将你的Java应用或安卓应用接入以太坊,或者希望用java开发一个钱包应用,那么用web3j就对了。 web3j的功能相当完整...

汇智网教程 ⋅ 今天 ⋅ 0

2个线程交替打印100以内的数字

重点提示: 线程的本质上只是一个壳子,真正的逻辑其实在“竞态条件”中。 举个例子,比如本题中的打印,那么在竞态条件中,我只需要一个方法即可; 假如我的需求是2个线程,一个+1,一个-1,...

Germmy ⋅ 今天 ⋅ 0

Springboot2 之 Spring Data Redis 实现消息队列——发布/订阅模式

一般来说,消息队列有两种场景,一种是发布者订阅者模式,一种是生产者消费者模式,这里利用redis消息“发布/订阅”来简单实现订阅者模式。 实现之前先过过 redis 发布订阅的一些基础概念和操...

Simonton ⋅ 今天 ⋅ 0

error:Could not find gradle

一.更新Android Studio后打开Project,报如下错误: Error: Could not find com.android.tools.build:gradle:2.2.1. Searched in the following locations: file:/D:/software/android/andro......

Yao--靠自己 ⋅ 昨天 ⋅ 0

Spring boot 项目打包及引入本地jar包

Spring Boot 项目打包以及引入本地Jar包 [TOC] 上篇文章提到 Maven 项目添加本地jar包的三种方式 ,本篇文章记录下在实际项目中的应用。 spring boot 打包方式 我们知道,传统应用可以将程序...

Os_yxguang ⋅ 昨天 ⋅ 0

常见数据结构(二)-树(二叉树,红黑树,B树)

本文介绍数据结构中几种常见的树:二分查找树,2-3树,红黑树,B树 写在前面 本文所有图片均截图自coursera上普林斯顿的课程《Algorithms, Part I》中的Slides 相关命题的证明可参考《算法(第...

浮躁的码农 ⋅ 昨天 ⋅ 0

android -------- 混淆打包报错 (warning - InnerClass ...)

最近做Android混淆打包遇到一些问题,Android Sdutio 3.1 版本打包的 错误如下: Android studio warning - InnerClass annotations are missing corresponding EnclosingMember annotation......

切切歆语 ⋅ 昨天 ⋅ 0

eclipse酷炫大法之设置主题、皮肤

eclipse酷炫大法 目前两款不错的eclipse 1.系统设置 Window->Preferences->General->Appearance 2.Eclipse Marketplace下载【推荐】 Help->Eclipse Marketplace->搜索‘theme’进行安装 比如......

anlve ⋅ 昨天 ⋅ 0

没有更多内容

加载失败,请刷新页面

加载更多

下一页

返回顶部
顶部