鸿 网 互 联 www.68idc.cn

当前位置 : 服务器租用 > 编程语言开发 > delphi > >

delphi7中手工建立cbx的xo工程

来源:互联网 作者:佚名 时间:2015-07-05 21:28
主要用于没有使用clxbase7集成开发环境的cbx应用开发者。 1、 在普通的delphi7中建立xo首先是打开file -new ,选择dll wizard,新建一个dll,修改,dpr的内容如下 library adosvr; //这个名称就是xo的名称 uses SysUtils, Classes; begin end. 2、然后加入x

  主要用于没有使用clxbase7集成开发环境的cbx应用开发者。

  1、 在普通的delphi7中建立xo首先是打开file -new ,选择dll wizard,新建一个dll,修改,dpr的内容如下

  library adosvr; //这个名称就是xo的名称

  uses

  SysUtils,

  Classes;

  begin

  end.

  2、然后加入xo的祖先单元uEntityRoot in ‘..“..“..“CBX“Apps“Units“uEntityRoot.pas‘ {EntityRoot: TDataModule},代码就成了

  library xodemo;

  uses

  SysUtils,

  Classes,

  uEntityRoot in ‘..“..“CBX“Apps“Units“uEntityRoot.pas‘ {EntityRoot: TDataModule};

  {$E xo}

  begin

  end.

  3、创建xo的核心模块demoxo,file-new -other ,选xodemo页,选EntityRoot,继承这个单元,并命名为xoado,因为我要使用ado的数据连接组件,故这样命名。同时修改窗口名为demoxo ,这个名称是在ao中调用时ro组件中要设置的服务名。注意这个名称一定要记住。修改project options ,runtime packages 选择 build with runtime packages,add d:“cbx“sdk“lib“AppSvrRT.dcp ,设置search path D:“CBX“SDK“Lib ,设置 output direxcTory D:“CBX“SDK“__Deploy 到这里xo的设置工作就完成了。

  4、修改 xoado单元的代码

  unit xoado;

  interface

  uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, uEntityRoot, HTTPApp;

  type

  Tdemoxo = class(TEntityRoot)

  procedure DataModuleCreate(Sender: TObject);

  private

  { Private declarations }

  public

  { Public declarations }

  end;

  var

  首页12 尾页

上一篇:为何选择Indy?
下一篇:Delphi中的消息
网友评论
<