mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-24 20:40:40 +02:00
IDEIntf: improved grab key form size
git-svn-id: trunk@16137 -
This commit is contained in:
parent
e374b51dd5
commit
3dc4969f21
@ -4833,6 +4833,8 @@ begin
|
||||
Dlg.Position:=poScreenCenter;
|
||||
Dlg.Constraints.MinWidth:=350;
|
||||
Dlg.Constraints.MinHeight:=30;
|
||||
Dlg.Width:=350;
|
||||
Dlg.Height:=120;
|
||||
|
||||
Box:=TShortCutGrabBox.Create(Dlg);
|
||||
Box.Parent:=Dlg;
|
||||
@ -6750,6 +6752,8 @@ begin
|
||||
BorderSpacing.Around:=25;
|
||||
Parent:=FGrabForm;
|
||||
end;
|
||||
FGrabForm.Width:=200;
|
||||
FGrabForm.Height:=50;
|
||||
FGrabForm.AutoSize:=true;
|
||||
FGrabForm.ShowModal;
|
||||
FreeAndNil(FGrabForm);
|
||||
|
Loading…
Reference in New Issue
Block a user