diff options
author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-02 14:59:54 +0000 |
---|---|---|
committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-07-02 14:59:54 +0000 |
commit | 32904512aa7bbe143920944f6693a9ae2692fbb6 (patch) | |
tree | 64317f2f5c741ff3ad8bfa9e1ae7a730ac7b6de7 | |
parent | d2dee87211aa3dfc0b56ce5766a2eaa09570d0a5 (diff) | |
download | fpGUI-32904512aa7bbe143920944f6693a9ae2692fbb6.tar.xz |
* GDI: Removed the BorderDimension usage in DoUpdateWindowPosition and added a call to InvalidateRect(). This fixed the Splitter and UI Designer redraw issues. The event duplicates still need to be fixed.
-rw-r--r-- | src/corelib/gdi/gfx_gdi.pas | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/src/corelib/gdi/gfx_gdi.pas b/src/corelib/gdi/gfx_gdi.pas index 86323c1b..b61fe4ac 100644 --- a/src/corelib/gdi/gfx_gdi.pas +++ b/src/corelib/gdi/gfx_gdi.pas @@ -1418,15 +1418,16 @@ begin end; procedure TfpgWindowImpl.DoUpdateWindowPosition(aleft, atop, awidth, aheight: TfpgCoord); -var - bx, by: integer; +//var +// bx, by: integer; begin FSkipResizeMessage := True; - GetWindowBorderDimensions(Self, bx, by); +// GetWindowBorderDimensions(Self, bx, by); Windows.SetWindowPos( WinHandle, HWND_TOP, - aleft, atop, awidth + bx, aheight + by, + aleft, atop, awidth {+ bx}, aheight {+ by}, SWP_NOZORDER);// or SWP_NOREDRAW); + Windows.InvalidateRect(WinHandle, nil, True); FSkipResizeMessage := False; end; |