From 233dbee19f6325c59993494875c46c7284e751ba Mon Sep 17 00:00:00 2001
From: alexs75 <alexs75@8e941d3f-bd1b-0410-a28a-d453659cc2b4>
Date: Thu, 27 Jan 2011 20:31:51 +0000
Subject: [PATCH] Fix draw text background in rxdbgrid if themes enabled. Thx
 for Boris from freepascal.ru

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1465 8e941d3f-bd1b-0410-a28a-d453659cc2b4
---
 components/rx/rxdbgrid.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/components/rx/rxdbgrid.pas b/components/rx/rxdbgrid.pas
index 8c7bf74cd..c6f747312 100644
--- a/components/rx/rxdbgrid.pas
+++ b/components/rx/rxdbgrid.pas
@@ -938,6 +938,7 @@ begin
   if DrawRect.Top < ARect.Top + 1 then
     DrawRect.Top := ARect.Top + 1;
 
+  SetBkMode(ACanvas.Handle, TRANSPARENT);
   DrawText(ACanvas.Handle, PChar(Text), Length(Text), DrawRect,
 //    DT_VCENTER or  DT_WORDBREAK or DT_CENTER
     ALIGN_FLAGS_HEADER[Alignment] {or DT_VCENTER or  DT_END_ELLIPSIS }or DT_WORDBREAK