mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 09:59:17 +02:00
Window list dialog windows size adjustment
This commit is contained in:
parent
d2df6a630c
commit
86f61918b4
@ -107,7 +107,7 @@ constructor TWindowListDialog.Init;
|
|||||||
var R,R2: TRect;
|
var R,R2: TRect;
|
||||||
SB: PScrollBar;
|
SB: PScrollBar;
|
||||||
begin
|
begin
|
||||||
R.Assign(0,0,round(ScreenWidth*5/8),15);
|
R.Assign(0,0,Max(60,round(ScreenWidth*5/8)),Max(13,round(ScreenHeight*3/5)));
|
||||||
inherited Init(R, dialog_windowlist);
|
inherited Init(R, dialog_windowlist);
|
||||||
HelpCtx:=hcWindowList;
|
HelpCtx:=hcWindowList;
|
||||||
New(C, Init(20,10));
|
New(C, Init(20,10));
|
||||||
|
Loading…
Reference in New Issue
Block a user