FIX: Default button height under non macOS

This commit is contained in:
Alexander Koblov 2024-05-02 18:05:21 +03:00
commit dae59469ce

View file

@ -300,7 +300,9 @@ begin
begin
with TButton.Create(frmMsg) do
begin
{$IF DEFINED(LCLCOCOA)}
Constraints.MinHeight:= 34;
{$ENDIF}
AutoSize:= True;
Caption:= cLngButton[Buttons[iIndex]];
Parent:= frmMsg.pnlButtons;