diff --git a/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.lfm b/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.lfm
index a23848089..f0bb951d5 100644
--- a/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.lfm
+++ b/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.lfm
@@ -11,7 +11,7 @@ object HeaderOwnerDrawForm: THeaderOwnerDrawForm
   Font.Name = 'MS Sans Serif'
   OnCreate = FormCreate
   OnDestroy = FormDestroy
-  LCLVersion = '0.9.27'
+  LCLVersion = '0.9.29'
   object Label8: TLabel
     Left = 12
     Height = 83
@@ -33,7 +33,6 @@ object HeaderOwnerDrawForm: THeaderOwnerDrawForm
     Top = 10
     Width = 749
     Anchors = [akTop, akLeft, akRight, akBottom]
-    BorderStyle = bsSingle
     CheckImageKind = ckDarkTick
     ClipboardFormats.Strings = (
       'CSV'
@@ -52,12 +51,14 @@ object HeaderOwnerDrawForm: THeaderOwnerDrawForm
     DefaultNodeHeight = 24
     DefaultText = 'Node'
     EditDelay = 100
+    Header.AutoSizeIndex = 0
     Header.Background = clBtnShadow
     Header.Columns = <    
       item
         Hint = 'This column is drawn entirely by the tree.'
         ImageIndex = 1
         Options = [coDraggable, coEnabled, coResizable, coShowDropMark, coVisible]
+        Position = 0
         Spacing = -1
         Text = 'Default drawing'
         Width = 200
@@ -76,7 +77,7 @@ object HeaderOwnerDrawForm: THeaderOwnerDrawForm
       end    
       item
         Alignment = taCenter
-        Color = clInfoBk
+        Color = 14811135
         Hint = 'Background and text in this column are customized.'
         ImageIndex = 0
         Options = [coAllowClick, coDraggable, coEnabled, coResizable, coShowDropMark, coVisible]
@@ -85,6 +86,7 @@ object HeaderOwnerDrawForm: THeaderOwnerDrawForm
         Style = vsOwnerDraw
         Width = 350
       end>
+    Header.DefaultHeight = 17
     Header.Font.Height = -12
     Header.Font.Name = 'Arial'
     Header.Font.Style = [fsBold]
diff --git a/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.pas b/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.pas
index 24b5d8537..2ddf1e5f7 100644
--- a/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.pas
+++ b/components/virtualtreeview-new/trunk/demos/advanced/HeaderCustomDrawDemo.pas
@@ -132,7 +132,7 @@ begin
                 Width := PaintRectangle.Right - PaintRectangle.Left;
                 Height := PaintRectangle.Bottom - PaintRectangle.Top;
                 TargetRect := Rect(0, 0, Width, Height);
-                Canvas.Brush.Color := clInfoBk;
+                Canvas.Brush.Color := $E1FFFF;
                 Canvas.FillRect(TargetRect);
                 InflateRect(TargetRect, - 10, -10);
                 SourceRect := TargetRect;
@@ -148,7 +148,7 @@ begin
               TargetCanvas.Font.Size := 60;
               if IsHoverIndex then
                 TargetCanvas.Font.Color := $80FF;
-              S := 'û';
+              S := 'û';
               Size := TargetCanvas.TextExtent(S);
               SetBkMode(TargetCanvas.Handle, TRANSPARENT);
               TargetCanvas.TextOut(PaintRectangle.Left + 10, Paintrectangle.Bottom - Size.cy, S);