我正在尝试使用 fireDAC 将我的 Delphi 应用程序连接到 Informix 数据库。我在连接编辑器中提供了所有参数。但我必须运行 PA Server 才能使其工作。
那么是否有必要运行 PA 服务器来连接到 Informix db。
我正在尝试使用 fireDAC 将我的 Delphi 应用程序连接到 Informix 数据库。我在连接编辑器中提供了所有参数。但我必须运行 PA Server 才能使其工作。
那么是否有必要运行 PA 服务器来连接到 Informix db。
我可以使用以下代码连接而不是拖放控件来解决它:
procedure TForm1.FormCreate(Sender: TObject);
var
Params: TStringList;
begin
FDManager := TFDManager.Create(self);
FDconnection := TFDConnection.Create(self);
FDQuery := TFDQuery.Create(self);
FDataSOurce := TDataSource.Create(self);
Params := TStringList.create;
Params.Values['User_Name'] := paramstr(3);
Params.Values['Database'] := paramstr(2);
Params.Values['Password'] := paramstr(4);
Params.Values['DriverName'] := 'Informix';
Params.Values['HostName'] := paramstr(1);
Params.Values['RDBMS'] := 'OTHER';
Params.Values['DriverID'] := 'TDBX';
FDManager.AddConnectionDef('BOSSConnection', 'TDBX', Params);
FDConnection.DriverName := 'TDBX';
FDConnection.ConnectionDefName:='BOSSConnection';
FDConnection.Connected := True;
FDQuery.SQL.Add('select first 10 cust_code, bus_name, status from strcustr;');
FDQuery.Connection := FDConnection;
FDataSource.DataSet := FDQuery;
FDQuery.Active := True;
DBGrid1.DataSource := FDataSource;
FDConnection.LoginPrompt := False;
end;