opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2025-08-26 03:01:07 +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/options.pas
View File

@ -616,9 +616,9 @@ var
i: Integer;
begin
// Factory defaults
if TaskMessageDlg('Reset all preference options to default values?',
if MessageDialog('Reset all preference options to default values?',
'This also applies to automatic settings, e.g. toolbar positions.',
mtConfirmation, [mbOK, mbCancel], 0) = mrCancel then
mtConfirmation, [mbOK, mbCancel]) = mrCancel then
Exit;
OpenRegistry;
ValueList := TStringlist.Create;