FIX #1593: height of some Buttons on macOS (refer to the implementation in TfrmButtonForm)

(cherry picked from commit 4f0eb9bc9e)
This commit is contained in:
rich2014 2024-05-01 18:53:09 +08:00 committed by Alexander Koblov
commit 0546c64d13

View file

@ -300,6 +300,7 @@ begin
begin
with TButton.Create(frmMsg) do
begin
Constraints.MinHeight:= 34;
AutoSize:= True;
Caption:= cLngButton[Buttons[iIndex]];
Parent:= frmMsg.pnlButtons;