summaryrefslogtreecommitdiff
path: root/gfx/gdi
diff options
context:
space:
mode:
Diffstat (limited to 'gfx/gdi')
-rw-r--r--gfx/gdi/gfx_gdi.pas12
1 files changed, 3 insertions, 9 deletions
diff --git a/gfx/gdi/gfx_gdi.pas b/gfx/gdi/gfx_gdi.pas
index a6107d24..64622ab8 100644
--- a/gfx/gdi/gfx_gdi.pas
+++ b/gfx/gdi/gfx_gdi.pas
@@ -200,7 +200,7 @@ type
procedure SetClientSize(const ASize: TSize); override;
procedure SetMinMaxClientSize(const AMinSize, AMaxSize: TSize); override;
procedure Show; override;
- procedure Invalidate(const ARect: TRect); override;
+ procedure Invalidate; override;
procedure PaintInvalidRegion; override;
procedure CaptureMouse; override;
procedure ReleaseMouse; override;
@@ -1512,15 +1512,9 @@ begin
end;
-procedure TGDIWindow.Invalidate(const ARect: TRect);
-var
- Rect: Windows.Rect;
+procedure TGDIWindow.Invalidate;
begin
- Rect.Left := ARect.Left;
- Rect.Top := ARect.Top;
- Rect.Right := ARect.Right;
- Rect.Bottom := ARect.Bottom;
- Windows.InvalidateRect(Handle, Rect, False);
+ Windows.InvalidateRect(Handle, nil, True);
end;