Delphi Datasnap XE:如何实用地设置过滤器?

Delphi Datasnap XE:如何实用地设置过滤器?,delphi,delphi-xe,datasnap,Delphi,Delphi Xe,Datasnap,我使用以下代码实际地设置DataSnap连接 procedure TConnectThreed.Execute; var DataSnapCon : TSQLConnection; proxy : TSystemRDMClient; begin proxy := nil; DataSnapCon := nil; try DataSnapCon := TSQLConnection.Create(nil); DataSnapCon.

我使用以下代码实际地设置DataSnap连接

procedure TConnectThreed.Execute;
var
    DataSnapCon : TSQLConnection;
    proxy       : TSystemRDMClient;
begin
  proxy       := nil;
  DataSnapCon := nil;
  try
    DataSnapCon := TSQLConnection.Create(nil);
    DataSnapCon.Connected := False;
    DataSnapCon.DriverName := 'DATASNAP';
    DataSnapCon.LoginPrompt := False;
    DataSnapCon.Params.Values['port'] :=  '211';
    DataSnapCon.Params.Values['HostName'] :=  DevicesAddr;
    // 
    // What code must be added here to setup a Zlib + PC1 +RSA Filter ?
    // 
    try
      DataSnapCon.Open;
      proxy := TSystemRDMClient.Create(DataSnapCon.DBXConnection);
问题:


如何实用地设置Zlib&PC1&RSA过滤器?

如果查看
dfm
文件,您会看到对象检查器中的magic Driver属性发生了什么变化。您所做的选择存储在名称筛选器的
TSQLConnection.Params

要添加过滤器,您可以这样做

DataSnapCon.Params.Values['Filters'] :=
  '{"ZLibCompression":{"CompressMoreThan":"1024"},'+
   '"PC1":{"Key":"LiveStrongLance!"}}';

但是这仍然会让您在这里体验到的
连接优雅地关闭。

如果您查看
dfm
文件,您会看到对象检查器中的magic Driver属性发生了什么。您所做的选择存储在名称筛选器的
TSQLConnection.Params

要添加过滤器,您可以这样做

DataSnapCon.Params.Values['Filters'] :=
  '{"ZLibCompression":{"CompressMoreThan":"1024"},'+
   '"PC1":{"Key":"LiveStrongLance!"}}';

但这仍然会让您在这里体验到的
连接优雅地关闭。

什么是
PC1过滤器
?@Jeroen:查看此链接感谢您教我一些新东西。什么是
PC1过滤器
?@Jeroen:查看此链接感谢您教我一些新东西。