[Lazarus] Default button for QuestionDLG

Bart bartjunk64 at gmail.com
Sun Oct 12 12:57:48 CEST 2014


On 10/12/14, Jürgen Hestermann <juergen.hestermann at gmx.de> 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.

Take a look at the implementation.

Bart




More information about the Lazarus mailing list