mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2026-03-13 09:24:25 +08:00
Follow up to previous commit: Catch more exceptions when creating the ADO handle. Most probably there are more I know of.
This commit is contained in:
@@ -1000,14 +1000,10 @@ begin
|
||||
// Creating the ADO object throws exceptions if MDAC is missing, especially on Wine
|
||||
FAdoHandle := TAdoConnection.Create(Owner);
|
||||
except
|
||||
on E:Exception do begin
|
||||
if Pos('Data Access Components', E.Message) > 0 then
|
||||
raise EDatabaseError.Create(E.Message+CRLF+CRLF+
|
||||
'On Wine, you can try to install these:'+CRLF+
|
||||
'sh winetricks mdac28')
|
||||
else
|
||||
raise;
|
||||
end;
|
||||
on E:Exception do
|
||||
raise EDatabaseError.Create(E.Message+CRLF+CRLF+
|
||||
'On Wine, you can try to install MDAC:'+CRLF+
|
||||
'sh winetricks mdac28');
|
||||
end;
|
||||
NetLib := '';
|
||||
case Parameters.NetType of
|
||||
|
||||
Reference in New Issue
Block a user