1、新建

如下图

点击OK

依然点击OK

出现了如上图的节面，就像窗体一样。

然后 你就想干什么干什么。

这个做好之后，

这个是我设计的窗体。

然后 就添加 外部可以调用的接口了。

如果你不想让外部调用 就 可以直接像平时用Delphi一样，该干什么干什么。

代码

procedure Set_SnapBuffer(Value: Integer); safecall;
procedure Set_Visible(Value: WordBool); safecall;
procedure MessageShow(Value:WideString);safecall;｛这个是我自己添加的｝
public
{ Public declarations }
procedure Initialize; override;
end;

implementation

然后在下面 写上

 procedure TActiveFormX.MessageShow(value:WideString);

  begin

     Application.MessageBox(PChar(edit1.Text), '提示', MB_OK);

  end;

以上过程就把 接口写完了。接下来，配置环境然后来调试。

出现如下节面

然后如下填写

点击OK

如果你的代码没有写错 就直接通过了

然后

设置启动参数

就可以运行了。

当然是允许了。

然后就出现

这个时候 你就要修改html代码了

<HTML>

<H1> Delphi 7 ActiveX Test Page </H1><p>

You should see your Delphi 7 forms or controls embedded in the form below.

<HR><center><P>

<OBJECT

	  classid="clsid:C4BB6130-AE39-4EDB-98E1-BBAC3089496D"

	  codebase="http://localhost/ActiveFormProj1.ocx#version=1,0,0,0"

	  width=350

	  height=250

	  align=center

	  hspace=0

	  vspace=0

	  ID=jsShow//这个是我添加的

>

</OBJECT>

<script>

jsShow.MessageShow("");//本来不需要参数的，设计失误啊！

</script>

</HTML>

Delphi 做ActiveX的详细过程的更多相关文章

  1. Delphi 编写ActiveX控件（OCX控件）的知识和样例（有详细步骤）

    一.ActiveX应用情况简介: ActiveX控件也就是一般所说的OCX控件,它是 ActiveX技术的一部分.ActiveX是微软公司推出的基于组件对象模型COM的技术,包括对Windows 32 ...

  2. 有谁知道Delphi中"窗口"的创建过程?

      求助:有谁知道Delphi中窗口的创建过程,此“窗口”不仅仅指 TForm 类型, 还包括一般的窗口控件,如TButton,TEdit等等,希望有能够十分详细的运作 过程,比如说CreatPara ...

  3. 第一部分：使用iReport制作报表的详细过程（Windows环境下）

    提示:在有些板块,文中的图片看不到,建议到我的blog浏览文章:http://blog.csdn.net/jemlee2002/文章将会涉及3个方面的内容: 第一部分:使用iReport制作报表的详细 ...

  4. UCOS2_STM32F1移植详细过程（三）

    Ⅰ.概述 上一篇文章是讲述ST芯片相关的配置和OS裁剪相关的配置,接着上一篇文章来讲述关于UCOS的移植,该文主要针对uC/OS-II Ports下面os_cpu_a.asm.os_cpu_c.c和o ...

  5. STM32F0xx_看门狗（独立+窗口）配置详细过程

    Ⅰ.概述 对于看门狗,我觉得做单片机或者嵌入式开发的人员来说并不陌生,今天总结STM32F0看门狗的功能,F0的看门狗有两种:独立和窗口看门狗. 今天提供两种看门狗的软件工程实例,供大家下载. 两种看 ...

  6. STM32F0xx_FLASH编程（片内）配置详细过程

    Ⅰ.概述 关于数据的储存,我觉得编程的人基本上都会使用到,只是看你储存在哪里.STM32的芯片内部FLASH都是可以进行编程的,也就是说可以拿来储存数据.但是,很多做一些小应用程序开发的人都没有利用好 ...

  7. Java通过JNI调用dll详细过程（转）

    源:Java通过JNI调用dll详细过程 最近项目有这样一个需求,在已有的CS软件中添加一个链接,将当前登录用户的用户名加密后放在url地址中,在BS的login方法里通过解密判断,如果为合法用户则无 ...

  8. Centos7.2 搭建Lamp服务器以及迁移WordPress个人博客详细过程

    其实自己的博客搭了有段时间了,但是由于自己不太确定是不是一定要用wd的框架,以及实验室公网服务器的不稳定,就一直荒废着. 今天偶然间看到了腾讯云对于学生的优惠活动,毕业之前每月只要8元的云服务器(就算 ...

  9. docker安装配置gitlab详细过程

    docker安装配置gitlab详细过程   获取镜像 1.方法一 1 docker pull beginor/gitlab-ce:11.0.1-ce.0 2.方法二如果服务器网路不好或者pull不下 ...

随机推荐

  1. js中typeof的用法

    一. 经常会在js里用到数组,比如 多个名字相同的input, 若是动态生成的, 提交时就需要判断其是否是数组. if(document.mylist.length != "undefine ...

  2. Solr4.8.0源码分析(1)之Solr的Servlet

    Solr是作为一个Servlet运行在Tomcat里面的,可以查看Solr的web.xml. 1.web.xml配置 由web.xml可以看出,基本上所有Solr的操作都是在SolrDispatchF ...

  3. 用C#实现网络爬虫（二）

    上一篇<用C#实现网络爬虫(一)>我们实现了网络通信的部分,接下来继续讨论爬虫的实现 3. 保存页面文件 这一部分可简单可复杂,如果只要简单地把HTML代码全部保存下来的话,直接存文件就行 ...

  4. centos7 install mysql

    1. 下载mysql的repo源 $ wget http://repo.mysql.com/mysql-community-release-el7-5.noarch.rpm 2. 安装mysql-co ...

  5. v$session_wait p1 p1raw p1_16

    SQL> select * from v$mystat where rownum<2; SID STATISTIC# VALUE ---------- ---------- ------- ...

  6. POJ3083 Children of the Candy Corn（搜索）

    题目链接. 题意: 先沿着左边的墙从 S 一直走,求到达 E 的步数. 再沿着右边的墙从 S 一直走,求到达 E 的步数. 最后求最短路. 分析: 最短路好办,关键是沿着墙走不太好想. 但只要弄懂如何 ...

  7. COJN 0575 800601滑雪

    800601滑雪 难度级别:B: 运行时间限制:1000ms: 运行空间限制:51200KB: 代码长度限制:2000000B 试题描述 Michael喜欢滑雪百这并不奇怪, 因为滑雪的确很刺激.可是 ...

  8. java容器类总结

    1.java容器分类图 说明:左图为简化图(其中粗线部分是重点的容器),右图为完整容器分类图                          2.容器类接口和抽象容器类 2.1 说明 容器接口是容器 ...

  9. LeetCode——Two Sum

    Given an array of integers, find two numbers such that they add up to a specific target number. The ...

  10. UVAlive3523 Knights of the Round Table（bcc）

    题目链接:http://acm.hust.edu.cn/vjudge/problem/viewProblem.action?id=18122 [思路] 点-双连通分量 求出bcc,判断每个bcc是否为 ...