Skip to main content

TdxMessageDialogForm.AlignButtons Method

Calculates optimal dimensions and positions of customized buttons.

Declaration

procedure AlignButtons; virtual;

Remarks

Custom captions may be too long to fit into buttons with predefined dimensions:

VCL Editors Library: Before Layout Recalculation

Code Example: Define Custom Button Captions

Call the AlignButtons procedure to recalculate the form layout after button customization:

uses dxMessageDialog;
// ...
var
  ADialog: TdxMessageDialogForm;
  AMessage: string;
begin
  AMessage := 'One or more margins are set outside the printable area of the page.' + #13#10 +
    'Click the [B]Fix[/B] button to increase these margins.';
  ADialog := dxCreateMessageDialog(AMessage, mtWarning, mbYesNoCancel);
  try
    ADialog.FindButton(mbYes).Caption := 'Fix';
    ADialog.FindButton(mbNo).Caption := 'Restore Original';
    ADialog.FindButton(mbCancel).Caption := 'Close';

    ADialog.AlignButtons;
    ADialog.ShowModal;
  finally
    ADialog.Free;
  end;
end;

VCL Editors Library: Custom Button Captions

See Also