Delphi TFDConnection Exception在发布模式下发生了项目构建

时间:2018-06-06 13:30:03

标签: delphi pascal firedac

在Delphi中运行此代码。如果我在" Debug模式"中运行它,它工作正常,但是当我在Release Mod中构建此项目时,我遇到了访问冲突异常。我真的不知道为什么......

代码:

if not SQLConnection.Connected then begin
  DatabaseValues := TStringList.Create;
  try
    IniFile := TPataxPlusGlobal.ClientIniFilename;
    if FileExists(IniFile) then begin
      TIniFileHelper.ReadSectionValuesFromIniFile(INI_SECTION_DATABASE, DatabaseValues, IniFile);
      SQLConnection.TxOptions.AutoCommit := cbAutoCommit.Checked;
      SQLConnection.Params.Add('Server=' + DatabaseValues.Values['Server']);
      SQLConnection.Params.Add('Database=' + 'pps');
      SQLConnection.Params.Add('User_Name=' + DatabaseValues.Values['Nutzer']);
      SQLConnection.Params.Add('Password=' + TPataxPlusUtil.DecryptStr(DatabaseValues.Values['Passwort']));
      SQLConnection.Params.Add('Port=' + DatabaseValues.Values['Port']);

      SQLConnection.Open;  //This line throw the Exception
    end;
  finally
    DatabaseValues.Free;
  end;
end;

这就是例外:

  

在模块' PataxPlusClient.exe'中的地址00000000处访问冲突读取地址00000000

1 个答案:

答案 0 :(得分:-1)

用于连接的组件是什么?

也检查行

SQLConnection.Params.Add('Password=' + TPataxPlusUtil.DecryptStr(DatabaseValues.Values['Passwort']));

是否已创建连接组件?