paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2026-01-05 00:13:39 +01:00
Code Issues Packages Projects Releases Wiki Activity

messagecomposer: fixed result for QuestionDlg, bug #23640

Browse Source 
git-svn-id: trunk@39844 -
This commit is contained in:
mattias 2013-01-13 21:49:12 +00:00
parent c4c927e1ef
commit 81894596dd
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/messagecomposer/messagecomposer.pas
View File

@ -288,7 +288,7 @@ begin
DlgType := DlgTypeComboBox.Text;
MsgButtons := EmptyStr;
if ButtonsCheckGroup.Enabled then begin //MessageDlg();
if ButtonsNotebook.PageIndex = 0 then begin //MessageDlg();
if ButtonsCheckGroup.Checked[0] then
MsgButtons := MsgButtons+' mbYes,';
if ButtonsCheckGroup.Checked[1] then