diff --git a/examples/gtkglarea/data/particle.bmp b/examples/gtkglarea/data/particle.bmp index 92cf5730fd..4c234dd454 100644 Binary files a/examples/gtkglarea/data/particle.bmp and b/examples/gtkglarea/data/particle.bmp differ diff --git a/examples/gtkglarea/data/texture1.bmp b/examples/gtkglarea/data/texture1.bmp index b9a2a9a051..2b3a9f487f 100644 Binary files a/examples/gtkglarea/data/texture1.bmp and b/examples/gtkglarea/data/texture1.bmp differ diff --git a/examples/gtkglarea/data/texture2.bmp b/examples/gtkglarea/data/texture2.bmp index cc89ecdde3..e73024c990 100644 Binary files a/examples/gtkglarea/data/texture2.bmp and b/examples/gtkglarea/data/texture2.bmp differ diff --git a/examples/gtkglarea/data/texture3.bmp b/examples/gtkglarea/data/texture3.bmp index 3a981eeb9f..bd3bebe5d0 100644 Binary files a/examples/gtkglarea/data/texture3.bmp and b/examples/gtkglarea/data/texture3.bmp differ diff --git a/images/logo_big.jpg b/images/logo_big.jpg index cf99b7d745..643a155a67 100644 Binary files a/images/logo_big.jpg and b/images/logo_big.jpg differ diff --git a/lcl/interfaces/win32/win32callback.inc b/lcl/interfaces/win32/win32callback.inc index 5e81e13b26..7ada944e67 100644 --- a/lcl/interfaces/win32/win32callback.inc +++ b/lcl/interfaces/win32/win32callback.inc @@ -56,6 +56,7 @@ Var C: Cardinal; List: TMsgArray; LMessage: TLMessage; + R: TRect; OwnerObject: TObject; WinProcess: Boolean; Begin @@ -300,12 +301,14 @@ Begin End; WM_MOVE: Begin + Windows.GetWindowRect(Window, @R); With TLMMove(LMessage) Do Begin Msg := LM_MOVE; - MoveType := WParam; - XPos := Lo(LParam); - YPos := Hi(LParam); + // MoveType := WParam; WParam is not defined! + MoveType := 0; + XPos := R.Left; + YPos := R.Top; End; End; //TODO:LM_MOVEPAGE,LM_MOVETOROW,LM_MOVETOCOLUMN @@ -382,12 +385,13 @@ Begin End; WM_SIZE: Begin + Windows.GetWindowRect(Window, @R); With TLMSize(LMessage) Do Begin Msg := LM_SIZE; SizeType := WParam; - Width := Lo(LParam); - Height := Hi(LParam); + Width := R.Right - R.Left; + Height := R.Bottom - R.Top; End; End; WM_SYSKEYDOWN: @@ -464,6 +468,9 @@ End; { $Log$ + Revision 1.15 2002/08/28 17:28:11 lazarus + Keith: Win32 fixes. Much appreciation to Markus Lüdin. + Revision 1.14 2002/08/13 07:08:25 lazarus MG: added gdkpixbuf.pp and changes from Andrew Johnson