如何才能用Tsocketconnection作多层数据库程序，请帮忙谢先！谢先！

Question

指定socketconnection的
    ServerGUID = '{D17375C3-4E9B-11D5-A9A1-5254AB10CA74}'
    ServerName = 'Project1.ktvforwin98'//应用服务器，要先注册
    Host = 'vicki'
 还有要在应用服务器上执行scktsrvr.exe
最后socketconnection.connect:=true就可以

Answer 1

你好，我做过，方法如下：
1、先要做好服务器端并运行，在系统注册
2、在客户端指定socketconnection的
   Address=服务器端IP地址
   ServerName=选择对应的服务器端连接模块
   ServerGUID=自动填入注册码
   然后connected:=true就可以连上服务器端
3、加入客户端数据集控件，以下就和本地编程一样了 

Answer 2

还有记住在DataSet.AfterPost时，记得ClientDataSet1.ApplyUpdates(-1);如果你在应用层定义很多方法给客户端调用时，最好写个单元用来封装它的方法。
for example:  server:
    proc1;
    ...
    func1:
    ...一般在客户调用时是
  SocketConnection1.Appserver.Proc1;
  ...
  SocketConnection1.Appserver.func1;
  ...最好写个单元：
var
  IMyData: IMyInterfaceDisp;function IData: IMyInterfaceDisp;
begin
  if not Assigned(IMyData) then
    IMyData := IMyInterfaceDisp(IDispatch(SocketConnection1.AppServer));
  Result := IMyData;
end;procedure Proc1;
begin
  IData.Proc1;
end;....
function Func1: Variant;
begin
  result := IData.Func1;
end;
...