++++++多层系统中，应用服务器的主窗体如何访问远程数据模块上的ADO控件+++++

Question

代码怎么写在窗体上呢？
unit1里一般是不写代码的
写在datamodule的unit2里

Answer 1

还是我写吧:
type
  Thehehh = class(TRemoteDataModule, Ihehehh)
    DataSource1: TDataSource;
    ClientDataSet1: TClientDataSet;
  private
    { Private declarations }
  protected
    class procedure UpdateRegistry(Register: Boolean; const ClassID, ProgID: string); override;
  public
    { Public declarations }
  end;implementation{$R *.DFM}class procedure Thehehh.UpdateRegistry(Register: Boolean; const ClassID, ProgID: string);
begin
  if Register then
  begin
    inherited Update..........***********************************************************
type
  TDataModule3 = class(TDataModule)
  private
    { Private declarations }
  public
    { Public declarations }
  end;var
  DataModule3: TDataModule3;implementation
*************************************

Answer 2

另外建立一个DataModule吧，远程数据模块还是提供给客户端去调用，应用程序服务器可以访问它自己的DataModule。

Answer 3

看到两者的区别了吧普通数据模块:
var
  DataModule3: TDataModule3;
定义这样一个实例,你当然可以引用了
远程数据模块是动态激活的,而且它有唯一的输出口,在程序设计过程中,你想引用,引用谁呢? 好像有力量没出用吧,呵呵当然你也可以实例化一个远程数据模块,不过这个模块和客户端激活的那个,可不同哦!