From 7f2a1ba73eea231189cf75b59cd45a5b6edae2e6 Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graeme@mastermaths.co.za>
Date: Fri, 6 May 2011 00:07:15 +0200
Subject: Refactored the TfpgBaseEdit to use the new style painting method.

---
 src/gui/fpg_edit.pas | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

(limited to 'src/gui')

diff --git a/src/gui/fpg_edit.pas b/src/gui/fpg_edit.pas
index 689b98ae..91ec2494 100644
--- a/src/gui/fpg_edit.pas
+++ b/src/gui/fpg_edit.pas
@@ -711,12 +711,7 @@ begin
   end;
   Canvas.SetClipRect(r);
 
-  if Enabled and not ReadOnly then
-    Canvas.SetColor(FBackgroundColor)
-  else
-    Canvas.SetColor(clWindowBackground);
-  Canvas.FillRectangle(r);
-
+  fpgStyle.DrawEditBox(Canvas, r, Enabled, ReadOnly, FBackgroundColor);
   Canvas.SetFont(FFont);
 end;
 
-- 
cgit v1.2.3-70-g09d2