From b81c00f54ec7f453eb3189dea19eade3bb1b73a5 Mon Sep 17 00:00:00 2001 From: Graeme Geldenhuys Date: Mon, 4 Oct 2010 09:52:56 +0200 Subject: X11: extra failsafe before posting FPGM_RESIZE event. --- src/corelib/x11/fpg_x11.pas | 13 ++++++++----- 1 file changed, 8 insertions(+), 5 deletions(-) (limited to 'src/corelib/x11') diff --git a/src/corelib/x11/fpg_x11.pas b/src/corelib/x11/fpg_x11.pas index a5fb68e0..837b2d34 100644 --- a/src/corelib/x11/fpg_x11.pas +++ b/src/corelib/x11/fpg_x11.pas @@ -1906,11 +1906,14 @@ begin { X11 is too efficient, so new windows don't need a OnResize when mapped, but because Windows GDI does so, we want the same events under X11. Lets fake one. } - msgp.rect.Left := w.Left; - msgp.rect.Top := w.Top; - msgp.rect.Width := w.Width; - msgp.rect.Height := w.Height; - fpgPostMessage(nil, w, FPGM_RESIZE, msgp); + if w <> nil then + begin + msgp.rect.Left := w.Left; + msgp.rect.Top := w.Top; + msgp.rect.Width := w.Width; + msgp.rect.Height := w.Height; + fpgPostMessage(nil, w, FPGM_RESIZE, msgp); + end; end; X.UnmapNotify: -- cgit v1.2.3-70-g09d2