diff options
Diffstat (limited to 'src/corelib/x11')
-rw-r--r-- | src/corelib/x11/fpg_x11.pas | 20 |
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; |