Am 2014-10-13 um 13:49 schrieb Jürgen Hestermann:
Am 2014-10-12 um 12:57 schrieb Bart:
On 10/12/14, Jürgen Hestermann <[email protected]> wrote:
How can I specify the default button for QuestionDLG?
function QuestionDlg(const aCaption, aMsg: string; DlgType: TMsgDlgType;
Buttons: array of const; HelpCtx: Longint): TModalResult;
In the Buttons array of const, add the string 'isdefault' after the
button you want to be the default one.
Thanks, it works.
That was too early. It does not work in all cases. In
case QuestionDlg('File overwrite','File exists. Overwrite it?',
mtConfirmation,
[mrNo,'IsDefault',mrYes,mrIgnore,'neVer',mrAll,'All',mrAbort,'Stop '],0) of
it just renames the standard "No" button to "IsDefault".
--
_______________________________________________
Lazarus mailing list
[email protected]
http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
