[TAZ]

In Vcl.Dialogs this function is listed twice:

function CreateMessageDialog(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons): TForm; overload;

function CreateMessageDialog(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; DefaultButton: TMsgDlgBtn): TForm; overload;

In sDialogs you have which piggybacks off of those listed above:

function sCreateMessageDialog(const Title, Msg: acString; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons): TForm;

Could you duplicate what is shown? I use the DefaultButton.

I also find it interesting that you have “Title” as a parameter that is not used. Guess it might have been used at one time.

Thanks.

[Support]

I will try to do it soon.

[Author]

Posts