summaryrefslogtreecommitdiff
path: root/src/corelib/x11
diff options
context:
space:
mode:
Diffstat (limited to 'src/corelib/x11')
-rw-r--r--src/corelib/x11/fpg_x11.pas20
1 files changed, 11 insertions, 9 deletions
diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas
index 8ae27ec1..ab41dc6b 100644
--- a/src/corelib/x11/fpg_x11.pas
+++ b/src/corelib/x11/fpg_x11.pas
@@ -2348,17 +2348,19 @@ var
w: longword;
h: longword;
begin
- if FWidth > 1 then
- w := FWidth
- else
- w := 1;
- if FHeight > 1 then
- h := FHeight
- else
- h := 1;
+ if HasHandle then
+ begin
+ if FWidth > 1 then
+ w := FWidth
+ else
+ w := 1;
+ if FHeight > 1 then
+ h := FHeight
+ else
+ h := 1;
- if FWinHandle > 0 then
XMoveResizeWindow(xapplication.display, FWinHandle, FLeft, FTop, w, h);
+ end;
end;
procedure TfpgX11Window.DoSetMouseCursor;