diff --git a/components/customdrawn/customdrawn_winxp.pas b/components/customdrawn/customdrawn_winxp.pas
index 4afba772de..0108a2f28c 100644
--- a/components/customdrawn/customdrawn_winxp.pas
+++ b/components/customdrawn/customdrawn_winxp.pas
@@ -24,10 +24,16 @@ type
     // TCDButton
     procedure DrawButton(ADest: TCanvas; ADestPos: TPoint; ASize: TSize;
       AState: TCDControlState; AStateEx: TCDControlStateEx); override;
+    // TCDEdit
+    procedure DrawEditBackground(ADest: TCanvas; ADestPos: TPoint; ASize: TSize;
+      AState: TCDControlState; AStateEx: TCDEditStateEx); override;
   end;
 
 implementation
 
+const
+  WINXP_FRAME_BLUE = $00B99D7F;
+
 { TCDDrawerWinXP }
 
 procedure TCDDrawerWinXP.DrawButton(ADest: TCanvas; ADestPos: TPoint;
@@ -89,6 +95,17 @@ begin
     (ASize.cy - ADest.TextHeight(Str)) div 2, Str);
 end;
 
+procedure TCDDrawerWinXP.DrawEditBackground(ADest: TCanvas; ADestPos: TPoint;
+  ASize: TSize; AState: TCDControlState; AStateEx: TCDEditStateEx);
+begin
+  // The background
+  ADest.Brush.Color := clWhite;
+  ADest.Brush.Style := bsSolid;
+  ADest.Pen.Color := WINXP_FRAME_BLUE;
+  ADest.Pen.Style := psSolid;
+  ADest.Rectangle(0, 0, ASize.cx, ASize.cy);
+end;
+
 initialization
   RegisterDrawer(TCDDrawerWinXP.Create, dsWinXP);
 end.