XE8_DataSnap设置

1、参考文章

http://blog.csdn.net/l799623787/article/details/17002979

ZC: 系列在这里：http://www.cnblogs.com/ChinaEHR/p/3373364.html

 

 

ZC: 以下设置信息，以我的 例子代码中的信息为准

2、Server端 设置：

　　2.1、在 srvServerMethods.pas (TServerMethods1) 中拖入3个控件：

　　　　2.1.1、SQLConnection1: TSQLConnection;

SQLConnection1.DriverName := g_dbInfo.FstrDriverName;
SQLConnection1.Params.Values['HostName'] := g_dbInfo.FstrIp;//+','+g_dbInfo.FstrPort;
SQLConnection1.Params.Values['Port'] := g_dbInfo.FstrPort;
SQLConnection1.Params.Values['Database'] := g_dbInfo.FstrDatabase;
SQLConnection1.Params.Values['UserName'] := g_dbInfo.FstrUserName;
SQLConnection1.Params.Values['Password'] := g_dbInfo.FstrPassword;

　　　　2.1.2、SQLQuery1: TSQLQuery;

　　　　　　SQLConnection 选择 SQLConnection1

　　　　2.1.3、DataSetProvider1: TDataSetProvider;

　　　　　　DataSet 选择 SQLQuery1

　　　　　　Options 中 √选：

　　　　　　　　poIncFieldProps / poAllowCommandText / poUseQuoteChar

 

3、Client端 设置：

　　3.1、在 DataModule 中拖入3个控件：

　　　　3.1.1、SQLConnection1: TSQLConnection;

　　　　　　Driver 选择 DataSnap

DataModule1.SQLConnection1.Params.Values['HostName'] := '192.168.1.233';
DataModule1.SQLConnection1.Params.Values['Port'] := '211';

　　　　3.1.2、DSProviderConnection1: TDSProviderConnection;

　　　　　　ServerClassName 填入 TServerMethods1　　　　(ZC: 这里 顾名思义，填的就是Server端的Methods类的类名)

　　　　　　SQLConnection 选择 SQLConnection1

　　　　3.1.3、ClientDataSet1: TClientDataSet;

　　　　　　ProviderName 填入 DataSetProvider1　　　　(ZC: 这里，填入的是 Server端的DataSetProvider的 对象名)

　　　　　　RemoteServer 选择 DSProviderConnection1

4、

5、