summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/gui/gui_form.pas6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/gui/gui_form.pas b/src/gui/gui_form.pas
index 843345d1..438a675b 100644
--- a/src/gui/gui_form.pas
+++ b/src/gui/gui_form.pas
@@ -293,6 +293,12 @@ begin
inherited HandleShow;
if Assigned(FOnShow) then
FOnShow(self);
+ {$IFDEF UNIX}
+ { TODO : A temporary work-around because XLib doesn't sent a Resize event
+ when the form is created. It's clever enough to size the form beforehand,
+ but without this call the Alignment code doesn't execute. }
+ inherited HandleResize(FWidth, FHeight);
+ {$ENDIF}
end;
procedure TfpgForm.HandleMove(x, y: TfpgCoord);