首先，自行创建一个 Midas Server，然后于 remote data module(远程数据模块)的初始化代码区中右击鼠标，你会看到一个弹出菜单，点击 Expose as Corba object 菜单项(下图1示).

  图1:

  之后 Delphi 将会为你做大量的工作把 Midas server 转化成 Corba server。要注意的是，请记住在下图2中高亮显示的 RepositoryID 号，这是十分重要的。

  图2：

  然后编译程序，要连接此服务器，首先要启动 Visibroker Smart Agent,然后再运行此 Corba server.

  在客户端设计时，将 TCorbaConnection 拖到 Form 上，在 server RepositoryID 中键入刚才记下的 RepositoryID 属性（不要指定 server name,Corba 会自动为你发现该运行的 sever 的，然后将 connected 属性置为 true.It's OK 了。

  感受：Delphi 的的确确为我们编程更轻松做了大量的工作啊