summaryrefslogtreecommitdiff
path: root/src/corelib/gfxbase.pas
diff options
context:
space:
mode:
authorgraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-14 09:02:21 +0000
committergraemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf>2007-09-14 09:02:21 +0000
commiteedba8c151df038f4dc25d2e41726e8c6b0f5dd5 (patch)
tree2dd3c8d8151bf1abf7258db5c472dd61a2cf2010 /src/corelib/gfxbase.pas
parentc54be16064030a89b627ed491cdafdfef88ab2df (diff)
downloadfpGUI-eedba8c151df038f4dc25d2e41726e8c6b0f5dd5.tar.xz
* New overloaded EndDraw method for TfpgCanvas.
* Finished implementation change of ComboBox internal button. It now uses a fake (painted) button instead of a real button. Up/Down state is also supported. * Implemented Up/Down state for Scrollbar buttons. * Increased the version numbers of the fpGUI packages and uiDesigner. * If TfpgEdit is disabled, the mouse cursor doesn't change to a I beam.
Diffstat (limited to 'src/corelib/gfxbase.pas')
-rw-r--r--src/corelib/gfxbase.pas6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/corelib/gfxbase.pas b/src/corelib/gfxbase.pas
index 0cac008d..cfe60c45 100644
--- a/src/corelib/gfxbase.pas
+++ b/src/corelib/gfxbase.pas
@@ -291,6 +291,7 @@ type
procedure BeginDraw; overload;
procedure BeginDraw(ABuffered: boolean); overload;
procedure EndDraw(x, y, w, h: TfpgCoord); overload;
+ procedure EndDraw(ARect: TfpgRect); overload;
procedure EndDraw; overload;
procedure FreeResources;
property Color: TfpgColor read FColor write SetColor;
@@ -1051,6 +1052,11 @@ begin
end; { if }
end;
+procedure TfpgCanvasBase.EndDraw(ARect: TfpgRect);
+begin
+ EndDraw(ARect.Left, ARect.Top, ARect.Width, ARect.Height);
+end;
+
procedure TfpgCanvasBase.EndDraw;
begin
EndDraw(0, 0, FWindow.Width, FWindow.Height);