DCOMConnection 注册的问题 高手请进

Question

DCOMConnection 程序编写以后分发客户端  怎样注册接口？注册类型库的程序 teregsvr.exe 如何用？客户端注册TLB文件，在客户端程序里写TLB的注册代码增样写？谢谢高手！

Answer 1

procedure bb_okClick(Sender: TObject);
var machine, password, username, Connstr, passwordStr: string;
  Registry: TRegistry;
  i: integer;
begin
  machine := machineE.text;
  username := usernameE.text;
  password := PasswordE.text;
  Connstr := 'Provider=SQLOLEDB.1;Password=' + password + ';Persist Security Info=True;User ID=' + userName + ';Initial Catalog=''数据库名'';Data Source=' + machine;
  Frm_main.repADO.ConnectionString :=Connstr;
  try
    Frm_main.repADO.Open;
    for i := 1 to length(password) do
      passwordStr := passwordStr + chr(ord(password[i]) + (i * i - 43));
    registry := TRegistry.Create;
    with registry do
    begin
      rootkey := HKEY_LOCAL_MACHINE;
      if OpenKey('\Software\Misystem\database', True) then
      begin
        WriteString('machine', machine);
        WriteString('username', username);
        WriteString('password', passwordStr);
      end;
      CloseKey;
      Destroy;
      close;
      application.MessageBox('SQLSERVER数据库配置正确,请重新启动！','提示信息',mb_ok+mb_iconinformation);
      application.Terminate;
    end
  except
    begin
      messagebox(application.Handle, '服务器配置不正确，无法连接数据库服务器！', '提示！', 0);
    end
  end;
end;

Answer 2

DCOMConnection 程序编写以后分发客户端  怎样注册接口？
运行服务器程序即可。注册类型库的程序 teregsvr.exe 如何用？
运行、\regsvr32\你的DLL路径。客户端注册TLB文件，在客户端程序里写TLB的注册代码增样写？
在USE里加入_TLB文件的引用。在searchpath中加入_TBL的路径。

Answer 3

我也刚做三层，对于您的问题不太明白：我分发客户端时，把程序和midas.dll分发到客户机上即可，服务端也一样，但需要运行一次程序进行注册，然后配置DCOMCNFG即可。

Answer 4

用_TLB 中的ＣＯ Class创建对象，用IＸＸ接口存取数据试试。

Answer 5

我想在DCOM用程序指定端口,
怎么实现啊,
此外,在DCOM中--我的电脑设置身份为'连接'
程序又该怎么写啊,
THANK YOU