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

Check KeepAskingSetting in MessageDialog() on older Windows versions. Broken since r4302. Fixes issue #3147.

Browse Source
This commit is contained in:
Ansgar Becker
2013-03-28 18:13:58 +00:00
parent 690ac1691c
commit ff046336ce
1 changed files with 10 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
source/helpers.pas
View File

@ -2515,7 +2515,16 @@ begin
m := Msg;
if Title <> '' then
m := Title + CRLF + CRLF + m;
Result := MessageDlg(m, DlgType, Buttons, 0);
if KeepAskingSetting <> asUnused then
KeepAskingValue := AppSettings.ReadBool(KeepAskingSetting)
else
KeepAskingValue := True;
if KeepAskingValue then
Result := MessageDlg(m, DlgType, Buttons, 0)
else
Result := mrNo;
end;
end;