• 一 创建ActiveForm工程


          使用Delphi ActiveForm的功能开发一个可以在浏览器中执行的Delphi应用程序。由于ActiveForm可以包含任何Delphi中的VCL组件,所以程序员可以建立一个拥有数据感知能力的ActiveForm组件,具有处理数据的能力,当它使用于IE时,就可以让IE变成能够处理数据的应用系统。

      使用Delphi ActiveForm的功能开发一个可以在浏览器中执行的Delphi应用程序时,与通常的Delphi开发应用程序并不相同。Delphi开发在C/S模式下运行的应用程序,通常选择菜单项“File”—〉“New”—〉“Application”,从而建立一个新的project来完成。

      开发在B/S模式下运行的应用程序,和C/S模式有些区别。 

          现在我们以一个最简单的实例,来介绍如何实现一个ActiveForm的程序。

          首先在Delphi 7中关闭所有的项目,接着选择“File”—〉“New”,在New Items对话框中切换到ActiveX选项卡中选择建立Active Form。然后点OK按钮,在向导窗体中输入New ActiveX name,这里我输入一个AFHello,其它保持默认,点OK

      

      这时Delphi为我们建立好了一个ActiveForm的窗体,我们先拉一个按钮到窗体上,把按钮的name属性设为btnHello,Caption设为say hello,在按钮的onclick事件中,输入编程:

      procedure TAFHello.btnHelloClick(Sender: TObject);
       begin
         MessageBox(Handle,'我的第一个ActiveForm','hello',mb_ok)
       end; 

      代码的部份完成了,选择菜单"File"->"Save All",保存所有工程,我这里是将工程中的所有文件保存在“D:\AFHello"目录下,下面就是要将ActiveForm发布出来了,从下拉菜单中选中"Project"->"Web Deployment Options",在弹出的窗口输入如下信息

    Target dir   :OCX保存的本地目录中

    Target URL : OCX发布后的虚拟目录,这里".\"表示在根目下

    HTML dir     :delphi 为我们输出一个包含控件的Html文件的存放目录

    点击OK按钮,然后从下拉菜单中选中"Project"->"Web Deploy",进行发布,在目标目录中生成了一个html文件和一个ocx文件,从IE加载html文件,就可以运行ocx了.用鼠标点击一个"say hello"按钮,看看运行情况是怎么样的。

    哈哈,第一个ActiveForm工程就完成了!

          

  • 相关阅读:
    [转]Maven 初学+http://mvnrepository.com/
    比较IDEA与Eclipse
    [web] 使用Promise封装fetch实现网络超时,终止请求的功能
    [web] 理解和使用Promise.all和Promise.race
    [Web] How to Test React and MobX with Jest
    [Web 测试] Jest单元测试的几个指标
    [Web] 取消Promise
    [安全分析] 安全分析中的威胁情报(一)
    [Web] 深入理解现代浏览器
    [Web] HTML5新特性history pushState/replaceState解决浏览器刷新缓存
  • 原文地址:https://www.cnblogs.com/zhusd/p/1735904.html
Copyright © 2020-2023  润新知