From e070c539cee1fbdcb54d60895bad675e9e8fda2b Mon Sep 17 00:00:00 2001
From: Ansgar Becker <ansgarbecker@users.noreply.github.com>
Date: Sat, 7 May 2011 04:55:00 +0000
Subject: [PATCH] Force repainting column header in data grid. Fixes issue
 #2405.

---
 source/main.pas | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/source/main.pas b/source/main.pas
index 7daee3ff..08856f48 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -3839,6 +3839,9 @@ var
     col.Alignment := taLeftJustify;
     if DataGridResult.DataType(idx).Category in [dtcInteger, dtcReal] then
       col.Alignment := taRightJustify;
+
+    // Force repaint, for Wine users
+    vt.Header.Invalidate(col);
   end;
 
 begin