paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-26 12:09:25 +02:00
Code Issues Packages Projects Releases Wiki Activity

GTK3: Improved initial size of created windows by setting constraints.

Browse Source
This commit is contained in:
Abou Al Montacir 2023-12-09 13:30:41 +01:00
parent c164ac032c
commit fb3002163e
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
lcl/interfaces/gtk3/gtk3widgets.pas
View File

@ -7573,6 +7573,7 @@ begin
// cannot gtk_widget_realize(Result), because that needs a valid widget parent // cannot gtk_widget_realize(Result), because that needs a valid widget parent
FWidgetType := [wtWidget, wtLayout, wtScrollingWin, wtCustomControl] FWidgetType := [wtWidget, wtLayout, wtScrollingWin, wtCustomControl]
end; end;
Result^.set_size_request(Params.Width, Params.Height);
FBox := TGtkVBox.new(GTK_ORIENTATION_VERTICAL, 0); FBox := TGtkVBox.new(GTK_ORIENTATION_VERTICAL, 0);