Question

我正在使用以下代码以实用方式设置DataSnap Connection

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＆amp; PC1＆amp; RSA过滤器是否实用？

Answer 1

如果你看一下dfm文件，你会看到Object Inspector中魔术Driver属性发生了什么。您所做的选择存储在TSQLConnection.Params中，用于名称过滤器。

要添加过滤器，您可以执行此操作。

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

但是，这仍然会在Delphi XE – Datasnap Filter problems {{3}}中获得Connection Closed Gracefully。

Delphi Datasnap-XE：如何实用地设置过滤器？

1 个答案: