一个客户端.exe程序,通过MIDAS服务器端dll和SQL Server连接
如何用COM封装这个客户端.exe程序,exe程序里有几个过程(比如数据查询,修改)??

解决方案 »

  1.   

    做成自动化服务器,如果你已经有了这个exe的代码,你可以直接利用它.另外在建立一个单元,在单元中定义接口,而接口的方法可以直接调用你的exe中的现有函数或者方法,然后在initialization过程中创建相应的类工厂实例就可以了,然后运行程序注册,以后你就可以在其他程序启用这个COM(当然这是个进程外COM),并利用接口调用exe中的方法!
      

  2.   

    而客户端是远程调用服务器端所提供的function,在客户端里已经做了个Unit来声明这个远程接口。如下的一个子过程:
    procedure Tmainform.BitBtnSendClick(Sender: TObject);
      var
        ediobj:IEDISvr;
        res:string;
    begin
         ediobj:=(HTTPRIO1 as IEDISvr);
         res:=ediobj.sendedi(editCode.Text,editID.text,editPW.text,editType.Text,memo1.Lines.Text);
         showmessage(res);end;
    要是另外再建立一个单元,在单元中定义接口做输出COM,这样还可以?