opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 11:17:57 +08:00
Code Issues Packages Projects Releases Wiki Activity

Introduce some wrapper functions for message and error dialogs in order to have less code and to avoid hidden titles on Windows XP. Fixes issue #2425.

Browse Source
This commit is contained in:
Ansgar Becker
2011-05-27 04:48:21 +00:00
parent 478c0306c7
commit 2d548b5ef6
21 changed files with 156 additions and 117 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
source/tabletools.pas
View File

@ -481,7 +481,7 @@ var
end;
on E:EFCreateError do begin
// Occurs when export output file can not be created
MessageDlg(E.Message, mtError, [mbOK], 0);
ErrorDialog(E.Message);
FCancelled := True;
end;
end;
@ -896,7 +896,7 @@ begin
except
on E:EDatabaseError do begin
Screen.Cursor := crDefault;
MessageDlg(E.Message, mtError, [mbOK], 0);
ErrorDialog(E.Message);
comboExportOutputType.ItemIndex := FLastOutputSelectedIndex;
comboExportOutputType.OnChange(Sender);
end;