在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
答案 0 :(得分:-1)
用于连接的组件是什么?
也检查行
SQLConnection.Params.Add('Password=' + TPataxPlusUtil.DecryptStr(DatabaseValues.Values['Passwort']));
是否已创建连接组件?