* Fixed compilation of Advanced demo in gtk

* Fixed compilation with fpc 214 under gtk
* Disabled screen store in hint activation under gtk
* Removed VirtualTrees.DrawTextW

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@177 8e941d3f-bd1b-0410-a28a-d453659cc2b4

components/virtualtreeview-unstable/VirtualTrees.pas

@@ -3295,8 +3295,6 @@ function RegisterVTClipboardFormat(Description: string; TreeClass: TVirtualTreeC
 
 // utility routines
 procedure AlphaBlend(Source, Destination: HDC; R: TRect; Target: TPoint; Mode: TBlendMode; ConstantAlpha, Bias: Integer);
-procedure DrawTextW(DC: HDC; lpString: PWideChar; nCount: Integer; var lpRect: TRect; uFormat: Cardinal;
-  AdjustRight: Boolean);
 {$ifdef EnablePrint}
 procedure PrtStretchDrawDIB(Canvas: TCanvas; DestRect: TRect; ABitmap: TBitmap);
 {$endif}
@@ -3977,146 +3975,6 @@ end;
 
 //----------------------------------------------------------------------------------------------------------------------
 
-procedure DrawTextW(DC: HDC; lpString: PWideChar; nCount: Integer; var lpRect: TRect; uFormat: Cardinal;
-  AdjustRight: Boolean);
-
-// This procedure implements a subset of Window's DrawText API for Unicode which is not available for
-// Windows 9x. For a description of the parameters see DrawText in the online help.
-// Supported flags are currently:
-//   - DT_LEFT
-//   - DT_TOP
-//   - DT_CALCRECT
-//   - DT_NOCLIP
-//   - DT_RTLREADING
-//   - DT_SINGLELINE
-//   - DT_VCENTER
-// Differences to the DrawTextW Windows API:
-//   - The additional parameter AdjustRight determines whether to adjust the right border of the given rectangle to
-//     accomodate the largest line in the text. It has only a meaning if also DT_CALCRECT is specified.
-
-var
-  Head, Tail: PWideChar;
-  Size: TSize;
-  MaxWidth: Integer;
-  TextOutFlags: Integer;
-  TextAlign,
-  OldTextAlign: Cardinal;
-  TM: TTextMetric;
-  TextHeight: Integer;
-  LineRect: TRect;
-  TextPosY,
-  TextPosX: Integer;
-
-  CalculateRect: Boolean;
-
-begin
-  // Prepare some work variables.
-  MaxWidth := 0;
-  Head := lpString;
-  GetTextMetrics(DC, TM);
-  TextHeight := TM.tmHeight;
-  if uFormat and DT_SINGLELINE <> 0 then
-    LineRect := lpRect
-  else
-    LineRect := Rect(lpRect.Left, lpRect.Top, lpRect.Right, lpRect.Top + TextHeight);
-
-  CalculateRect := uFormat and DT_CALCRECT <> 0;
-
-  // Prepare text output.
-  TextOutFlags := 0;
-  if uFormat and DT_NOCLIP = 0 then
-    TextOutFlags := TextOutFlags or ETO_CLIPPED;
-  if uFormat and DT_RTLREADING <> 0 then
-    TextOutFlags := TextOutFlags or ETO_RTLREADING;
-
-  // Determine horizontal and vertical text alignment.
-  OldTextAlign := GetTextAlign(DC);
-  TextAlign := TA_LEFT or TA_TOP;
-  TextPosX := lpRect.Left;
-  if uFormat and DT_RIGHT <> 0 then
-  begin
-    TextAlign := TextAlign or TA_RIGHT and not TA_LEFT;
-    TextPosX := lpRect.Right;
-  end
-  else
-    if uFormat and DT_CENTER <> 0 then
-    begin
-      TextAlign := TextAlign or TA_CENTER and not TA_LEFT;
-      TextPosX := (lpRect.Left + lpRect.Right) div 2;
-    end;
-
-  TextPosY := lpRect.Top;
-  if uFormat and DT_VCENTER <> 0 then
-  begin
-    // Note: vertical alignment does only work with single line text ouput!
-    TextPosY := (lpRect.Top + lpRect.Bottom - TextHeight) div 2;
-  end;
-  SetTextAlign(DC, TextAlign);
-
-  if uFormat and DT_SINGLELINE <> 0 then
-  begin
-    if CalculateRect then
-    begin
-      GetTextExtentPoint32W(DC, Head, nCount, Size);
-      if Size.cx > MaxWidth then
-        MaxWidth := Size.cx;
-    end
-    else
-      ExtTextOutW(DC, TextPosX, TextPosY, TextOutFlags, @LineRect, Head, nCount, nil);
-    OffsetRect(LineRect, 0, TextHeight);
-  end
-  else
-  begin
-    while (nCount > 0) and (Head^ <> WideNull) do
-    begin
-      Tail := Head;
-      // Look for the end of the current line. A line is finished either by the string end or a line break.
-      while (nCount > 0) and not (Tail^ in [WideNull, WideCR, WideLF]) and (Tail^ <> WideLineSeparator) do
-      begin
-        Inc(Tail);
-        Dec(nCount);
-      end;
-
-      if CalculateRect then
-      begin
-        GetTextExtentPoint32W(DC, Head, Tail - Head, Size);
-        if Size.cx > MaxWidth then
-          MaxWidth := Size.cx;
-      end
-      else
-        ExtTextOutW(DC, TextPosX, LineRect.Top, TextOutFlags, @LineRect, Head, Tail - Head, nil);
-      OffsetRect(LineRect, 0, TextHeight);
-
-      // Get out of the loop if the rectangle is filled up.
-      if (nCount = 0) or (not CalculateRect and (LineRect.Top >= lpRect.Bottom)) then
-        Break;
-
-      if (nCount > 0) and (Tail^ = WideCR) or (Tail^ = WideLineSeparator) then
-      begin
-        Inc(Tail);
-        Dec(nCount);
-      end;
-
-      if (nCount > 0) and (Tail^ = WideLF) then
-      begin
-        Inc(Tail);
-        Dec(nCount);
-      end;
-      Head := Tail;
-    end;
-  end;
-
-  SetTextAlign(DC, OldTextAlign);
-  if CalculateRect then
-  begin
-    if AdjustRight then
-      lpRect.Right := lpRect.Left + MaxWidth;
-    lpRect.Bottom := LineRect.Top;
-  end;
-end;
-
-//----------------------------------------------------------------------------------------------------------------------
-
 function ShortenString(DC: HDC; const S: WideString; Width: Integer; EllipsisWidth: Integer = 0): WideString;
 
 // Adjusts the given string S so that it fits into the given width. EllipsisWidth gives the width of
@@ -6661,10 +6519,8 @@ begin
           R.Top := Y;
           if Assigned(Node) and (LineBreakStyle = hlbForceMultiLine) then
             DrawFormat := DrawFormat or DT_WORDBREAK;
-          if IsWinNT then
-            DelphiCompat.DrawTextW(Handle, PWideChar(HintText), Length(HintText), R, DrawFormat)
-          else
-            DrawTextW(Handle, PWideChar(HintText), Length(HintText), R, DrawFormat, False);
+
+          DrawTextW(Handle, PWideChar(HintText), Length(HintText), R, DrawFormat)
         end;
     end;
   end;
@@ -6831,6 +6687,8 @@ begin
 
     FHintData.Tree.Update;
 
+    {$ifdef Windows}
+    //todo: implement this under gtk
     // capture screen
     DC := GetDC(0);
     try
@@ -6839,6 +6697,7 @@ begin
     finally
       ReleaseDC(0, DC);
     end;
+    {$endif}
 
     SetWindowPos(Handle, HWND_TOPMOST, Rect.Left, Rect.Top, Width, Height, SWP_SHOWWINDOW or SWP_NOACTIVATE);
     with FHintData.Tree do
@@ -6958,10 +6817,7 @@ begin
               // We don't have Unicode word wrap on the latter so the tooltip gets as wide as the largest line
               // in the caption (limited by carriage return), which results in unoptimal overlay of the tooltip.
               // On Windows NT the tooltip exactly overlays the node text.
-              if IsWinNT then
-                DelphiCompat.DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), R, DT_CALCRECT or DT_WORDBREAK)
-              else
-                DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), R, DT_CALCRECT, True);
+              DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), R, DT_CALCRECT or DT_WORDBREAK);
               if BidiMode = bdLeftToRight then
                 Result.Right := R.Right + Tree.FTextMargin
               else
@@ -7000,10 +6856,7 @@ begin
             // Start with the base size of the hint in client coordinates.
             Result := Rect(0, 0, MaxWidth, FTextHeight);
             // Calculate the true size of the text rectangle.
-            if IsWinNT then
-              DelphiCompat.DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), Result, DT_CALCRECT)
-            else
-              DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), Result, DT_CALCRECT, True);
+            DrawTextW(Canvas.Handle, PWideChar(HintText), Length(HintText), Result, DT_CALCRECT);
             // The height of the text plus 2 pixels vertical margin plus the border determine the hint window height.
             Inc(Result.Bottom, 6);
             // The text is centered horizontally with usual text margin for left and right borders (plus border).
@@ -8822,16 +8675,10 @@ begin
   begin
     OffsetRect(Bounds, 1, 1);
     SetTextColor(DC, ColorToRGB(clBtnHighlight));
-    if IsWinNT then
-      DelphiCompat.DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat)
-    else
-      DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat, False);
+    DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat);
     OffsetRect(Bounds, -1, -1);
     SetTextColor(DC, ColorToRGB(clBtnShadow));
-    if IsWinNT then
-      DelphiCompat.DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat)
-    else
-      DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat, False);
+    DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat);
   end
   else
   begin
@@ -8839,10 +8686,7 @@ begin
       SetTextColor(DC, ColorToRGB(FHeader.Treeview.FColors.HeaderHotColor))
     else
       SetTextColor(DC, ColorToRGB(FHeader.FFont.Color));
-    if IsWinNT then
-      DelphiCompat.DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat)
-    else
-      DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat, False);
+    DrawTextW(DC, PWideChar(Caption), Length(Caption), Bounds, DrawFormat);
   end;
 end;
 
@@ -30215,10 +30059,7 @@ begin
       SetBkMode(Canvas.Handle, TRANSPARENT)
     else
       SetBkMode(Canvas.Handle, OPAQUE);
-    if IsWinNT then
-      DelphiCompat.DrawTextW(Canvas.Handle, PWideChar(Text), Length(Text), R, DrawFormat)
-    else
-      DrawTextW(Canvas.Handle, PWideChar(Text), Length(Text), R, DrawFormat, False);
+    DrawTextW(Canvas.Handle, PWideChar(Text), Length(Text), R, DrawFormat)
   end;
   Logger.ExitMethod([lcPaintDetails],'PaintStaticText');
 end;
@@ -30575,10 +30416,7 @@ procedure TCustomVirtualStringTree.DoTextDrawing(var PaintInfo: TVTPaintInfo; Te
   DrawFormat: Cardinal);
 
 begin
-  if IsWinNT then
-    DelphiCompat.DrawTextW(PaintInfo.Canvas.Handle, PWideChar(Text), Length(Text), CellRect, DrawFormat)
-  else
-    DrawTextW(PaintInfo.Canvas.Handle, PWideChar(Text), Length(Text), CellRect, DrawFormat, False);
+  DrawTextW(PaintInfo.Canvas.Handle, PWideChar(Text), Length(Text), CellRect, DrawFormat);
 end;
 
 //----------------------------------------------------------------------------------------------------------------------
@@ -30821,10 +30659,7 @@ begin
     DrawFormat := DrawFormat or DT_RIGHT or DT_RTLREADING
   else
     DrawFormat := DrawFormat or DT_LEFT;
-  if IsWinNT then
-    DelphiCompat.DrawTextW(Canvas.Handle, PWideChar(S), Length(S), PaintInfo.CellRect, DrawFormat)
-  else
-    DrawTextW(Canvas.Handle, PWideChar(S), Length(S), PaintInfo.CellRect, DrawFormat, False);
+  DrawTextW(Canvas.Handle, PWideChar(S), Length(S), PaintInfo.CellRect, DrawFormat);
   Result := PaintInfo.CellRect.Bottom - PaintInfo.CellRect.Top;
 end;
 

components/virtualtreeview-unstable/demos/advanced/Advanced.lpi

@@ -1,7 +1,7 @@
 <?xml version="1.0"?>
 <CONFIG>
   <ProjectOptions>
-    <PathDelim Value="\"/>
+    <PathDelim Value="/"/>
     <Version Value="5"/>
     <General>
       <Flags>
@@ -155,7 +155,6 @@
   </ProjectOptions>
   <CompilerOptions>
     <Version Value="5"/>
-    <PathDelim Value="\"/>
     <CodeGeneration>
       <Generate Value="Faster"/>
     </CodeGeneration>

components/virtualtreeview-unstable/demos/advanced/DrawTreeDemo.lfm

@@ -1,7 +1,7 @@
 object DrawTreeForm: TDrawTreeForm
-  Left = 544
+  Left = 333
   Height = 477
-  Top = 320
+  Top = 339
   Width = 710
   HorzScrollBar.Page = 709
   VertScrollBar.Page = 476
@@ -24,9 +24,9 @@ object DrawTreeForm: TDrawTreeForm
   end
   object Label1: TLabel
     Left = 4
-    Height = 14
-    Top = 385
-    Width = 199
+    Height = 17
+    Top = 382
+    Width = 298
     Anchors = [akLeft, akBottom]
     Caption = 'Adjust vertical image alignment of nodes:'
     Color = clNone
@@ -34,9 +34,9 @@ object DrawTreeForm: TDrawTreeForm
   end
   object Label3: TLabel
     Left = 424
-    Height = 14
-    Top = 385
-    Width = 24
+    Height = 17
+    Top = 382
+    Width = 33
     Anchors = [akLeft, akBottom]
     Caption = '50%'
     Color = clNone
@@ -108,8 +108,8 @@ object DrawTreeForm: TDrawTreeForm
   end
   object TrackBar1: TTrackBar
     Left = 264
-    Height = 21
-    Top = 379
+    Height = 33
+    Top = 367
     Width = 157
     Max = 100
     OnChange = TrackBar1Change

components/virtualtreeview-unstable/demos/advanced/DrawTreeDemo.lrs

@@ -1,8 +1,8 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TDrawTreeForm','FORMDATA',[
-  'TPF0'#13'TDrawTreeForm'#12'DrawTreeForm'#4'Left'#3' '#2#6'Height'#3#221#1#3
-  +'Top'#3'@'#1#5'Width'#3#198#2#18'HorzScrollBar.Page'#3#197#2#18'VertScrollBa'
+  'TPF0'#13'TDrawTreeForm'#12'DrawTreeForm'#4'Left'#3'M'#1#6'Height'#3#221#1#3
+  +'Top'#3'S'#1#5'Width'#3#198#2#18'HorzScrollBar.Page'#3#197#2#18'VertScrollBa'
   +'r.Page'#3#220#1#13'ActiveControl'#7#4'VDT1'#7'Caption'#6#12'DrawTreeForm'#12
   +'ClientHeight'#3#221#1#11'ClientWidth'#3#198#2#11'Font.Height'#2#243#9'Font.'
   +'Name'#6#12'Trebuchet MS'#8'OnCreate'#7#10'FormCreate'#0#6'TLabel'#6'Label7'
@@ -11,63 +11,62 @@ LazarusResources.Add('TDrawTreeForm','FORMDATA',[
   +'umbnails. By default this tree uses the image loader library GraphicEx  to '
   +'support many common image formats like png, gif etc. (see www.delphi-gems.c'
   +'om for more infos and download).'#5'Color'#7#6'clNone'#11'ParentColor'#8#8
-  +'WordWrap'#9#0#0#6'TLabel'#6'Label1'#4'Left'#2#4#6'Height'#2#14#3'Top'#3#129
-  +#1#5'Width'#3#199#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6')Adju'
-  +'st vertical image alignment of nodes:'#5'Color'#7#6'clNone'#11'ParentColor'
-  +#8#0#0#6'TLabel'#6'Label3'#4'Left'#3#168#1#6'Height'#2#14#3'Top'#3#129#1#5'W'
-  +'idth'#2#24#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#3'50%'#5'Colo'
-  +'r'#7#6'clNone'#11'ParentColor'#8#0#0#16'TVirtualDrawTree'#4'VDT1'#4'Left'#2
-  +#10#6'Height'#3#22#1#3'Top'#2'T'#5'Width'#3#172#2#7'Anchors'#11#5'akTop'#6'a'
-  +'kLeft'#7'akRight'#8'akBottom'#0#15'AutoExpandDelay'#3#200#0#15'AutoScrollDe'
-  +'lay'#3#200#0#24'ClipboardFormats.Strings'#1#6#17'Virtual Tree Data'#0#18'Co'
-  +'lors.BorderColor'#7#12'clWindowText'#15'Colors.HotColor'#7#7'clBlack'#20'Co'
-  +'lors.TreeLineColor'#7#9'clBtnFace'#17'DefaultNodeHeight'#2' '#20'Header.Aut'
-  +'oSizeIndex'#2#255#17'Header.Background'#7#14'clBtnHighlight'#13'Header.Heig'
-  +'ht'#2#22#14'Header.Options'#11#14'hoColumnResize'#16'hoDblClickResize'#6'ho'
-  +'Drag'#14'hoRestrictDrag'#16'hoShowSortGlyphs'#9'hoVisible'#0#17'Header.Pare'
-  +'ntFont'#9#12'Header.Style'#7#8'hsPlates'#13'HintAnimation'#7#7'hatNone'#8'H'
-  +'intMode'#7#6'hmHint'#6'Images'#7#12'SystemImages'#17'IncrementalSearch'#7#5
-  +'isAll'#6'Indent'#2#20#8'LineMode'#7#7'lmBands'#14'ParentShowHint'#8#13'Root'
-  +'NodeCount'#2#10'"ScrollBarOptions.VerticalIncrement'#2' '#8'ShowHint'#9#8'T'
-  +'abOrder'#2#0#28'TreeOptions.AnimationOptions'#11#16'toAnimatedToggle'#0#23
-  +'TreeOptions.AutoOptions'#11#16'toAutoDropExpand'#12'toAutoScroll'#20'toAuto'
-  +'ScrollOnExpand'#22'toAutoTristateTracking'#22'toAutoDeleteMovedNodes'#0#24
-  +'TreeOptions.PaintOptions'#11#16'toShowBackground'#13'toShowButtons'#14'toSh'
-  +'owDropmark'#19'toShowHorzGridLines'#10'toShowRoot'#15'toShowTreeLines'#19't'
-  +'oShowVertGridLines'#12'toThemeAware'#0#28'TreeOptions.SelectionOptions'#11
-  +#15'toFullRowSelect'#0#14'OnCompareNodes'#7#16'VDT1CompareNodes'#10'OnDrawHi'
-  +'nt'#7#12'VDT1DrawHint'#10'OnDrawNode'#7#12'VDT1DrawNode'#10'OnFreeNode'#7#12
-  +'VDT1FreeNode'#13'OnGetHintSize'#7#15'VDT1GetHintSize'#15'OnGetImageIndex'#7
-  +#17'VDT1GetImageIndex'#14'OnGetNodeWidth'#7#16'VDT1GetNodeWidth'#13'OnHeader'
-  +'Click'#7#15'VDT1HeaderClick'#14'OnInitChildren'#7#16'VDT1InitChildren'#10'O'
-  +'nInitNode'#7#12'VDT1InitNode'#13'OnStateChange'#7#15'VDT1StateChange'#7'Col'
-  +'umns'#14#1#7'Options'#11#12'coAllowClick'#9'coEnabled'#13'coParentColor'#11
-  +'coResizable'#14'coShowDropMark'#9'coVisible'#0#5'Width'#3#217#0#8'WideText'
-  +#18#15#0#0#0'I'#0'm'#0'a'#0'g'#0'e'#0' '#0'f'#0'i'#0'l'#0'e'#0' '#0'n'#0'a'#0
-  +'m'#0'e'#0#0#1#8'Position'#2#1#5'Width'#3#200#0#8'WideText'#18#9#0#0#0'T'#0
-  +'h'#0'u'#0'm'#0'b'#0'n'#0'a'#0'i'#0'l'#0#0#1#8'Position'#2#2#5'Width'#3#160#0
-  +#8'WideText'#18#10#0#0#0'P'#0'r'#0'o'#0'p'#0'e'#0'r'#0't'#0'i'#0'e'#0's'#0#0
-  +#0#0#0#9'TTrackBar'#9'TrackBar1'#4'Left'#3#8#1#6'Height'#2#21#3'Top'#3'{'#1#5
-  +'Width'#3#157#0#3'Max'#2'd'#8'OnChange'#7#15'TrackBar1Change'#8'Position'#2
-  +'2'#8'ScalePos'#7#5'trTop'#9'TickStyle'#7#6'tsNone'#7'Anchors'#11#6'akLeft'#8
-  +'akBottom'#0#8'TabOrder'#2#1#0#0#10'TImageList'#12'SystemImages'#4'left'#3
-  +#194#1#3'top'#3#148#1#6'Bitmap'#10#22#4#0#0'li'#1#0#0#0#16#0#0#0#16#0#0#0#4#4
-  +#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 44 1",'#10'". c Non'
-  +'e",'#10'", c #CC9933",'#10'"- c #CB9832",'#10'"* c #C99630",'#10'"a c #C794'
-  +'2E",'#10'"b c #FFFFFF",'#10'"c c #C28F29",'#10'"d c #FFFF99",'#10'"e c #BD8'
-  +'A24",'#10'"f c #BA8721",'#10'"g c #B7841E",'#10'"h c #B5821C",'#10'"i c #B3'
-  +'801A",'#10'"j c #B07D17",'#10'"k c #FFF791",'#10'"l c #FFF48E",'#10'"m c #A'
-  +'E7B15",'#10'"n c #FFEB85",'#10'"o c #FFE680",'#10'"p c #C5922C",'#10'"q c #'
-  +'C08D27",'#10'"r c #BC8923",'#10'"s c #B8851F",'#10'"t c #B4811B",'#10'"u c '
-  +'#FFE07A",'#10'"v c #A3700A",'#10'"w c #FFD46E",'#10'"x c #F8C55F",'#10'"y c'
-  +' #A06D07",'#10'"z c #030303",'#10'"A c #FFCC66",'#10'"B c #EFBC56",'#10'"C '
-  +'c #9E6B05",'#10'"D c #E6B34D",'#10'"E c #9C6903",'#10'"F c #BF8C26",'#10'"G'
-  +' c #DCA943",'#10'"H c #9A6701",'#10'"I c #D3A03A",'#10'"J c #996600",'#10'"'
-  +'K c #AB7812",'#10'"L c #A8750F",'#10'"M c #A5720C",'#10'"N c #020202",'#10
-  +'"................",'#10'"................",'#10'"..,-*a..........",'#10'".,'
-  ,'bbbbc.........",'#10'",bddddbefghij...",'#10'"-klllllbbbbbm...",'#10'"*nopp'
-  +'ppppqrstii.",'#10'"aupbbbbbbbbbobv.",'#10'"pw,dddddddddxdyz",'#10'"cA-dkkkk'
-  +'kkkkBdCz",'#10'"qApdnnnnnnnnDdEz",'#10'"eAFduuuuuuuuGdHz",'#10'"fAsdwwwwwww'
-  +'wIdJz",'#10'".hijmKLMvyCEHJN.",'#10'"...zzzzzzzzzzz..",'#10'"..............'
-  +'.."}'#10#0#0#0
+  +'WordWrap'#9#0#0#6'TLabel'#6'Label1'#4'Left'#2#4#6'Height'#2#17#3'Top'#3'~'#1
+  +#5'Width'#3'*'#1#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6')Adjust '
+  +'vertical image alignment of nodes:'#5'Color'#7#6'clNone'#11'ParentColor'#8#0
+  +#0#6'TLabel'#6'Label3'#4'Left'#3#168#1#6'Height'#2#17#3'Top'#3'~'#1#5'Width'
+  +#2'!'#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6#3'50%'#5'Color'#7#6
+  +'clNone'#11'ParentColor'#8#0#0#16'TVirtualDrawTree'#4'VDT1'#4'Left'#2#10#6'H'
+  +'eight'#3#22#1#3'Top'#2'T'#5'Width'#3#172#2#7'Anchors'#11#5'akTop'#6'akLeft'
+  +#7'akRight'#8'akBottom'#0#15'AutoExpandDelay'#3#200#0#15'AutoScrollDelay'#3
+  +#200#0#24'ClipboardFormats.Strings'#1#6#17'Virtual Tree Data'#0#18'Colors.Bo'
+  +'rderColor'#7#12'clWindowText'#15'Colors.HotColor'#7#7'clBlack'#20'Colors.Tr'
+  +'eeLineColor'#7#9'clBtnFace'#17'DefaultNodeHeight'#2' '#20'Header.AutoSizeIn'
+  +'dex'#2#255#17'Header.Background'#7#14'clBtnHighlight'#13'Header.Height'#2#22
+  +#14'Header.Options'#11#14'hoColumnResize'#16'hoDblClickResize'#6'hoDrag'#14
+  +'hoRestrictDrag'#16'hoShowSortGlyphs'#9'hoVisible'#0#17'Header.ParentFont'#9
+  +#12'Header.Style'#7#8'hsPlates'#13'HintAnimation'#7#7'hatNone'#8'HintMode'#7
+  +#6'hmHint'#6'Images'#7#12'SystemImages'#17'IncrementalSearch'#7#5'isAll'#6'I'
+  +'ndent'#2#20#8'LineMode'#7#7'lmBands'#14'ParentShowHint'#8#13'RootNodeCount'
+  +#2#10'"ScrollBarOptions.VerticalIncrement'#2' '#8'ShowHint'#9#8'TabOrder'#2#0
+  +#28'TreeOptions.AnimationOptions'#11#16'toAnimatedToggle'#0#23'TreeOptions.A'
+  +'utoOptions'#11#16'toAutoDropExpand'#12'toAutoScroll'#20'toAutoScrollOnExpan'
+  +'d'#22'toAutoTristateTracking'#22'toAutoDeleteMovedNodes'#0#24'TreeOptions.P'
+  +'aintOptions'#11#16'toShowBackground'#13'toShowButtons'#14'toShowDropmark'#19
+  +'toShowHorzGridLines'#10'toShowRoot'#15'toShowTreeLines'#19'toShowVertGridLi'
+  +'nes'#12'toThemeAware'#0#28'TreeOptions.SelectionOptions'#11#15'toFullRowSel'
+  +'ect'#0#14'OnCompareNodes'#7#16'VDT1CompareNodes'#10'OnDrawHint'#7#12'VDT1Dr'
+  +'awHint'#10'OnDrawNode'#7#12'VDT1DrawNode'#10'OnFreeNode'#7#12'VDT1FreeNode'
+  +#13'OnGetHintSize'#7#15'VDT1GetHintSize'#15'OnGetImageIndex'#7#17'VDT1GetIma'
+  +'geIndex'#14'OnGetNodeWidth'#7#16'VDT1GetNodeWidth'#13'OnHeaderClick'#7#15'V'
+  +'DT1HeaderClick'#14'OnInitChildren'#7#16'VDT1InitChildren'#10'OnInitNode'#7
+  +#12'VDT1InitNode'#13'OnStateChange'#7#15'VDT1StateChange'#7'Columns'#14#1#7
+  +'Options'#11#12'coAllowClick'#9'coEnabled'#13'coParentColor'#11'coResizable'
+  +#14'coShowDropMark'#9'coVisible'#0#5'Width'#3#217#0#8'WideText'#18#15#0#0#0
+  +'I'#0'm'#0'a'#0'g'#0'e'#0' '#0'f'#0'i'#0'l'#0'e'#0' '#0'n'#0'a'#0'm'#0'e'#0#0
+  +#1#8'Position'#2#1#5'Width'#3#200#0#8'WideText'#18#9#0#0#0'T'#0'h'#0'u'#0'm'
+  +#0'b'#0'n'#0'a'#0'i'#0'l'#0#0#1#8'Position'#2#2#5'Width'#3#160#0#8'WideText'
+  +#18#10#0#0#0'P'#0'r'#0'o'#0'p'#0'e'#0'r'#0't'#0'i'#0'e'#0's'#0#0#0#0#0#9'TTr'
+  +'ackBar'#9'TrackBar1'#4'Left'#3#8#1#6'Height'#2'!'#3'Top'#3'o'#1#5'Width'#3
+  +#157#0#3'Max'#2'd'#8'OnChange'#7#15'TrackBar1Change'#8'Position'#2'2'#8'Scal'
+  +'ePos'#7#5'trTop'#9'TickStyle'#7#6'tsNone'#7'Anchors'#11#6'akLeft'#8'akBotto'
+  +'m'#0#8'TabOrder'#2#1#0#0#10'TImageList'#12'SystemImages'#4'left'#3#194#1#3
+  +'top'#3#148#1#6'Bitmap'#10#22#4#0#0'li'#1#0#0#0#16#0#0#0#16#0#0#0#4#4#0#0'/*'
+  +' XPM */'#10'static char *graphic[] = {'#10'"16 16 44 1",'#10'". c None",'#10
+  +'", c #CC9933",'#10'"- c #CB9832",'#10'"* c #C99630",'#10'"a c #C7942E",'#10
+  +'"b c #FFFFFF",'#10'"c c #C28F29",'#10'"d c #FFFF99",'#10'"e c #BD8A24",'#10
+  +'"f c #BA8721",'#10'"g c #B7841E",'#10'"h c #B5821C",'#10'"i c #B3801A",'#10
+  +'"j c #B07D17",'#10'"k c #FFF791",'#10'"l c #FFF48E",'#10'"m c #AE7B15",'#10
+  +'"n c #FFEB85",'#10'"o c #FFE680",'#10'"p c #C5922C",'#10'"q c #C08D27",'#10
+  +'"r c #BC8923",'#10'"s c #B8851F",'#10'"t c #B4811B",'#10'"u c #FFE07A",'#10
+  +'"v c #A3700A",'#10'"w c #FFD46E",'#10'"x c #F8C55F",'#10'"y c #A06D07",'#10
+  +'"z c #030303",'#10'"A c #FFCC66",'#10'"B c #EFBC56",'#10'"C c #9E6B05",'#10
+  +'"D c #E6B34D",'#10'"E c #9C6903",'#10'"F c #BF8C26",'#10'"G c #DCA943",'#10
+  +'"H c #9A6701",'#10'"I c #D3A03A",'#10'"J c #996600",'#10'"K c #AB7812",'#10
+  +'"L c #A8750F",'#10'"M c #A5720C",'#10'"N c #020202",'#10'"................"'
+  +','#10'"................",'#10'"..,-*a..........",'#10'".,bbbbc.........",'
+  ,#10'",bddddbefghij...",'#10'"-klllllbbbbbm...",'#10'"*noppppppqrstii.",'#10
+  +'"aupbbbbbbbbbobv.",'#10'"pw,dddddddddxdyz",'#10'"cA-dkkkkkkkkBdCz",'#10'"qA'
+  +'pdnnnnnnnnDdEz",'#10'"eAFduuuuuuuuGdHz",'#10'"fAsdwwwwwwwwIdJz",'#10'".hijm'
+  +'KLMvyCEHJN.",'#10'"...zzzzzzzzzzz..",'#10'"................"}'#10#0#0#0
 ]);

components/virtualtreeview-unstable/demos/advanced/DrawTreeDemo.pas

@@ -30,9 +30,9 @@ interface
 uses
   {$ifdef Windows}
   Windows,
-  {$endif} Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  VirtualTrees, StdCtrls,  JPEGLib,
-  ImgList, ComCtrls, shlobjext, LResources;
+  {$endif}
+  LCLIntf, delphicompat, LCLType, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  VirtualTrees, StdCtrls, ComCtrls, shlobjext, LResources;
 
 type
   TDrawTreeForm = class(TForm)
@@ -107,7 +107,8 @@ var
   SR: TSearchRec;
 
 begin
-  Result := FindFirst(IncludeTrailingPathDelimiter(Folder) + '*.*', faAnyFile, SR) = 0;
+  Result := FindFirst(IncludeTrailingPathDelimiter(Folder) + {$ifdef Windows}'*.*'{$else}'*'{$endif},
+    faAnyFile, SR) = 0;
   if Result then
     FindClose(SR);
 end;
@@ -117,10 +118,10 @@ end;
 function GetIconIndex(Name: string; Flags: Cardinal): Integer;
 
 // Returns the index of the system icon for the given file object.
-
+{
 var
   SFI: TSHFileInfo;
-
+}
 begin
   //todo
   {
@@ -168,7 +169,6 @@ begin
   BufferSize := GetLogicalDriveStrings(0, nil);
   SetLength(DriveStrings, BufferSize);
   GetLogicalDriveStrings(BufferSize, PChar(DriveStrings));
-
   {$else}
   DriveCount := 1;
   DriveStrings := '/';
@@ -471,7 +471,7 @@ begin
               if (NodeWidth - 2 * Margin) > (Right - Left) then
                 S := ShortenString(Canvas.Handle, S, Right - Left);
             end;
-            DrawTextW(Canvas.Handle, PWideChar(S), Length(S), R, DT_TOP or DT_LEFT or DT_VCENTER or DT_SINGLELINE, False);
+            DrawTextW(Canvas.Handle, PWideChar(S), Length(S), R, DT_TOP or DT_LEFT or DT_VCENTER or DT_SINGLELINE);
           end;
         end;
       1:
@@ -539,7 +539,8 @@ var
 
 begin
   Data := Sender.GetNodeData(Node);
-  if FindFirst(IncludeTrailingPathDelimiter(Data.FullPath) + '*.*', faAnyFile, SR) = 0 then
+  if FindFirst(IncludeTrailingPathDelimiter(Data.FullPath) + {$ifdef Windows}'*.*'{$else}'*'{$endif},
+    faAnyFile, SR) = 0 then
   begin
     Screen.Cursor := crHourGlass;
     try

components/virtualtreeview-unstable/demos/advanced/Editors.pas

@@ -8,8 +8,8 @@ unit Editors;
 interface
 
 uses
-  LCLIntf, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, VirtualTrees, ExtDlgs, ImgList, Buttons, ExtCtrls, ComCtrls,
+  LCLIntf, delphicompat, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  StdCtrls, VirtualTrees, ExtDlgs,  Buttons, ExtCtrls, ComCtrls,
   MaskEdit, LCLType;
 
 type

components/virtualtreeview-unstable/demos/advanced/GeneralAbilitiesDemo.lfm

@@ -15,20 +15,20 @@ object GeneralForm: TGeneralForm
   OnCreate = FormCreate
   ShowHint = True
   object Label18: TLabel
-    Left = 505
-    Height = 14
-    Top = 384
-    Width = 102
+    Left = 450
+    Height = 17
+    Top = 381
+    Width = 157
     Anchors = [akRight, akBottom]
     Caption = 'Switch check images:'
     Color = clNone
     ParentColor = False
   end
   object Label19: TLabel
-    Left = 507
-    Height = 14
-    Top = 432
-    Width = 97
+    Left = 454
+    Height = 17
+    Top = 429
+    Width = 150
     Anchors = [akRight, akBottom]
     Caption = 'Switch main column:'
     Color = clNone
@@ -91,7 +91,7 @@ object GeneralForm: TGeneralForm
     TabOrder = 0
     TreeOptions.AnimationOptions = [toAnimatedToggle]
     TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoSpanColumns, toAutoTristateTracking, toAutoHideButtons, toDisableAutoscrollOnFocus, toAutoChangeScale]
-    TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toEditable, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+    TreeOptions.MiscOptions = [toCheckSupport, toEditable, toInitOnSave, toToggleOnDblClick, toWheelPanning]
     TreeOptions.PaintOptions = [toHideSelection, toHotTrack, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toShowVertGridLines, toThemeAware, toUseBlendedImages, toFullVertGridLines, toUseBlendedSelection]
     TreeOptions.SelectionOptions = [toExtendedFocus, toMiddleClickSelect, toMultiSelect, toRightClickSelect]
     TreeOptions.StringOptions = [toSaveCaptions, toShowStaticText, toAutoAcceptEditChange]
@@ -142,7 +142,6 @@ object GeneralForm: TGeneralForm
     Width = 200
     Anchors = [akRight, akBottom]
     AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
-    ItemHeight = 13
     Items.Strings = (
       'Light check marks'
       'Dark check marks'
@@ -217,6 +216,8 @@ object GeneralForm: TGeneralForm
     ChildSizing.ShrinkVertical = crsScaleChilds
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 1
+    ClientHeight = 56
+    ClientWidth = 201
     ItemIndex = 0
     Items.Strings = (
       'Usual +/- buttons and lines'
@@ -241,6 +242,8 @@ object GeneralForm: TGeneralForm
     ChildSizing.ShrinkVertical = crsScaleChilds
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 1
+    ClientHeight = 56
+    ClientWidth = 201
     ItemIndex = 1
     Items.Strings = (
       'Dotted rectangle'
@@ -265,6 +268,8 @@ object GeneralForm: TGeneralForm
     ChildSizing.ShrinkVertical = crsScaleChilds
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 1
+    ClientHeight = 56
+    ClientWidth = 201
     Items.Strings = (
       'Theme aware'
       'Not theme aware'

components/virtualtreeview-unstable/demos/advanced/GeneralAbilitiesDemo.pas

@@ -19,7 +19,6 @@ unit GeneralAbilitiesDemo;
 
 interface
 
-{.$include Compilers.inc}
 
 {$ifdef COMPILER_7_UP}
   // For some things to work we need code, which is classified as being unsafe for .NET.
@@ -29,9 +28,9 @@ interface
 {$endif COMPILER_7_UP}
 
 uses
-  LCLIntf, LCLType,Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, Buttons, VTHeaderPopup, VirtualTrees, ComCtrls, ExtCtrls, ImgList, Menus,
-  StdActns, ActnList,  LResources;
+  LCLIntf, LCLType, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  StdCtrls, Buttons, VTHeaderPopup, VirtualTrees, ComCtrls, ExtCtrls, Menus,
+   ActnList,  LResources, ImgList;
 
 type                                        
   TGeneralForm = class(TForm)
@@ -96,7 +95,9 @@ var
 implementation
 
 uses
-  ShellAPI, Main, States;
+  {$ifdef Windows}
+  ShellAPI,
+  {$endif} Main, States;
 
 
 //----------------------------------------------------------------------------------------------------------------------
@@ -123,7 +124,11 @@ var
 
 begin
   // Determine if we are running on Windows XP.
+  {$ifdef Windows}
   ThemeRadioGroup.Enabled := (Win32MajorVersion >= 5) and (Win32MinorVersion >= 1);
+  {$else}
+  ThemeRadioGroup.Enabled := False;
+  {$endif}
   if ThemeRadioGroup.Enabled then
     ThemeRadioGroup.ItemIndex := 0;
 

components/virtualtreeview-unstable/demos/advanced/GridDemo.lfm

@@ -1,7 +1,7 @@
 object GridForm: TGridForm
-  Left = 411
+  Left = 341
   Height = 432
-  Top = 338
+  Top = 353
   Width = 736
   HorzScrollBar.Page = 735
   VertScrollBar.Page = 431
@@ -37,6 +37,7 @@ object GridForm: TGridForm
     WordWrap = True
   end
   object VST5: TVirtualStringTree
+    Cursor = 63
     Left = 8
     Height = 384
     Top = 6
@@ -72,7 +73,7 @@ object GridForm: TGridForm
     ShowHint = True
     TabOrder = 0
     TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoTristateTracking]
-    TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+    TreeOptions.MiscOptions = [toEditable, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning]
     TreeOptions.PaintOptions = [toHotTrack, toShowButtons, toShowDropmark, toShowHorzGridLines, toShowVertGridLines, toUseBlendedImages]
     TreeOptions.SelectionOptions = [toDisableDrawSelection, toExtendedFocus, toMiddleClickSelect, toMultiSelect, toRightClickSelect, toCenterScrollIntoView]
     WantTabs = True
@@ -116,10 +117,10 @@ object GridForm: TGridForm
       end>
   end
   object GridLineCheckBox: TCheckBox
-    Left = 586
-    Height = 13
-    Top = 373
-    Width = 97
+    Left = 542
+    Height = 24
+    Top = 362
+    Width = 141
     Anchors = [akRight, akBottom]
     Caption = 'Toggle grid lines'
     Checked = True

components/virtualtreeview-unstable/demos/advanced/GridDemo.lrs

@@ -1,63 +1,63 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TGridForm','FORMDATA',[
-  'TPF0'#9'TGridForm'#8'GridForm'#4'Left'#3#155#1#6'Height'#3#176#1#3'Top'#3'R'
-  +#1#5'Width'#3#224#2#18'HorzScrollBar.Page'#3#223#2#18'VertScrollBar.Page'#3
-  +#175#1#13'ActiveControl'#7#4'VST5'#7'Caption'#6#8'GridForm'#12'ClientHeight'
-  +#3#176#1#11'ClientWidth'#3#224#2#11'Font.Height'#2#243#9'Font.Name'#6#13'MS '
-  +'Sans Serif'#8'OnCreate'#7#10'FormCreate'#0#6'TLabel'#7'Label15'#4'Left'#3#12
-  +#2#6'Height'#3#153#0#3'Top'#2#8#5'Width'#3#195#0#7'Anchors'#11#5'akTop'#7'ak'
-  +'Right'#0#8'AutoSize'#8#7'Caption'#6#255'This sample demonstrates the grid e'
-  +'xtensions introduced in Virtual Treeview. The main difference to normal mod'
-  +'e is the  way cell content is handled (editing, selection etc.). In Grid mo'
-  +'de always the entire cell is used. Another point is the key handling .'#5'C'
-  +'olor'#7#6'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'#6'Label1'#4
-  +'Left'#3#14#2#6'Height'#2'm'#3'Top'#3#168#0#5'Width'#3#195#0#7'Anchors'#11#5
+  'TPF0'#9'TGridForm'#8'GridForm'#4'Left'#3'U'#1#6'Height'#3#176#1#3'Top'#3'a'#1
+  +#5'Width'#3#224#2#18'HorzScrollBar.Page'#3#223#2#18'VertScrollBar.Page'#3#175
+  +#1#13'ActiveControl'#7#4'VST5'#7'Caption'#6#8'GridForm'#12'ClientHeight'#3
+  +#176#1#11'ClientWidth'#3#224#2#11'Font.Height'#2#243#9'Font.Name'#6#13'MS Sa'
+  +'ns Serif'#8'OnCreate'#7#10'FormCreate'#0#6'TLabel'#7'Label15'#4'Left'#3#12#2
+  +#6'Height'#3#153#0#3'Top'#2#8#5'Width'#3#195#0#7'Anchors'#11#5'akTop'#7'akRi'
+  +'ght'#0#8'AutoSize'#8#7'Caption'#6#255'This sample demonstrates the grid ext'
+  +'ensions introduced in Virtual Treeview. The main difference to normal mode '
+  +'is the  way cell content is handled (editing, selection etc.). In Grid mode'
+  +' always the entire cell is used. Another point is the key handling .'#5'Col'
+  +'or'#7#6'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'#6'Label1'#4'L'
+  +'eft'#3#14#2#6'Height'#2'm'#3'Top'#3#168#0#5'Width'#3#195#0#7'Anchors'#11#5
   +'akTop'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6'WThe main column in this sam'
   +'ple is reduced to an indicator and is set as a fixed column.'#5'Color'#7#6
-  +'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#18'TVirtualStringTree'#4'VST5'#4
-  +'Left'#2#8#6'Height'#3#128#1#3'Top'#2#6#5'Width'#3#243#1#7'Anchors'#11#5'akT'
-  +'op'#6'akLeft'#7'akRight'#8'akBottom'#0#24'ClipboardFormats.Strings'#1#6#3'C'
-  +'SV'#6#11'HTML Format'#6#10'Plain text'#6#16'Rich Text Format'#6' Rich Text '
-  +'Format Without Objects'#6#12'Unicode text'#6#17'Virtual Tree Data'#0#18'Col'
-  +'ors.BorderColor'#7#12'clWindowText'#15'Colors.HotColor'#7#7'clBlack'#17'Def'
-  +'aultNodeHeight'#2#19#8'DragMode'#7#11'dmAutomatic'#9'EditDelay'#3','#1#11'F'
-  +'ont.Height'#2#245#9'Font.Name'#6#20'Microsoft Sans Serif'#20'Header.AutoSiz'
-  +'eIndex'#2#2#17'Header.Background'#7#11'clBtnShadow'#18'Header.Font.Height'#2
-  +#244#16'Header.Font.Name'#6#20'Microsoft Sans Serif'#14'Header.Options'#11#14
-  +'hoColumnResize'#16'hoDblClickResize'#6'hoDrag'#12'hoShowImages'#9'hoVisible'
-  +#0#12'Header.Style'#7#13'hsFlatButtons'#13'HintAnimation'#7#7'hatFade'#8'Hin'
-  +'tMode'#7#9'hmTooltip'#14'ParentShowHint'#8#13'RootNodeCount'#2'd'#30'Scroll'
-  +'BarOptions.AlwaysVisible'#9#8'ShowHint'#9#8'TabOrder'#2#0#23'TreeOptions.Au'
-  +'toOptions'#11#16'toAutoDropExpand'#12'toAutoScroll'#22'toAutoTristateTracki'
-  +'ng'#0#23'TreeOptions.MiscOptions'#11#15'toAcceptOLEDrop'#10'toEditable'#16
-  +'toGridExtensions'#12'toInitOnSave'#18'toToggleOnDblClick'#14'toWheelPanning'
-  +#0#24'TreeOptions.PaintOptions'#11#10'toHotTrack'#13'toShowButtons'#14'toSho'
-  +'wDropmark'#19'toShowHorzGridLines'#19'toShowVertGridLines'#18'toUseBlendedI'
-  +'mages'#0#28'TreeOptions.SelectionOptions'#11#22'toDisableDrawSelection'#15
-  +'toExtendedFocus'#19'toMiddleClickSelect'#13'toMultiSelect'#18'toRightClickS'
-  +'elect'#22'toCenterScrollIntoView'#0#8'WantTabs'#9#16'OnAfterCellPaint'#7#18
-  +'VST5AfterCellPaint'#17'OnBeforeCellPaint'#7#19'VST5BeforeCellPaint'#17'OnBe'
-  +'foreItemErase'#7#19'VST5BeforeItemErase'#14'OnCreateEditor'#7#16'VST5Create'
-  +'Editor'#15'OnFocusChanging'#7#17'VST5FocusChanging'#9'OnGetText'#7#11'VST5G'
-  +'etText'#11'OnPaintText'#7#13'VST5PaintText'#10'OnInitNode'#7#12'VST5InitNod'
-  +'e'#13'OnStateChange'#7#15'VST5StateChange'#7'Columns'#14#1#7'Options'#11#16
-  +'coParentBidiMode'#9'coVisible'#7'coFixed'#0#5'Width'#2#20#0#1#6'Margin'#2#0
-  +#8'Position'#2#1#5'Width'#2'd'#8'WideText'#18#11#0#0#0'C'#0'u'#0's'#0't'#0'o'
-  +#0'm'#0'e'#0'r'#0' '#0'I'#0'D'#0#0#1#6'Margin'#2#0#8'Position'#2#2#5'Width'#2
-  +'x'#8'WideText'#18#10#0#0#0'F'#0'i'#0'r'#0's'#0't'#0' '#0'N'#0'a'#0'm'#0'e'#0
-  +#0#1#6'Margin'#2#0#8'Position'#2#3#5'Width'#2'x'#8'WideText'#18#9#0#0#0'L'#0
-  +'a'#0's'#0't'#0' '#0'N'#0'a'#0'm'#0'e'#0#0#1#6'Margin'#2#0#8'Position'#2#4#5
-  +'Width'#2'd'#8'WideText'#18#10#0#0#0'O'#0'r'#0'd'#0'e'#0'r'#0' '#0'd'#0'a'#0
-  +'t'#0'e'#0#0#0#0#0#9'TCheckBox'#16'GridLineCheckBox'#4'Left'#3'J'#2#6'Height'
-  +#2#13#3'Top'#3'u'#1#5'Width'#2'a'#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'C'
-  +'aption'#6#17'Toggle grid lines'#7'Checked'#9#7'OnClick'#7#21'GridLineCheckB'
-  +'oxClick'#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#10'TImageList'#10'Tree'
-  +'Images'#4'left'#2#22#3'top'#2'$'#6'Bitmap'#10#211#31#0#0'li'#18#0#0#0#16#0#0
-  +#0#16#0#0#0#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 '
-  +'1",'#10'". c None",'#10'", c #000000",'#10'"- c #FFFFFF",'#10'"............'
-  +'....",'#10'"................",'#10'"...,,,,,,,,.....",'#10'"...,------,,...'
-  +'.",'#10'"...,------,-,...",'#10'"...,------,,,,..",'#10'"...,---------,..",'
+  +'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#18'TVirtualStringTree'#4'VST5'#6
+  +'Cursor'#2'?'#4'Left'#2#8#6'Height'#3#128#1#3'Top'#2#6#5'Width'#3#243#1#7'An'
+  +'chors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#24'ClipboardFormats.S'
+  +'trings'#1#6#3'CSV'#6#11'HTML Format'#6#10'Plain text'#6#16'Rich Text Format'
+  +#6' Rich Text Format Without Objects'#6#12'Unicode text'#6#17'Virtual Tree D'
+  +'ata'#0#18'Colors.BorderColor'#7#12'clWindowText'#15'Colors.HotColor'#7#7'cl'
+  +'Black'#17'DefaultNodeHeight'#2#19#8'DragMode'#7#11'dmAutomatic'#9'EditDelay'
+  +#3','#1#11'Font.Height'#2#245#9'Font.Name'#6#20'Microsoft Sans Serif'#20'Hea'
+  +'der.AutoSizeIndex'#2#2#17'Header.Background'#7#11'clBtnShadow'#18'Header.Fo'
+  +'nt.Height'#2#244#16'Header.Font.Name'#6#20'Microsoft Sans Serif'#14'Header.'
+  +'Options'#11#14'hoColumnResize'#16'hoDblClickResize'#6'hoDrag'#12'hoShowImag'
+  +'es'#9'hoVisible'#0#12'Header.Style'#7#13'hsFlatButtons'#13'HintAnimation'#7
+  +#7'hatFade'#8'HintMode'#7#9'hmTooltip'#14'ParentShowHint'#8#13'RootNodeCount'
+  +#2'd'#30'ScrollBarOptions.AlwaysVisible'#9#8'ShowHint'#9#8'TabOrder'#2#0#23
+  +'TreeOptions.AutoOptions'#11#16'toAutoDropExpand'#12'toAutoScroll'#22'toAuto'
+  +'TristateTracking'#0#23'TreeOptions.MiscOptions'#11#10'toEditable'#16'toGrid'
+  +'Extensions'#12'toInitOnSave'#18'toToggleOnDblClick'#14'toWheelPanning'#0#24
+  +'TreeOptions.PaintOptions'#11#10'toHotTrack'#13'toShowButtons'#14'toShowDrop'
+  +'mark'#19'toShowHorzGridLines'#19'toShowVertGridLines'#18'toUseBlendedImages'
+  +#0#28'TreeOptions.SelectionOptions'#11#22'toDisableDrawSelection'#15'toExten'
+  +'dedFocus'#19'toMiddleClickSelect'#13'toMultiSelect'#18'toRightClickSelect'
+  +#22'toCenterScrollIntoView'#0#8'WantTabs'#9#16'OnAfterCellPaint'#7#18'VST5Af'
+  +'terCellPaint'#17'OnBeforeCellPaint'#7#19'VST5BeforeCellPaint'#17'OnBeforeIt'
+  +'emErase'#7#19'VST5BeforeItemErase'#14'OnCreateEditor'#7#16'VST5CreateEditor'
+  +#15'OnFocusChanging'#7#17'VST5FocusChanging'#9'OnGetText'#7#11'VST5GetText'
+  +#11'OnPaintText'#7#13'VST5PaintText'#10'OnInitNode'#7#12'VST5InitNode'#13'On'
+  +'StateChange'#7#15'VST5StateChange'#7'Columns'#14#1#7'Options'#11#16'coParen'
+  +'tBidiMode'#9'coVisible'#7'coFixed'#0#5'Width'#2#20#0#1#6'Margin'#2#0#8'Posi'
+  +'tion'#2#1#5'Width'#2'd'#8'WideText'#18#11#0#0#0'C'#0'u'#0's'#0't'#0'o'#0'm'
+  +#0'e'#0'r'#0' '#0'I'#0'D'#0#0#1#6'Margin'#2#0#8'Position'#2#2#5'Width'#2'x'#8
+  +'WideText'#18#10#0#0#0'F'#0'i'#0'r'#0's'#0't'#0' '#0'N'#0'a'#0'm'#0'e'#0#0#1
+  +#6'Margin'#2#0#8'Position'#2#3#5'Width'#2'x'#8'WideText'#18#9#0#0#0'L'#0'a'#0
+  +'s'#0't'#0' '#0'N'#0'a'#0'm'#0'e'#0#0#1#6'Margin'#2#0#8'Position'#2#4#5'Widt'
+  +'h'#2'd'#8'WideText'#18#10#0#0#0'O'#0'r'#0'd'#0'e'#0'r'#0' '#0'd'#0'a'#0't'#0
+  +'e'#0#0#0#0#0#9'TCheckBox'#16'GridLineCheckBox'#4'Left'#3#30#2#6'Height'#2#24
+  +#3'Top'#3'j'#1#5'Width'#3#141#0#7'Anchors'#11#7'akRight'#8'akBottom'#0#7'Cap'
+  +'tion'#6#17'Toggle grid lines'#7'Checked'#9#7'OnClick'#7#21'GridLineCheckBox'
+  +'Click'#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#10'TImageList'#10'TreeIm'
+  +'ages'#4'left'#2#22#3'top'#2'$'#6'Bitmap'#10#211#31#0#0'li'#18#0#0#0#16#0#0#0
+  +#16#0#0#0#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 1"'
+  +','#10'". c None",'#10'", c #000000",'#10'"- c #FFFFFF",'#10'"..............'
+  +'..",'#10'"................",'#10'"...,,,,,,,,.....",'#10'"...,------,,...."'
+  +','#10'"...,------,-,...",'#10'"...,------,,,,..",'#10'"...,---------,..",'
   +#10'"...,---------,..",'#10'"...,---------,..",'#10'"...,---------,..",'#10
   +'"...,---------,..",'#10'"...,---------,..",'#10'"...,---------,..",'#10'"..'
   +'.,---------,..",'#10'"...,,,,,,,,,,,..",'#10'"................"}'#10#171#1#0

components/virtualtreeview-unstable/demos/advanced/GridDemo.pas

@@ -13,8 +13,8 @@ unit GridDemo;
 interface
 
 uses
-  delphicompat, LCLIntf, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, VirtualTrees, ImgList, LResources, LCLType;
+  delphicompat, LCLIntf, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  StdCtrls, VirtualTrees, LResources, LCLType, variants;
 
 type
   TGridForm = class(TForm)

components/virtualtreeview-unstable/demos/advanced/HeaderCustomDrawDemo.lfm

@@ -1,5 +1,5 @@
 object HeaderOwnerDrawForm: THeaderOwnerDrawForm
-  Left = 572
+  Left = 494
   Height = 440
   Top = 407
   Width = 776

components/virtualtreeview-unstable/demos/advanced/HeaderCustomDrawDemo.lrs

@@ -1,13 +1,13 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('THeaderOwnerDrawForm','FORMDATA',[
-  'TPF0'#20'THeaderOwnerDrawForm'#19'HeaderOwnerDrawForm'#4'Left'#3'<'#2#6'Heig'
-  +'ht'#3#184#1#3'Top'#3#151#1#5'Width'#3#8#3#18'HorzScrollBar.Page'#3#7#3#18'V'
-  +'ertScrollBar.Page'#3#183#1#13'ActiveControl'#7#20'HeaderCustomDrawTree'#7'C'
-  +'aption'#6#19'HeaderOwnerDrawForm'#12'ClientHeight'#3#184#1#11'ClientWidth'#3
-  +#8#3#11'Font.Height'#2#245#9'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7#10
-  +'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#0#6'TLabel'#6'Label8'#4'Left'#2
-  +#12#6'Height'#2'S'#3'Top'#3'>'#1#5'Width'#3#233#2#7'Anchors'#11#6'akLeft'#7
+  'TPF0'#20'THeaderOwnerDrawForm'#19'HeaderOwnerDrawForm'#4'Left'#3#238#1#6'Hei'
+  +'ght'#3#184#1#3'Top'#3#151#1#5'Width'#3#8#3#18'HorzScrollBar.Page'#3#7#3#18
+  +'VertScrollBar.Page'#3#183#1#13'ActiveControl'#7#20'HeaderCustomDrawTree'#7
+  +'Caption'#6#19'HeaderOwnerDrawForm'#12'ClientHeight'#3#184#1#11'ClientWidth'
+  +#3#8#3#11'Font.Height'#2#245#9'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7
+  +#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#0#6'TLabel'#6'Label8'#4'Left'
+  +#2#12#6'Height'#2'S'#3'Top'#3'>'#1#5'Width'#3#233#2#7'Anchors'#11#6'akLeft'#7
   +'akRight'#8'akBottom'#0#8'AutoSize'#8#7'Caption'#12#215#1#0#0'This page demo'
   +'nstrates the advance custom draw mode for a tree''s header. The left column'
   +' is drawn as usual while with the other columns more and more details are c'

components/virtualtreeview-unstable/demos/advanced/HeaderCustomDrawDemo.pas

@@ -10,8 +10,8 @@ unit HeaderCustomDrawDemo;
 interface
 
 uses
-  LCLIntf, Types, Messages, SysUtils, Classes, Graphics, Controls, Forms,
-  Dialogs, ImgList, VirtualTrees, StdCtrls, ExtCtrls, LResources, LCLType;
+  LCLIntf, Types, SysUtils, Classes, Graphics, Controls, Forms,
+  Dialogs, VirtualTrees, StdCtrls, ExtCtrls, LResources, LCLType;
 
 type
   THeaderOwnerDrawForm = class(TForm)

components/virtualtreeview-unstable/demos/advanced/MultilineDemo.lfm

@@ -1,5 +1,5 @@
 object NodeForm: TNodeForm
-  Left = 573
+  Left = 497
   Height = 542
   Top = 332
   Width = 773
@@ -80,7 +80,7 @@ object NodeForm: TNodeForm
       Columns = <      
         item
           Position = 1
-          Width = 483
+          Width = 481
         end      
         item
         end>
@@ -88,9 +88,9 @@ object NodeForm: TNodeForm
   end
   object AutoAdjustCheckBox: TCheckBox
     Left = 12
-    Height = 13
-    Top = 408
-    Width = 234
+    Height = 24
+    Top = 397
+    Width = 355
     Anchors = [akLeft, akBottom]
     Caption = 'Automatically adjust node height to node text.'
     OnClick = AutoAdjustCheckBoxClick

components/virtualtreeview-unstable/demos/advanced/MultilineDemo.lrs

@@ -1,7 +1,7 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TNodeForm','FORMDATA',[
-  'TPF0'#9'TNodeForm'#8'NodeForm'#4'Left'#3'='#2#6'Height'#3#30#2#3'Top'#3'L'#1
+  'TPF0'#9'TNodeForm'#8'NodeForm'#4'Left'#3#241#1#6'Height'#3#30#2#3'Top'#3'L'#1
   +#5'Width'#3#5#3#18'HorzScrollBar.Page'#3#4#3#18'VertScrollBar.Page'#3#29#2#13
   +'ActiveControl'#7#6'MLTree'#7'Caption'#6#8'NodeForm'#12'ClientHeight'#3#30#2
   +#11'ClientWidth'#3#5#3#11'Font.Height'#2#243#9'Font.Name'#6#13'MS Sans Serif'
@@ -38,9 +38,9 @@ LazarusResources.Add('TNodeForm','FORMDATA',[
   +#13'toMultiSelect'#0#9'OnEditing'#7#13'MLTreeEditing'#9'OnGetText'#7#13'MLTr'
   +'eeGetText'#11'OnPaintText'#7#15'MLTreePaintText'#10'OnInitNode'#7#14'MLTree'
   +'InitNode'#13'OnMeasureItem'#7#17'MLTreeMeasureItem'#13'OnStateChange'#7#17
-  +'MLTreeStateChange'#7'Columns'#14#1#8'Position'#2#1#5'Width'#3#227#1#0#1#0#0
-  +#0#0#0#9'TCheckBox'#18'AutoAdjustCheckBox'#4'Left'#2#12#6'Height'#2#13#3'Top'
-  +#3#152#1#5'Width'#3#234#0#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6
+  +'MLTreeStateChange'#7'Columns'#14#1#8'Position'#2#1#5'Width'#3#225#1#0#1#0#0
+  +#0#0#0#9'TCheckBox'#18'AutoAdjustCheckBox'#4'Left'#2#12#6'Height'#2#24#3'Top'
+  +#3#141#1#5'Width'#3'c'#1#7'Anchors'#11#6'akLeft'#8'akBottom'#0#7'Caption'#6
   +'.Automatically adjust node height to node text.'#7'OnClick'#7#23'AutoAdjust'
   +'CheckBoxClick'#8'TabOrder'#2#1#0#0#0
 ]);

components/virtualtreeview-unstable/demos/advanced/MultilineDemo.pas

@@ -11,7 +11,7 @@ interface
 
 uses
   LCLIntf, SysUtils, Classes, Forms, Controls, Graphics, VirtualTrees,
-  ExtCtrls, StdCtrls, ImgList, LResources;
+  ExtCtrls, StdCtrls, LResources;
   
 type
   TNodeForm = class(TForm)

components/virtualtreeview-unstable/demos/advanced/PropertiesDemo.lfm

@@ -7,6 +7,8 @@ object PropertiesForm: TPropertiesForm
   VertScrollBar.Page = 418
   ActiveControl = VST3
   Caption = 'PropertiesForm'
+  ClientHeight = 419
+  ClientWidth = 637
   Font.Height = -13
   Font.Name = 'MS Sans Serif'
   OnCreate = FormCreate
@@ -60,7 +62,7 @@ object PropertiesForm: TPropertiesForm
     TabOrder = 0
     TreeOptions.AnimationOptions = [toAnimatedToggle]
     TreeOptions.AutoOptions = [toAutoDropExpand, toAutoTristateTracking, toAutoDeleteMovedNodes]
-    TreeOptions.MiscOptions = [toAcceptOLEDrop, toEditable, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+    TreeOptions.MiscOptions = [toEditable, toGridExtensions, toInitOnSave, toToggleOnDblClick, toWheelPanning]
     TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toCenterScrollIntoView]
     TreeOptions.StringOptions = [toAutoAcceptEditChange]
     OnChange = VST3Change
@@ -103,6 +105,8 @@ object PropertiesForm: TPropertiesForm
     ChildSizing.ShrinkVertical = crsScaleChilds
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 1
+    ClientHeight = 48
+    ClientWidth = 198
     ItemIndex = 0
     Items.Strings = (
       'forward'

components/virtualtreeview-unstable/demos/advanced/PropertiesDemo.lrs

@@ -2,186 +2,187 @@ LazarusResources.Add('TPropertiesForm','FORMDATA',[
   'TPF0'#15'TPropertiesForm'#14'PropertiesForm'#4'Left'#3#141#1#6'Height'#3#163
   +#1#3'Top'#3'&'#1#5'Width'#3'}'#2#18'HorzScrollBar.Page'#3'|'#2#18'VertScroll'
   +'Bar.Page'#3#162#1#13'ActiveControl'#7#4'VST3'#7'Caption'#6#14'PropertiesFor'
-  +'m'#11'Font.Height'#2#243#9'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7#10
-  +'FormCreate'#0#6'TLabel'#6'Label9'#4'Left'#3#164#1#6'Height'#2'Q'#3'Top'#2#12
-  +#5'Width'#3#198#0#7'Anchors'#11#5'akTop'#7'akRight'#0#8'AutoSize'#8#7'Captio'
-  +'n'#6'vThis tree demonstrates a typical property page as it can be found in '
-  +'the property dialog for Word and other documents.'#5'Color'#7#6'clNone'#11
-  +'ParentColor'#8#8'WordWrap'#9#0#0#6'TLabel'#7'Label10'#4'Left'#3#164#1#6'Hei'
-  +'ght'#2']'#3'Top'#2'd'#5'Width'#3#198#0#7'Anchors'#11#5'akTop'#7'akRight'#0#8
-  +'AutoSize'#8#7'Caption'#6'What makes this demonstration special is the samp'
-  +'le implementation for node editors. However, neither of them is Unicode awa'
-  +'re.'#5'Color'#7#6'clNone'#11'ParentColor'#8#8'WordWrap'#9#0#0#18'TVirtualSt'
-  +'ringTree'#4'VST3'#4'Left'#2#10#6'Height'#3'q'#1#3'Top'#2#6#5'Width'#3#143#1
-  +#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#18'Colors.BorderC'
-  +'olor'#7#12'clWindowText'#15'Colors.HotColor'#7#7'clBlack'#17'DefaultNodeHei'
-  +'ght'#2#20#20'Header.AutoSizeIndex'#2#1#18'Header.Font.Height'#2#245#16'Head'
-  +'er.Font.Name'#6#13'MS Sans Serif'#13'Header.Height'#2#18#14'Header.Options'
-  +#11#12'hoAutoResize'#14'hoColumnResize'#9'hoVisible'#12'hoAutoSpring'#0#13'H'
-  +'intAnimation'#7#7'hatFade'#8'HintMode'#7#6'hmHint'#6'Images'#7#10'TreeImage'
-  +'s'#17'IncrementalSearch'#7#5'isAll'#24'IncrementalSearchTimeout'#3#244#1#6
-  +'Indent'#2#19#14'ParentShowHint'#8#13'RootNodeCount'#2#2#8'ShowHint'#9#8'Tab'
-  +'Order'#2#0#28'TreeOptions.AnimationOptions'#11#16'toAnimatedToggle'#0#23'Tr'
-  +'eeOptions.AutoOptions'#11#16'toAutoDropExpand'#22'toAutoTristateTracking'#22
-  +'toAutoDeleteMovedNodes'#0#23'TreeOptions.MiscOptions'#11#15'toAcceptOLEDrop'
-  +#10'toEditable'#16'toGridExtensions'#12'toInitOnSave'#18'toToggleOnDblClick'
-  +#14'toWheelPanning'#0#28'TreeOptions.SelectionOptions'#11#15'toExtendedFocus'
-  +#15'toFullRowSelect'#22'toCenterScrollIntoView'#0#25'TreeOptions.StringOptio'
-  +'ns'#11#22'toAutoAcceptEditChange'#0#8'OnChange'#7#10'VST3Change'#14'OnCreat'
-  +'eEditor'#7#16'VST3CreateEditor'#9'OnEditing'#7#11'VST3Editing'#9'OnGetText'
-  +#7#11'VST3GetText'#11'OnPaintText'#7#13'VST3PaintText'#15'OnGetImageIndex'#7
-  +#17'VST3GetImageIndex'#9'OnGetHint'#7#11'VST3GetHint'#19'OnIncrementalSearch'
-  +#7#21'VST3IncrementalSearch'#14'OnInitChildren'#7#16'VST3InitChildren'#10'On'
-  +'InitNode'#7#12'VST3InitNode'#13'OnStateChange'#7#15'VST3StateChange'#7'Colu'
-  +'mns'#14#1#7'Options'#11#12'coAllowClick'#11'coDraggable'#9'coEnabled'#16'co'
-  +'ParentBidiMode'#13'coParentColor'#11'coResizable'#14'coShowDropMark'#9'coVi'
-  +'sible'#12'coAutoSpring'#0#5'Width'#3#203#0#8'WideText'#6#10'Properties'#0#1
-  +#7'Options'#11#12'coAllowClick'#11'coDraggable'#9'coEnabled'#16'coParentBidi'
-  +'Mode'#13'coParentColor'#11'coResizable'#14'coShowDropMark'#9'coVisible'#12
-  +'coAutoSpring'#0#8'Position'#2#1#5'Width'#3#196#0#8'WideText'#6#6'Values'#0#0
-  +#0#0#11'TRadioGroup'#11'RadioGroup1'#4'Left'#3#160#1#6'Height'#2'E'#3'Top'#3
-  +'2'#1#5'Width'#3#202#0#7'Anchors'#11#7'akRight'#8'akBottom'#0#8'AutoFill'#9#7
-  +'Caption'#6#31' Incremental search direction: '#28'ChildSizing.LeftRightSpac'
-  +'ing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizon'
-  +'tal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'cr'
-  +'sHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChild'
-  +'s'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layou'
-  +'t'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#9
-  +'ItemIndex'#2#0#13'Items.Strings'#1#6#7'forward'#6#8'backward'#0#7'OnClick'#7
-  +#16'RadioGroup1Click'#8'TabOrder'#2#1#0#0#10'TImageList'#10'TreeImages'#4'le'
-  +'ft'#3#166#1#3'top'#3#224#0#6'Bitmap'#10#211#31#0#0'li'#18#0#0#0#16#0#0#0#16
-  +#0#0#0#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 1",'
-  +#10'". c None",'#10'", c #800000",'#10'"- c #FFFFFF",'#10'"................"'
-  +','#10'"................",'#10'".,,-........,,-.",'#10'".,,,,-.....,,-..",'
-  +#10'"..,,,,-...,,-...",'#10'"....,,,-.,-.....",'#10'".....,,,,,-.....",'#10
-  +'"......,,,-......",'#10'".....,,,,,-.....",'#10'"....,,,-.,,-....",'#10'"..'
-  +'.,,,-...,,-...",'#10'"..,,,-.....,-...",'#10'"..,,,-......,-..",'#10'"...,-'
-  +'...........",'#10'".............,-.",'#10'"................"}'#10#156#1#0#0
-  +'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 1",'#10'". c None",'
-  +#10'", c #000000",'#10'"- c #FFFFFF",'#10'"................",'#10'".........'
-  +'.......",'#10'"...,,,,,,,,.....",'#10'"...,------,,....",'#10'"...,------,-'
-  +',...",'#10'"...,------,,,,..",'#10'"...,---------,..",'#10'"...,---------,.'
-  +'.",'#10'"...,---------,..",'#10'"...,---------,..",'#10'"...,---------,..",'
-  +#10'"...,---------,..",'#10'"...,---------,..",'#10'"...,---------,..",'#10
-  ,'"...,,,,,,,,,,,..",'#10'"................"}'#10#171#1#0#0'/* XPM */'#10'sta'
-  +'tic char *graphic[] = {'#10'"16 16 4 1",'#10'". c None",'#10'", c #000000",'
-  +#10'"- c #FFFFFF",'#10'"* c #000080",'#10'"................",'#10'".........'
-  +'.......",'#10'".,,,,,,.........",'#10'".,----,,........",'#10'".,----,-,...'
-  +'....",'#10'".,-,,-,******...",'#10'".,-----*----**..",'#10'".,-,,,,*----*-*'
-  +'.",'#10'".,-----*-,,-****",'#10'".,-,,,,*-------*",'#10'".,-----*-,,,,,-*",'
-  +#10'".,,,,,,*-------*",'#10'".......*-,,,,,-*",'#10'".......*-------*",'#10
-  +'".......*********",'#10'"................"}'#10#216#1#0#0'/* XPM */'#10'sta'
-  +'tic char *graphic[] = {'#10'"16 16 7 1",'#10'". c None",'#10'", c #000000",'
-  +#10'"- c #FFFF00",'#10'"* c #808080",'#10'"a c #808000",'#10'"b c #000080",'
-  +#10'"c c #FFFFFF",'#10'"................",'#10'"......,,,,......",'#10'"..,,'
-  +',,,--,,,,,..",'#10'".,*a*,-,,-,a*a,.",'#10'".,a*,......,a*,.",'#10'".,*a,,,'
-  +',,,,,*a,.",'#10'".,a*a*a*a*a*a*,.",'#10'".,*a*a*bbbbbbb,.",'#10'".,a*a*abcc'
-  +'cccbb.",'#10'".,*a*a*bcccccbcb",'#10'".,a*a*abcbbbcbbb",'#10'".,*a*a*bccccc'
-  +'ccb",'#10'".,a*a*abcbbbbbcb",'#10'"..,,,,,bcccccccb",'#10'".......bbbbbbbbb'
-  +'",'#10'"................"}'#10#186#1#0#0'/* XPM */'#10'static char *graphic'
-  +'[] = {'#10'"16 16 5 1",'#10'". c #FFFF00",'#10'", c None",'#10'"- c #808080'
-  +'",'#10'"* c #000000",'#10'"a c #FFFFFF",'#10'".,,-.,,-***,,,,,",'#10'"-.,-a'
-  +',-.aa**,,,,",'#10'",-.-.-.aaa*a*,,,",'#10'",.-.a----a*aa*,,",'#10'"---a..aa'
-  +'aa*****,",'#10'",,a-aa-**aaaaa*,",'#10'"-,,-.aaaaaaaaa*,",'#10'",,,-a******'
-  +'*aa*,",'#10'",,,*aaaaaaaaaa*,",'#10'",,,*a*******aa*,",'#10'",,,*aaaaaaaaaa'
-  +'*,",'#10'",,,*a*******aa*,",'#10'",,,*aaaaaaaaaa*,",'#10'",,,*aaaaaaaaaa*,"'
-  +','#10'",,,************,",'#10'",,,,,,,,,,,,,,,,"}'#10#201#1#0#0'/* XPM */'
-  +#10'static char *graphic[] = {'#10'"16 16 6 1",'#10'". c None",'#10'", c #00'
-  +'0080",'#10'"- c #FFFFFF",'#10'"* c #000000",'#10'"a c #808080",'#10'"b c #F'
-  +'FFF00",'#10'"................",'#10'",,,,,,,,,,,,,,..",'#10'",-,,,,,,,,,,,,'
-  +'..",'#10'",,,,,,,,,,,,,*..",'#10'"*...*--------*..",'#10'"*...*--------*.."'
-  +','#10'"*...*--aaa---*..",'#10'"*...*-a.b.a--*..",'#10'"*...*a.b.baaaaa.",'
-  +#10'"*...*a--------a*",'#10'"*...*a-b.b.b.ba*",'#10'"*...*a-.b.b.b.a*",'#10
-  +'"*****a-b.b.b.ba*",'#10'".....aaaaaaaaaa*",'#10'"......**********",'#10'"..'
-  +'.............."}'#10#201#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10
-  +'"16 16 6 1",'#10'". c None",'#10'", c #000080",'#10'"- c #000000",'#10'"* c'
-  +' #FFFFFF",'#10'"a c #808080",'#10'"b c #00FFFF",'#10'"................",'#10
-  +'"................",'#10'",,,,,,,,,.......",'#10'",,,,,,,,,.......",'#10'"-*'
-  +'******-.-.....",'#10'"-*aaaaa*-.--....",'#10'"-*******-.-b-...",'#10'"-*aa-'
-  +'------bb-..",'#10'"-***-bbbbbbbbb-.",'#10'"-----bbbbbbbbbb-",'#10'"....-bbb'
-  +'bbbbbb-.",'#10'"....-------bb-..",'#10'"..........-b-...",'#10'"..........-'
-  +'-....",'#10'"..........-.....",'#10'"................"}'#10#171#1#0#0'/* XP'
+  +'m'#12'ClientHeight'#3#163#1#11'ClientWidth'#3'}'#2#11'Font.Height'#2#243#9
+  +'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7#10'FormCreate'#0#6'TLabel'#6'L'
+  +'abel9'#4'Left'#3#164#1#6'Height'#2'Q'#3'Top'#2#12#5'Width'#3#198#0#7'Anchor'
+  +'s'#11#5'akTop'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6'vThis tree demonstra'
+  +'tes a typical property page as it can be found in the property dialog for W'
+  +'ord and other documents.'#5'Color'#7#6'clNone'#11'ParentColor'#8#8'WordWrap'
+  +#9#0#0#6'TLabel'#7'Label10'#4'Left'#3#164#1#6'Height'#2']'#3'Top'#2'd'#5'Wid'
+  +'th'#3#198#0#7'Anchors'#11#5'akTop'#7'akRight'#0#8'AutoSize'#8#7'Caption'#6
+  +'What makes this demonstration special is the sample implementation for nod'
+  +'e editors. However, neither of them is Unicode aware.'#5'Color'#7#6'clNone'
+  +#11'ParentColor'#8#8'WordWrap'#9#0#0#18'TVirtualStringTree'#4'VST3'#4'Left'#2
+  +#10#6'Height'#3'q'#1#3'Top'#2#6#5'Width'#3#143#1#7'Anchors'#11#5'akTop'#6'ak'
+  +'Left'#7'akRight'#8'akBottom'#0#18'Colors.BorderColor'#7#12'clWindowText'#15
+  +'Colors.HotColor'#7#7'clBlack'#17'DefaultNodeHeight'#2#20#20'Header.AutoSize'
+  +'Index'#2#1#18'Header.Font.Height'#2#245#16'Header.Font.Name'#6#13'MS Sans S'
+  +'erif'#13'Header.Height'#2#18#14'Header.Options'#11#12'hoAutoResize'#14'hoCo'
+  +'lumnResize'#9'hoVisible'#12'hoAutoSpring'#0#13'HintAnimation'#7#7'hatFade'#8
+  +'HintMode'#7#6'hmHint'#6'Images'#7#10'TreeImages'#17'IncrementalSearch'#7#5
+  +'isAll'#24'IncrementalSearchTimeout'#3#244#1#6'Indent'#2#19#14'ParentShowHin'
+  +'t'#8#13'RootNodeCount'#2#2#8'ShowHint'#9#8'TabOrder'#2#0#28'TreeOptions.Ani'
+  +'mationOptions'#11#16'toAnimatedToggle'#0#23'TreeOptions.AutoOptions'#11#16
+  +'toAutoDropExpand'#22'toAutoTristateTracking'#22'toAutoDeleteMovedNodes'#0#23
+  +'TreeOptions.MiscOptions'#11#10'toEditable'#16'toGridExtensions'#12'toInitOn'
+  +'Save'#18'toToggleOnDblClick'#14'toWheelPanning'#0#28'TreeOptions.SelectionO'
+  +'ptions'#11#15'toExtendedFocus'#15'toFullRowSelect'#22'toCenterScrollIntoVie'
+  +'w'#0#25'TreeOptions.StringOptions'#11#22'toAutoAcceptEditChange'#0#8'OnChan'
+  +'ge'#7#10'VST3Change'#14'OnCreateEditor'#7#16'VST3CreateEditor'#9'OnEditing'
+  +#7#11'VST3Editing'#9'OnGetText'#7#11'VST3GetText'#11'OnPaintText'#7#13'VST3P'
+  +'aintText'#15'OnGetImageIndex'#7#17'VST3GetImageIndex'#9'OnGetHint'#7#11'VST'
+  +'3GetHint'#19'OnIncrementalSearch'#7#21'VST3IncrementalSearch'#14'OnInitChil'
+  +'dren'#7#16'VST3InitChildren'#10'OnInitNode'#7#12'VST3InitNode'#13'OnStateCh'
+  +'ange'#7#15'VST3StateChange'#7'Columns'#14#1#7'Options'#11#12'coAllowClick'
+  +#11'coDraggable'#9'coEnabled'#16'coParentBidiMode'#13'coParentColor'#11'coRe'
+  +'sizable'#14'coShowDropMark'#9'coVisible'#12'coAutoSpring'#0#5'Width'#3#203#0
+  +#8'WideText'#6#10'Properties'#0#1#7'Options'#11#12'coAllowClick'#11'coDragga'
+  +'ble'#9'coEnabled'#16'coParentBidiMode'#13'coParentColor'#11'coResizable'#14
+  +'coShowDropMark'#9'coVisible'#12'coAutoSpring'#0#8'Position'#2#1#5'Width'#3
+  +#196#0#8'WideText'#6#6'Values'#0#0#0#0#11'TRadioGroup'#11'RadioGroup1'#4'Lef'
+  +'t'#3#160#1#6'Height'#2'E'#3'Top'#3'2'#1#5'Width'#3#202#0#7'Anchors'#11#7'ak'
+  +'Right'#8'akBottom'#0#8'AutoFill'#9#7'Caption'#6#31' Incremental search dire'
+  +'ction: '#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpaci'
+  +'ng'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27
+  +'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.'
+  +'ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14
+  +'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'
+  +#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'0'#11'ClientWidth'#3
+  +#198#0#9'ItemIndex'#2#0#13'Items.Strings'#1#6#7'forward'#6#8'backward'#0#7'O'
+  +'nClick'#7#16'RadioGroup1Click'#8'TabOrder'#2#1#0#0#10'TImageList'#10'TreeIm'
+  +'ages'#4'left'#3#166#1#3'top'#3#224#0#6'Bitmap'#10#211#31#0#0'li'#18#0#0#0#16
+  +#0#0#0#16#0#0#0#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 1'
+  +'6 3 1",'#10'". c None",'#10'", c #800000",'#10'"- c #FFFFFF",'#10'"........'
+  +'........",'#10'"................",'#10'".,,-........,,-.",'#10'".,,,,-.....'
+  +',,-..",'#10'"..,,,,-...,,-...",'#10'"....,,,-.,-.....",'#10'".....,,,,,-...'
+  +'..",'#10'"......,,,-......",'#10'".....,,,,,-.....",'#10'"....,,,-.,,-...."'
+  +','#10'"...,,,-...,,-...",'#10'"..,,,-.....,-...",'#10'"..,,,-......,-..",'
+  +#10'"...,-...........",'#10'".............,-.",'#10'"................"}'#10
+  +#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 1",'#10'". '
+  +'c None",'#10'", c #000000",'#10'"- c #FFFFFF",'#10'"................",'#10
+  +'"................",'#10'"...,,,,,,,,.....",'#10'"...,------,,....",'#10'"..'
+  +'.,------,-,...",'#10'"...,------,,,,..",'#10'"...,---------,..",'#10'"...,-'
+  +'--------,..",'#10'"...,---------,..",'#10'"...,---------,..",'#10'"...,----'
+  ,'-----,..",'#10'"...,---------,..",'#10'"...,---------,..",'#10'"...,-------'
+  +'--,..",'#10'"...,,,,,,,,,,,..",'#10'"................"}'#10#171#1#0#0'/* XP'
   +'M */'#10'static char *graphic[] = {'#10'"16 16 4 1",'#10'". c None",'#10'",'
-  +' c #000000",'#10'"- c #000080",'#10'"* c #FFFFFF",'#10'"................",'
-  +#10'".......,,,,,,.--",'#10'"......,......,--",'#10'".....,.,......--",'#10
-  +'",,,,,.,.,.....--",'#10'",**,.,.,.,...,--",'#10'",*,.,*,.,.,,,.--",'#10'",*'
-  +'*,***,.,*,...-",'#10'",*******,**,....",'#10'",**********,....",'#10'",*,,*'
-  +',,,,,*,....",'#10'",**********,....",'#10'",*,,*,,,,,*,....",'#10'",*******'
-  +'***,....",'#10'",,,,,,,,,,,,....",'#10'"................"}'#10#246#1#0#0'/*'
-  +' XPM */'#10'static char *graphic[] = {'#10'"16 16 9 1",'#10'". c None",'#10
-  +'", c #808080",'#10'"- c #0000FF",'#10'"* c #FFFFFF",'#10'"a c #008000",'#10
-  +'"b c #000000",'#10'"c c #FFFF00",'#10'"d c #008080",'#10'"e c #000080",'#10
-  +'".....,,,,,......",'#10'"...,,--*.abb....",'#10'"..,--.*.aaaab...",'#10'".,'
-  +'-*.*,,,,,,,b..",'#10'".,--*.,***c*,,..",'#10'"b--.aa,*c***,*,.",'#10'"b--aa'
-  +'a,***c*bbbb",'#10'"b--aaa,*cddd,*,b",'#10'"b---aa,*d*,ae*,b",'#10'"b-----,*'
-  +'d,a-e*,b",'#10'".b----,*d---e*,b",'#10'".b----,*ceee,*,b",'#10'"..b---,***c'
-  +'***,b",'#10'"...bb-,*c***c*,b",'#10'".....b,,,,,,,,,b",'#10'"......bbbbbbbb'
-  +'bb"}'#10#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 3 1"'
-  +','#10'". c None",'#10'", c #FFFFFF",'#10'"- c #008000",'#10'"..............'
-  +'..",'#10'".,,,,,,,,,,,,,,.",'#10'".,,,,,,,-,,,,,,.",'#10'".,,,,,,,--,,,,,."'
-  +','#10'".,,,,------,,,,.",'#10'".,,,-,,,--,,,,,.",'#10'".,,,-,,,-,,,,,,.",'
-  +#10'".,,,-,,,,,,,,,,.",'#10'".,,,,,,,,,,-,,,.",'#10'".,,,,,,-,,,-,,,.",'#10
-  +'".,,,,,--,,,-,,,.",'#10'".,,,,------,,,,.",'#10'".,,,,,--,,,,,,,.",'#10'".,'
-  +',,,,,-,,,,,,,.",'#10'".,,,,,,,,,,,,,,.",'#10'"................"}'#10#186#1#0
-  +#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 5 1",'#10'". c None",'
-  +#10'", c #808080",'#10'"- c #000000",'#10'"* c #FFFFFF",'#10'"a c #000080",'
-  +#10'"................",'#10'".....,,,,,,-....",'#10'".....,*****-....",'#10
-  +'".....,*,,,,,,-..",'#10'"a....,*,*****-..",'#10'"aa...,*,*,,,,,,-",'#10'"aa'
-  ,'a..,*,*,*****-",'#10'"aaaa.,*,*,*aaa*-",'#10'"aaa..,*,*,*****-",'#10'"aa...'
-  +'--,*,*aaa*-",'#10'"a......,*,*****-",'#10'".......--,*aaa*-",'#10'"........'
-  +'.,*****-",'#10'".........-------",'#10'"................",'#10'"...........'
-  +'....."}'#10#201#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 6'
-  +' 1",'#10'". c None",'#10'", c #808080",'#10'"- c #FFFF00",'#10'"* c #C0C0C0'
-  +'",'#10'"a c #FFFFFF",'#10'"b c #000000",'#10'"................",'#10'"...,,'
-  +',,,........",'#10'"..,-*-*-,.......",'#10'".,-*-*-*-,,,,,,.",'#10'".,aaaaaa'
-  +'aaaaaa,b",'#10'".,a-*-*-*-*-*-,b",'#10'".,a*-*-*-*-*-*,b",'#10'".,a-*-*-*-*'
-  +'-*-,b",'#10'".,a*-*-*-*-*-*,b",'#10'".,a-*-*-*-*-*-,b",'#10'".,a*-*-*-*-*-*'
-  +',b",'#10'".,a-*-*-*-*-*-,b",'#10'".,,,,,,,,,,,,,,b",'#10'"..bbbbbbbbbbbbbb"'
-  +','#10'"................",'#10'"................"}'#10#201#1#0#0'/* XPM */'
-  +#10'static char *graphic[] = {'#10'"16 16 6 1",'#10'". c None",'#10'", c #80'
-  +'8080",'#10'"- c #FFFFFF",'#10'"* c #FFFF00",'#10'"a c #C0C0C0",'#10'"b c #0'
-  +'00000",'#10'"................",'#10'"...,,,,,........",'#10'"..,-----,.....'
-  +'..",'#10'".,-*a*a*-,,,,,,.",'#10'".,-a*a*a------,b",'#10'".,-*a*a*a*a*a*,b"'
-  +','#10'",,,,,,,,,,,,,*,b",'#10'",----------,,a,b",'#10'",-*a*a*a*a**b,,b",'
-  +#10'".,-*a*a*a*a*ab,b",'#10'".,-a*a*a*a*a*b,b",'#10'"..,-a*a*a*a**,bb",'#10
-  +'"..,,,,,,,,,,,,,b",'#10'"...bbbbbbbbbbbbb",'#10'"................",'#10'"..'
-  +'.............."}'#10#186#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10
-  +'"16 16 5 1",'#10'". c None",'#10'", c #808080",'#10'"- c #FFFFFF",'#10'"* c'
-  +' #000000",'#10'"a c #C0C0C0",'#10'"................",'#10'".,,,,,,,,.......'
-  +'",'#10'".,------,*......",'#10'".,------,-*.....",'#10'".,------,***....",'
-  +#10'".,------aaa*....",'#10'".,-------aa*....",'#10'".,--------a*....",'#10
-  +'".,--------a*....",'#10'".,--------a*....",'#10'".,--------a*....",'#10'".,'
-  +'--------a*....",'#10'".,aaaaaaaaa*....",'#10'".***********....",'#10'".....'
-  +'...........",'#10'"................"}'#10#246#1#0#0'/* XPM */'#10'static ch'
-  +'ar *graphic[] = {'#10'"16 16 9 1",'#10'". c None",'#10'", c #808080",'#10'"'
-  +'- c #FFFFFF",'#10'"* c #000000",'#10'"a c #0000FF",'#10'"b c #000080",'#10
-  +'"c c #008080",'#10'"d c #C0C0C0",'#10'"e c #FFFF00",'#10'"................"'
-  +','#10'".,,,,,,,,.......",'#10'".,------,*....ab",'#10'".,------,-*..acb",'
-  +#10'".,------,***acb.",'#10'".,------dddacb..",'#10'".,-------dacb...",'#10
-  +'".,-------acb....",'#10'".,------acb*....",'#10'".,-----,ebd*....",'#10'".,'
-  +'-----d,-d*....",'#10'".,----*,--d*....",'#10'".,ddddddddd*....",'#10'".****'
-  +'*******....",'#10'"................",'#10'"................"}'#10#186#1#0#0
-  +'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 5 1",'#10'". c #808080"'
-  +','#10'", c None",'#10'"- c #FFFFFF",'#10'"* c #000000",'#10'"a c #C0C0C0",'
-  +#10'"........,,,,,,,,",'#10'".-........,,,,,,",'#10'".-.-........,,,,",'#10
-  +'".-.-.------.*,,,",'#10'".-.-.------.-*,,",'#10'".-.-.------.***,",'#10'".-'
-  +'.-.------aaa*,",'#10'".-.-.-------aa*,",'#10'".-.-.--------a*,",'#10'".-.-.'
-  +'--------a*,",'#10'".-.-.--------a*,",'#10'".a.-.--------a*,",'#10'"**.a.---'
-  +'-----a*,",'#10'",,**.aaaaaaaaa*,",'#10'",,,,***********,",'#10'",,,,,,,,,,,'
-  +',,,,,"}'#10#246#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 9'
-  +' 1",'#10'". c #808080",'#10'", c None",'#10'"- c #FFFFFF",'#10'"* c #0000FF'
-  +'",'#10'"a c #000080",'#10'"b c #000000",'#10'"c c #008080",'#10'"d c #C0C0C'
-  +'0",'#10'"e c #FFFF00",'#10'"........,,,,,,,,",'#10'".-........,,,,,,",'#10
-  +'".-.-........,,*a",'#10'".-.-.------.b*ca",'#10'".-.-.------.*ca,",'#10'".-'
-  +'.-.------*cab,",'#10'".-.-.-----*cadb,",'#10'".-.-.----*caddb,",'#10'".-.-.'
-  +'---*ca--db,",'#10'".-.-.--.ea---db,",'#10'".-.-.--d.----db,",'#10'".d.-.-b.'
-  +'-----db,",'#10'"bb.d.--------db,",'#10'",,bb.dddddddddb,",'#10'",,,,bbbbbbb'
-  +'bbbb,",'#10'",,,,,,,,,,,,,,,,"}'#10#141#1#0#0'/* XPM */'#10'static char *gr'
-  +'aphic[] = {'#10'"16 16 2 1",'#10'". c None",'#10'", c #000000",'#10'"......'
-  +'..........",'#10'"................",'#10'"..,.............",'#10'"..,,.....'
-  +'.......",'#10'"..,,,...........",'#10'"..,,,,..........",'#10'"..,,,,,.....'
-  +'....",'#10'"..,,,,,,........",'#10'"..,,,,,,,.......",'#10'"..,,,,,,.......'
-  +'.",'#10'"..,,,,,.........",'#10'"..,,,,..........",'#10'"..,,,...........",'
-  +#10'"..,,............",'#10'"..,.............",'#10'"................"}'#10#0
-  +#0#0
+  +' c #000000",'#10'"- c #FFFFFF",'#10'"* c #000080",'#10'"................",'
+  +#10'"................",'#10'".,,,,,,.........",'#10'".,----,,........",'#10
+  +'".,----,-,.......",'#10'".,-,,-,******...",'#10'".,-----*----**..",'#10'".,'
+  +'-,,,,*----*-*.",'#10'".,-----*-,,-****",'#10'".,-,,,,*-------*",'#10'".,---'
+  +'--*-,,,,,-*",'#10'".,,,,,,*-------*",'#10'".......*-,,,,,-*",'#10'".......*'
+  +'-------*",'#10'".......*********",'#10'"................"}'#10#216#1#0#0'/*'
+  +' XPM */'#10'static char *graphic[] = {'#10'"16 16 7 1",'#10'". c None",'#10
+  +'", c #000000",'#10'"- c #FFFF00",'#10'"* c #808080",'#10'"a c #808000",'#10
+  +'"b c #000080",'#10'"c c #FFFFFF",'#10'"................",'#10'"......,,,,..'
+  +'....",'#10'"..,,,,,--,,,,,..",'#10'".,*a*,-,,-,a*a,.",'#10'".,a*,......,a*,'
+  +'.",'#10'".,*a,,,,,,,,*a,.",'#10'".,a*a*a*a*a*a*,.",'#10'".,*a*a*bbbbbbb,.",'
+  +#10'".,a*a*abcccccbb.",'#10'".,*a*a*bcccccbcb",'#10'".,a*a*abcbbbcbbb",'#10
+  +'".,*a*a*bcccccccb",'#10'".,a*a*abcbbbbbcb",'#10'"..,,,,,bcccccccb",'#10'"..'
+  +'.....bbbbbbbbb",'#10'"................"}'#10#186#1#0#0'/* XPM */'#10'static'
+  +' char *graphic[] = {'#10'"16 16 5 1",'#10'". c #FFFF00",'#10'", c None",'#10
+  +'"- c #808080",'#10'"* c #000000",'#10'"a c #FFFFFF",'#10'".,,-.,,-***,,,,,"'
+  +','#10'"-.,-a,-.aa**,,,,",'#10'",-.-.-.aaa*a*,,,",'#10'",.-.a----a*aa*,,",'
+  +#10'"---a..aaaa*****,",'#10'",,a-aa-**aaaaa*,",'#10'"-,,-.aaaaaaaaa*,",'#10
+  +'",,,-a*******aa*,",'#10'",,,*aaaaaaaaaa*,",'#10'",,,*a*******aa*,",'#10'",,'
+  +',*aaaaaaaaaa*,",'#10'",,,*a*******aa*,",'#10'",,,*aaaaaaaaaa*,",'#10'",,,*a'
+  +'aaaaaaaaa*,",'#10'",,,************,",'#10'",,,,,,,,,,,,,,,,"}'#10#201#1#0#0
+  +'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 6 1",'#10'". c None",'
+  +#10'", c #000080",'#10'"- c #FFFFFF",'#10'"* c #000000",'#10'"a c #808080",'
+  +#10'"b c #FFFF00",'#10'"................",'#10'",,,,,,,,,,,,,,..",'#10'",-,,'
+  +',,,,,,,,,,..",'#10'",,,,,,,,,,,,,*..",'#10'"*...*--------*..",'#10'"*...*--'
+  +'------*..",'#10'"*...*--aaa---*..",'#10'"*...*-a.b.a--*..",'#10'"*...*a.b.b'
+  +'aaaaa.",'#10'"*...*a--------a*",'#10'"*...*a-b.b.b.ba*",'#10'"*...*a-.b.b.b'
+  +'.a*",'#10'"*****a-b.b.b.ba*",'#10'".....aaaaaaaaaa*",'#10'"......**********'
+  +'",'#10'"................"}'#10#201#1#0#0'/* XPM */'#10'static char *graphic'
+  +'[] = {'#10'"16 16 6 1",'#10'". c None",'#10'", c #000080",'#10'"- c #000000'
+  +'",'#10'"* c #FFFFFF",'#10'"a c #808080",'#10'"b c #00FFFF",'#10'"..........'
+  +'......",'#10'"................",'#10'",,,,,,,,,.......",'#10'",,,,,,,,,....'
+  +'...",'#10'"-*******-.-.....",'#10'"-*aaaaa*-.--....",'#10'"-*******-.-b-...'
+  +'",'#10'"-*aa-------bb-..",'#10'"-***-bbbbbbbbb-.",'#10'"-----bbbbbbbbbb-",'
+  +#10'"....-bbbbbbbbb-.",'#10'"....-------bb-..",'#10'"..........-b-...",'#10
+  +'"..........--....",'#10'"..........-.....",'#10'"................"}'#10#171
+  +#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 4 1",'#10'". c No'
+  +'ne",'#10'", c #000000",'#10'"- c #000080",'#10'"* c #FFFFFF",'#10'"........'
+  +'........",'#10'".......,,,,,,.--",'#10'"......,......,--",'#10'".....,.,...'
+  +'...--",'#10'",,,,,.,.,.....--",'#10'",**,.,.,.,...,--",'#10'",*,.,*,.,.,,,.'
+  +'--",'#10'",**,***,.,*,...-",'#10'",*******,**,....",'#10'",**********,...."'
+  +','#10'",*,,*,,,,,*,....",'#10'",**********,....",'#10'",*,,*,,,,,*,....",'
+  +#10'",**********,....",'#10'",,,,,,,,,,,,....",'#10'"................"}'#10
+  +#246#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 9 1",'#10'". '
+  +'c None",'#10'", c #808080",'#10'"- c #0000FF",'#10'"* c #FFFFFF",'#10'"a c '
+  +'#008000",'#10'"b c #000000",'#10'"c c #FFFF00",'#10'"d c #008080",'#10'"e c'
+  +' #000080",'#10'".....,,,,,......",'#10'"...,,--*.abb....",'#10'"..,--.*.aaa'
+  +'ab...",'#10'".,-*.*,,,,,,,b..",'#10'".,--*.,***c*,,..",'#10'"b--.aa,*c***,*'
+  +',.",'#10'"b--aaa,***c*bbbb",'#10'"b--aaa,*cddd,*,b",'#10'"b---aa,*d*,ae*,b"'
+  +','#10'"b-----,*d,a-e*,b",'#10'".b----,*d---e*,b",'#10'".b----,*ceee,*,b",'
+  +#10'"..b---,***c***,b",'#10'"...bb-,*c***c*,b",'#10'".....b,,,,,,,,,b",'#10
+  +'"......bbbbbbbbbb"}'#10#156#1#0#0'/* XPM */'#10'static char *graphic[] = {'
+  +#10'"16 16 3 1",'#10'". c None",'#10'", c #FFFFFF",'#10'"- c #008000",'#10'"'
+  +'................",'#10'".,,,,,,,,,,,,,,.",'#10'".,,,,,,,-,,,,,,.",'#10'".,,'
+  +',,,,,--,,,,,.",'#10'".,,,,------,,,,.",'#10'".,,,-,,,--,,,,,.",'#10'".,,,-,'
+  +',,-,,,,,,.",'#10'".,,,-,,,,,,,,,,.",'#10'".,,,,,,,,,,-,,,.",'#10'".,,,,,,-,'
+  +',,-,,,.",'#10'".,,,,,--,,,-,,,.",'#10'".,,,,------,,,,.",'#10'".,,,,,--,,,,'
+  +',,,.",'#10'".,,,,,,-,,,,,,,.",'#10'".,,,,,,,,,,,,,,.",'#10'"...............'
+  +'."}'#10#186#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 5 1",'
+  +#10'". c None",'#10'", c #808080",'#10'"- c #000000",'#10'"* c #FFFFFF",'#10
+  +'"a c #000080",'#10'"................",'#10'".....,,,,,,-....",'#10'".....,*'
+  ,'****-....",'#10'".....,*,,,,,,-..",'#10'"a....,*,*****-..",'#10'"aa...,*,*,'
+  +',,,,,-",'#10'"aaa..,*,*,*****-",'#10'"aaaa.,*,*,*aaa*-",'#10'"aaa..,*,*,***'
+  +'**-",'#10'"aa...--,*,*aaa*-",'#10'"a......,*,*****-",'#10'".......--,*aaa*-'
+  +'",'#10'".........,*****-",'#10'".........-------",'#10'"................",'
+  +#10'"................"}'#10#201#1#0#0'/* XPM */'#10'static char *graphic[] ='
+  +' {'#10'"16 16 6 1",'#10'". c None",'#10'", c #808080",'#10'"- c #FFFF00",'
+  +#10'"* c #C0C0C0",'#10'"a c #FFFFFF",'#10'"b c #000000",'#10'"..............'
+  +'..",'#10'"...,,,,,........",'#10'"..,-*-*-,.......",'#10'".,-*-*-*-,,,,,,."'
+  +','#10'".,aaaaaaaaaaaa,b",'#10'".,a-*-*-*-*-*-,b",'#10'".,a*-*-*-*-*-*,b",'
+  +#10'".,a-*-*-*-*-*-,b",'#10'".,a*-*-*-*-*-*,b",'#10'".,a-*-*-*-*-*-,b",'#10
+  +'".,a*-*-*-*-*-*,b",'#10'".,a-*-*-*-*-*-,b",'#10'".,,,,,,,,,,,,,,b",'#10'"..'
+  +'bbbbbbbbbbbbbb",'#10'"................",'#10'"................"}'#10#201#1#0
+  +#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 6 1",'#10'". c None",'
+  +#10'", c #808080",'#10'"- c #FFFFFF",'#10'"* c #FFFF00",'#10'"a c #C0C0C0",'
+  +#10'"b c #000000",'#10'"................",'#10'"...,,,,,........",'#10'"..,-'
+  +'----,.......",'#10'".,-*a*a*-,,,,,,.",'#10'".,-a*a*a------,b",'#10'".,-*a*a'
+  +'*a*a*a*,b",'#10'",,,,,,,,,,,,,*,b",'#10'",----------,,a,b",'#10'",-*a*a*a*a'
+  +'**b,,b",'#10'".,-*a*a*a*a*ab,b",'#10'".,-a*a*a*a*a*b,b",'#10'"..,-a*a*a*a**'
+  +',bb",'#10'"..,,,,,,,,,,,,,b",'#10'"...bbbbbbbbbbbbb",'#10'"................'
+  +'",'#10'"................"}'#10#186#1#0#0'/* XPM */'#10'static char *graphic'
+  +'[] = {'#10'"16 16 5 1",'#10'". c None",'#10'", c #808080",'#10'"- c #FFFFFF'
+  +'",'#10'"* c #000000",'#10'"a c #C0C0C0",'#10'"................",'#10'".,,,,'
+  +',,,,.......",'#10'".,------,*......",'#10'".,------,-*.....",'#10'".,------'
+  +',***....",'#10'".,------aaa*....",'#10'".,-------aa*....",'#10'".,--------a'
+  +'*....",'#10'".,--------a*....",'#10'".,--------a*....",'#10'".,--------a*..'
+  +'..",'#10'".,--------a*....",'#10'".,aaaaaaaaa*....",'#10'".***********...."'
+  +','#10'"................",'#10'"................"}'#10#246#1#0#0'/* XPM */'
+  +#10'static char *graphic[] = {'#10'"16 16 9 1",'#10'". c None",'#10'", c #80'
+  +'8080",'#10'"- c #FFFFFF",'#10'"* c #000000",'#10'"a c #0000FF",'#10'"b c #0'
+  +'00080",'#10'"c c #008080",'#10'"d c #C0C0C0",'#10'"e c #FFFF00",'#10'".....'
+  +'...........",'#10'".,,,,,,,,.......",'#10'".,------,*....ab",'#10'".,------'
+  +',-*..acb",'#10'".,------,***acb.",'#10'".,------dddacb..",'#10'".,-------da'
+  +'cb...",'#10'".,-------acb....",'#10'".,------acb*....",'#10'".,-----,ebd*..'
+  +'..",'#10'".,-----d,-d*....",'#10'".,----*,--d*....",'#10'".,ddddddddd*...."'
+  +','#10'".***********....",'#10'"................",'#10'"................"}'
+  +#10#186#1#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"16 16 5 1",'#10
+  +'". c #808080",'#10'", c None",'#10'"- c #FFFFFF",'#10'"* c #000000",'#10'"a'
+  +' c #C0C0C0",'#10'"........,,,,,,,,",'#10'".-........,,,,,,",'#10'".-.-.....'
+  +'...,,,,",'#10'".-.-.------.*,,,",'#10'".-.-.------.-*,,",'#10'".-.-.------.'
+  +'***,",'#10'".-.-.------aaa*,",'#10'".-.-.-------aa*,",'#10'".-.-.--------a*'
+  +',",'#10'".-.-.--------a*,",'#10'".-.-.--------a*,",'#10'".a.-.--------a*,",'
+  +#10'"**.a.--------a*,",'#10'",,**.aaaaaaaaa*,",'#10'",,,,***********,",'#10
+  +'",,,,,,,,,,,,,,,,"}'#10#246#1#0#0'/* XPM */'#10'static char *graphic[] = {'
+  +#10'"16 16 9 1",'#10'". c #808080",'#10'", c None",'#10'"- c #FFFFFF",'#10'"'
+  +'* c #0000FF",'#10'"a c #000080",'#10'"b c #000000",'#10'"c c #008080",'#10
+  +'"d c #C0C0C0",'#10'"e c #FFFF00",'#10'"........,,,,,,,,",'#10'".-........,,'
+  +',,,,",'#10'".-.-........,,*a",'#10'".-.-.------.b*ca",'#10'".-.-.------.*ca'
+  +',",'#10'".-.-.------*cab,",'#10'".-.-.-----*cadb,",'#10'".-.-.----*caddb,",'
+  +#10'".-.-.---*ca--db,",'#10'".-.-.--.ea---db,",'#10'".-.-.--d.----db,",'#10
+  +'".d.-.-b.-----db,",'#10'"bb.d.--------db,",'#10'",,bb.dddddddddb,",'#10'",,'
+  +',,bbbbbbbbbbb,",'#10'",,,,,,,,,,,,,,,,"}'#10#141#1#0#0'/* XPM */'#10'static'
+  +' char *graphic[] = {'#10'"16 16 2 1",'#10'". c None",'#10'", c #000000",'#10
+  +'"................",'#10'"................",'#10'"..,.............",'#10'"..'
+  +',,............",'#10'"..,,,...........",'#10'"..,,,,..........",'#10'"..,,,'
+  +',,.........",'#10'"..,,,,,,........",'#10'"..,,,,,,,.......",'#10'"..,,,,,,'
+  +'........",'#10'"..,,,,,.........",'#10'"..,,,,..........",'#10'"..,,,......'
+  +'.....",'#10'"..,,............",'#10'"..,.............",'#10'"..............'
+  +'.."}'#10#0#0#0
 ]);

components/virtualtreeview-unstable/demos/advanced/PropertiesDemo.pas

@@ -11,13 +11,14 @@ unit PropertiesDemo;
 interface
 
 uses
-  LCLIntf, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, VirtualTrees, ImgList, ExtCtrls, LResources;
+  LCLIntf, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  StdCtrls, VirtualTrees, ExtCtrls, LResources;
 
+{$ifdef Windows}
 const
   // Helper message to decouple node change handling from edit handling.
   WM_STARTEDITING = WM_USER + 778;
-  
+{$endif}
 type
   TPropertiesForm = class(TForm)
     VST3: TVirtualStringTree;
@@ -45,7 +46,9 @@ type
     procedure RadioGroup1Click(Sender: TObject);
     procedure VST3StateChange(Sender: TBaseVirtualTree; Enter, Leave: TVirtualTreeStates);
   private
+    {$ifdef Windows}
     procedure WMStartEditing(var Message: TMessage); message WM_STARTEDITING;
+    {$endif}
   end;
 
 var
@@ -202,7 +205,9 @@ begin
       // to start a new edit operation if the last one is still in progress. So we post us a special message and
       // in the message handler we then can start editing the new node. This works because the posted message
       // is first executed *after* this event and the message, which triggered it is finished.
+      {$ifdef Windows}
       PostMessage(Self.Handle, WM_STARTEDITING, Integer(Node), 0);
+      {$endif}
     end;
   end;
 end;
@@ -306,6 +311,7 @@ end;
 
 //----------------------------------------------------------------------------------------------------------------------
 
+{$ifdef Windows}
 procedure TPropertiesForm.WMStartEditing(var Message: TMessage);
 
 // This message was posted by ourselves from the node change handler above to decouple that change event and our
@@ -320,7 +326,7 @@ begin
   // Note: the test whether a node can really be edited is done in the OnEditing event.
   VST3.EditNode(Node, 1);
 end;
-
+{$endif}
 //----------------------------------------------------------------------------------------------------------------------
 
 initialization

components/virtualtreeview-unstable/demos/advanced/VisibilityDemo.lfm

@@ -1,5 +1,5 @@
 object VisibilityForm: TVisibilityForm
-  Left = 573
+  Left = 518
   Height = 529
   Top = 362
   Width = 752
@@ -7,6 +7,8 @@ object VisibilityForm: TVisibilityForm
   VertScrollBar.Page = 528
   ActiveControl = VST1
   Caption = 'VisibilityForm'
+  ClientHeight = 529
+  ClientWidth = 752
   Font.Height = -13
   Font.Name = 'MS Sans Serif'
   OnCreate = FormCreate
@@ -88,6 +90,8 @@ object VisibilityForm: TVisibilityForm
     ChildSizing.ShrinkVertical = crsScaleChilds
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 1
+    ClientHeight = 88
+    ClientWidth = 365
     ItemIndex = 0
     Items.Strings = (
       'show all nodes'
@@ -104,6 +108,8 @@ object VisibilityForm: TVisibilityForm
     Top = 212
     Width = 489
     Anchors = [akTop, akLeft, akRight, akBottom]
+    ClientHeight = 266
+    ClientWidth = 489
     FullRepaint = False
     TabOrder = 1
     object Splitter2: TSplitter
@@ -4146,7 +4152,7 @@ object VisibilityForm: TVisibilityForm
       ShowHint = True
       TabOrder = 0
       TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoTristateTracking]
-      TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+      TreeOptions.MiscOptions = [toCheckSupport, toInitOnSave, toToggleOnDblClick, toWheelPanning]
       TreeOptions.PaintOptions = [toHideFocusRect, toShowBackground, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseBlendedSelection]
       TreeOptions.SelectionOptions = [toExtendedFocus]
       OnChange = VST2Change
@@ -8193,7 +8199,7 @@ object VisibilityForm: TVisibilityForm
       ShowHint = True
       TabOrder = 1
       TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoTristateTracking]
-      TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+      TreeOptions.MiscOptions = [toCheckSupport, toInitOnSave, toToggleOnDblClick, toWheelPanning]
       TreeOptions.PaintOptions = [toHideFocusRect, toShowBackground, toShowButtons, toShowDropmark, toShowRoot, toShowTreeLines, toThemeAware, toUseBlendedImages, toUseBlendedSelection]
       TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect]
       OnChange = VST2Change

components/virtualtreeview-unstable/demos/advanced/VisibilityDemo.pas

@@ -12,8 +12,8 @@ unit VisibilityDemo;
 interface
 
 uses
-  LCLIntf, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
-  StdCtrls, VirtualTrees, ComCtrls, ExtCtrls, ImgList, LResources;
+  LCLIntf, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
+  StdCtrls, VirtualTrees, ComCtrls, ExtCtrls, LResources;
 
 type
   TVisibilityForm = class(TForm)

components/virtualtreeview-unstable/demos/advanced/WindowsXPStyleDemo.lfm

@@ -1,7 +1,7 @@
 object WindowsXPForm: TWindowsXPForm
-  Left = 361
+  Left = 339
   Height = 581
-  Top = 141
+  Top = 275
   Width = 829
   HorzScrollBar.Page = 828
   VertScrollBar.Page = 580
@@ -93,7 +93,7 @@ object WindowsXPForm: TWindowsXPForm
     TabOrder = 0
     TreeOptions.AnimationOptions = [toAnimatedToggle]
     TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScroll, toAutoScrollOnExpand, toAutoTristateTracking]
-    TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toInitOnSave, toReportMode, toToggleOnDblClick, toWheelPanning]
+    TreeOptions.MiscOptions = [toCheckSupport, toInitOnSave, toReportMode, toToggleOnDblClick, toWheelPanning]
     TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toShowRoot, toThemeAware]
     TreeOptions.SelectionOptions = [toMultiSelect]
     OnCompareNodes = XPTreeCompareNodes
@@ -124,16 +124,15 @@ object WindowsXPForm: TWindowsXPForm
       end>
   end
   object CoolBar1: TPanel
-    Height = 64
+    Height = 34
     Width = 829
     Align = alTop
     AutoSize = True
-    ClientHeight = 64
+    ClientHeight = 34
     ClientWidth = 829
     TabOrder = 1
     object ToolBar1: TToolBar
       Left = 1
-      Height = 62
       Top = 1
       Width = 827
       AutoSize = True
@@ -152,47 +151,48 @@ object WindowsXPForm: TWindowsXPForm
         Style = tbsDropDown
       end
       object ToolButton2: TToolButton
-        Left = 44
+        Left = 45
         Top = 2
         AutoSize = True
         ImageIndex = 10
         Style = tbsDropDown
       end
       object ToolButton3: TToolButton
-        Left = 257
+        Left = 89
         Top = 2
         AutoSize = True
         ImageIndex = 18
       end
       object ToolButton4: TToolButton
-        Left = 470
+        Left = 123
         Top = 2
         AutoSize = True
         ImageIndex = 14
       end
       object ToolButton5: TToolButton
-        Top = 32
+        Left = 157
+        Top = 2
         AutoSize = True
         ImageIndex = 21
       end
       object ToolButton6: TToolButton
-        Left = 213
-        Top = 32
+        Left = 191
+        Top = 2
         AutoSize = True
         ImageIndex = 8
         Style = tbsDropDown
       end
       object ToolButton8: TToolButton
-        Left = 426
-        Top = 32
+        Left = 235
+        Top = 2
         Width = 8
         Caption = 'ToolButton8'
         ImageIndex = 9
         Style = tbsSeparator
       end
       object ToolButton9: TToolButton
-        Left = 434
-        Top = 32
+        Left = 243
+        Top = 2
         AutoSize = True
         Caption = 'Click here to print the treeview.'
         ImageIndex = 24

components/virtualtreeview-unstable/demos/advanced/WindowsXPStyleDemo.pas

@@ -20,7 +20,7 @@ uses
     Variants,
   {$endif}
   LCLIntf, SysUtils, Classes, Graphics, Controls, Forms,
-  Dialogs, VirtualTrees, ComCtrls, ToolWin, Menus, StdCtrls,
+  Dialogs, VirtualTrees, ComCtrls, Menus, StdCtrls,
   LResources, Printers, PrintersDlgs, ExtCtrls;
 
 type
@@ -72,7 +72,10 @@ var
 implementation
 
 uses
-  Main, ShellAPI, States;
+  {$ifdef Windows}
+  ShellAPI,
+  {$endif}
+  Main, States;
 
 
 type

components/virtualtreeview-unstable/demos/images/Unit1.lfm

@@ -1,12 +1,14 @@
 object Form1: TForm1
-  Left = 198
+  Left = 283
   Height = 458
-  Top = 110
+  Top = 314
   Width = 538
   HorzScrollBar.Page = 537
   VertScrollBar.Page = 457
   ActiveControl = VST1
   Caption = 'VT - Images'
+  ClientHeight = 458
+  ClientWidth = 538
   Font.Height = -11
   Font.Name = 'MS Sans Serif'
   OnCreate = FormCreate
@@ -29,7 +31,7 @@ object Form1: TForm1
     StateImages = ImageList2
     TabOrder = 0
     TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoTristateTracking]
-    TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toEditable, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+    TreeOptions.MiscOptions = [toCheckSupport, toEditable, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
     OnBeforeCellPaint = VST1BeforeCellPaint
     OnChecking = VST1Checking
     OnCompareNodes = VST1CompareNodes

components/virtualtreeview-unstable/demos/images/Unit1.lrs

@@ -1,61 +1,113 @@
 { This is an automatically generated lazarus resource file }
 
 LazarusResources.Add('TForm1','FORMDATA',[
-  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#198#0#6'Height'#3#202#1#3'Top'#2'n'#5'Wid'
-  +'th'#3#26#2#18'HorzScrollBar.Page'#3#25#2#18'VertScrollBar.Page'#3#201#1#13
-  +'ActiveControl'#7#4'VST1'#7'Caption'#6#11'VT - Images'#11'Font.Height'#2#245
-  +#9'Font.Name'#6#13'MS Sans Serif'#8'OnCreate'#7#10'FormCreate'#0#18'TVirtual'
-  +'StringTree'#4'VST1'#6'Height'#3#202#1#5'Width'#3#26#2#5'Align'#7#8'alClient'
-  +#14'CheckImageKind'#7#4'ckXP'#17'DefaultNodeHeight'#2#20#8'DragMode'#7#11'dm'
-  +'Automatic'#14'DragOperations'#11#6'doCopy'#6'doMove'#6'doLink'#0#17'DrawSel'
-  +'ectionMode'#7#18'smBlendedRectangle'#18'Header.Font.Height'#2#245#16'Header'
-  +'.Font.Name'#6#13'MS Sans Serif'#13'Header.Height'#2#24#13'Header.Images'#7
-  +#10'ImageList1'#14'Header.Options'#11#14'hoColumnResize'#6'hoDrag'#12'hoShow'
-  +'Images'#16'hoShowSortGlyphs'#9'hoVisible'#0#17'Header.SortColumn'#2#0#12'He'
-  +'ader.Style'#7#9'hsXPStyle'#11'StateImages'#7#10'ImageList2'#8'TabOrder'#2#0
-  +#23'TreeOptions.AutoOptions'#11#16'toAutoDropExpand'#20'toAutoScrollOnExpand'
-  +#22'toAutoTristateTracking'#0#23'TreeOptions.MiscOptions'#11#15'toAcceptOLED'
-  +'rop'#14'toCheckSupport'#10'toEditable'#21'toFullRepaintOnResize'#12'toInitO'
-  +'nSave'#18'toToggleOnDblClick'#14'toWheelPanning'#0#17'OnBeforeCellPaint'#7
-  +#19'VST1BeforeCellPaint'#10'OnChecking'#7#12'VST1Checking'#14'OnCompareNodes'
-  +#7#16'VST1CompareNodes'#9'OnGetText'#7#11'VST1GetText'#15'OnGetImageIndex'#7
-  +#17'VST1GetImageIndex'#13'OnHeaderClick'#7#15'VST1HeaderClick'#10'OnInitNode'
-  +#7#12'VST1InitNode'#7'Columns'#14#1#10'ImageIndex'#2#0#5'Width'#3#200#0#8'Wi'
-  +'deText'#18#4#0#0#0'M'#0'a'#0'i'#0'n'#0#8'WideHint'#18#13#0#0#0'G'#0'l'#0'a'
-  +#0'v'#0'n'#0'a'#0' '#0'k'#0'o'#0'l'#0'o'#0'n'#0'a'#0#0#1#10'ImageIndex'#2#1#8
-  +'Position'#2#1#5'Width'#2'F'#8'WideText'#18#3#0#0#0'O'#0'n'#0'e'#0#0#1#10'Im'
-  +'ageIndex'#2#2#8'Position'#2#2#5'Width'#2'F'#8'WideText'#18#3#0#0#0'T'#0'w'#0
-  +'o'#0#0#1#8'Position'#2#3#5'Width'#3#150#0#8'WideText'#18#7#0#0#0'P'#0'e'#0
-  +'r'#0'c'#0'e'#0'n'#0't'#0#0#0#0#0#10'TImageList'#10'ImageList1'#6'Height'#2
-  +#24#5'Width'#2#24#4'left'#3#144#0#3'top'#2#8#6'Bitmap'#10't'#15#0#0'li'#3#0#0
-  +#0#24#0#0#0#24#0#0#0#204#6#0#0'/* XPM */'#10'static char *graphic[] = {'#10
-  +'"24 24 68 1",'#10'". c None",'#10'", c #92BDED",'#10'"- c #87A8DC",'#10'"* '
-  +'c #7681B4",'#10'"a c #E7EFF6",'#10'"b c #E2F0FE",'#10'"c c #DFEAF5",'#10'"d'
-  +' c #D8E4EF",'#10'"e c #D4DBEA",'#10'"f c #CCDAEC",'#10'"g c #CDD1E4",'#10'"'
-  +'h c #CAD2DE",'#10'"i c #94A8D6",'#10'"j c #FEFFFF",'#10'"k c #FFFEFF",'#10
-  +'"l c #FFFFFF",'#10'"m c #FEFEFE",'#10'"n c #F7FAFE",'#10'"o c #A1C8EA",'#10
-  +'"p c #8EB1E3",'#10'"q c #FFFCFF",'#10'"r c #EEF8FF",'#10'"s c #7CC4FC",'#10
-  +'"t c #829ACB",'#10'"u c #FEFEFF",'#10'"v c #FAFAFD",'#10'"w c #4CB0FC",'#10
-  +'"x c #0F9BFB",'#10'"y c #6493D3",'#10'"z c #FBFEFC",'#10'"A c #F8FDFF",'#10
-  +'"B c #E9F4FE",'#10'"C c #FEFEFC",'#10'"D c #FBFCFF",'#10'"E c #F3F9FE",'#10
-  +'"F c #C9D6FE",'#10'"G c #B5B9F3",'#10'"H c #A2A3FC",'#10'"I c #FCFBFB",'#10
-  +'"J c #D7EBFE",'#10'"K c #C2CFFE",'#10'"L c #7478A4",'#10'"M c #FBFBF8",'#10
-  +'"N c #EFA998",'#10'"O c #E2D6E2",'#10'"P c #CAE4FE",'#10'"Q c #FAFAFA",'#10
-  +'"R c #E4CDD1",'#10'"S c #FB3503",'#10'"T c #D6C4CF",'#10'"U c #FA7145",'#10
-  +'"V c #F75A29",'#10'"W c #F5F6F9",'#10'"X c #666B98",'#10'"Y c #858EBA",'#10
-  +'"Z c #F2F3FA",'#10'"0 c #F18266",'#10'"1 c #BBDDFE",'#10'"2 c #ECF3F8",'#10
-  +'"3 c #EAEAEC",'#10'"4 c #E2E3F1",'#10'"5 c #D4ACA9",'#10'"6 c #B7D0FE",'#10
-  +'"7 c #ABD7FE",'#10'"8 c #5C5D8C",'#10'"9 c #D1E3F3",'#10'"@ c #CCC0CC",'#10
-  +'"# c #9ACCFE",'#10'"...,-----------*-a......",'#10'"...,bbccddeefgh*-ia....'
-  +'.",'#10'"...,jklmlmljmnn*op-a....",'#10'"...,qllkjlljnnr*ost-a...",'#10'"..'
-  +'.pujlkmkkvnrr*pwxyt...",'#10'"...pzjkmjmAnrrB******...",'#10'"...-CkkluDErr'
-  +'BBbFGHH*...",'#10'"...-ICjlDnErBBbbJFKGL...",'#10'"...-MllAnErBbbNOJJPKL...'
-  +'",'#10'"...tQlDnErBBbRSSTPPFL...",'#10'"...tvAnErBBbcUSVJPPFL...",'#10'"...'
-  +'tWDErBBbbNSSTPPPFX...",'#10'"...YZErBBbbdSS0PPP1FX...",'#10'"...Y2r3S04J0SS'
-  +'FP111FX...",'#10'"...*2BNSSSNSS5P1111KX...",'#10'"...*aBbNSSSSVP111116X..."'
-  +','#10'"...*cbbJd0SST11111768...",'#10'"...*cbJJP9@N1111177K8...",'#10'"...L'
-  +'4JJJPPF1111177768...",'#10'"...LdJJPPPP1111777768...",'#10'"...L9JPPPP11117'
-  +'777#68...",'#10'"...LfFFFFFFF6KK666668...",'#10'"...LLLLLLLLLLLLLLLLL8...",'
+  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3#27#1#6'Height'#3#202#1#3'Top'#3':'#1#5'Wi'
+  +'dth'#3#26#2#18'HorzScrollBar.Page'#3#25#2#18'VertScrollBar.Page'#3#201#1#13
+  +'ActiveControl'#7#4'VST1'#7'Caption'#6#11'VT - Images'#12'ClientHeight'#3#202
+  +#1#11'ClientWidth'#3#26#2#11'Font.Height'#2#245#9'Font.Name'#6#13'MS Sans Se'
+  +'rif'#8'OnCreate'#7#10'FormCreate'#0#18'TVirtualStringTree'#4'VST1'#6'Height'
+  +#3#202#1#5'Width'#3#26#2#5'Align'#7#8'alClient'#14'CheckImageKind'#7#4'ckXP'
+  +#17'DefaultNodeHeight'#2#20#8'DragMode'#7#11'dmAutomatic'#14'DragOperations'
+  +#11#6'doCopy'#6'doMove'#6'doLink'#0#17'DrawSelectionMode'#7#18'smBlendedRect'
+  +'angle'#18'Header.Font.Height'#2#245#16'Header.Font.Name'#6#13'MS Sans Serif'
+  +#13'Header.Height'#2#24#13'Header.Images'#7#10'ImageList1'#14'Header.Options'
+  +#11#14'hoColumnResize'#6'hoDrag'#12'hoShowImages'#16'hoShowSortGlyphs'#9'hoV'
+  +'isible'#0#17'Header.SortColumn'#2#0#12'Header.Style'#7#9'hsXPStyle'#11'Stat'
+  +'eImages'#7#10'ImageList2'#8'TabOrder'#2#0#23'TreeOptions.AutoOptions'#11#16
+  +'toAutoDropExpand'#20'toAutoScrollOnExpand'#22'toAutoTristateTracking'#0#23
+  +'TreeOptions.MiscOptions'#11#14'toCheckSupport'#10'toEditable'#21'toFullRepa'
+  +'intOnResize'#12'toInitOnSave'#18'toToggleOnDblClick'#14'toWheelPanning'#0#17
+  +'OnBeforeCellPaint'#7#19'VST1BeforeCellPaint'#10'OnChecking'#7#12'VST1Checki'
+  +'ng'#14'OnCompareNodes'#7#16'VST1CompareNodes'#9'OnGetText'#7#11'VST1GetText'
+  +#15'OnGetImageIndex'#7#17'VST1GetImageIndex'#13'OnHeaderClick'#7#15'VST1Head'
+  +'erClick'#10'OnInitNode'#7#12'VST1InitNode'#7'Columns'#14#1#10'ImageIndex'#2
+  +#0#5'Width'#3#200#0#8'WideText'#18#4#0#0#0'M'#0'a'#0'i'#0'n'#0#8'WideHint'#18
+  +#13#0#0#0'G'#0'l'#0'a'#0'v'#0'n'#0'a'#0' '#0'k'#0'o'#0'l'#0'o'#0'n'#0'a'#0#0
+  +#1#10'ImageIndex'#2#1#8'Position'#2#1#5'Width'#2'F'#8'WideText'#18#3#0#0#0'O'
+  +#0'n'#0'e'#0#0#1#10'ImageIndex'#2#2#8'Position'#2#2#5'Width'#2'F'#8'WideText'
+  +#18#3#0#0#0'T'#0'w'#0'o'#0#0#1#8'Position'#2#3#5'Width'#3#150#0#8'WideText'
+  +#18#7#0#0#0'P'#0'e'#0'r'#0'c'#0'e'#0'n'#0't'#0#0#0#0#0#10'TImageList'#10'Ima'
+  +'geList1'#6'Height'#2#24#5'Width'#2#24#4'left'#3#144#0#3'top'#2#8#6'Bitmap'
+  +#10't'#15#0#0'li'#3#0#0#0#24#0#0#0#24#0#0#0#204#6#0#0'/* XPM */'#10'static c'
+  +'har *graphic[] = {'#10'"24 24 68 1",'#10'". c None",'#10'", c #92BDED",'#10
+  +'"- c #87A8DC",'#10'"* c #7681B4",'#10'"a c #E7EFF6",'#10'"b c #E2F0FE",'#10
+  +'"c c #DFEAF5",'#10'"d c #D8E4EF",'#10'"e c #D4DBEA",'#10'"f c #CCDAEC",'#10
+  +'"g c #CDD1E4",'#10'"h c #CAD2DE",'#10'"i c #94A8D6",'#10'"j c #FEFFFF",'#10
+  +'"k c #FFFEFF",'#10'"l c #FFFFFF",'#10'"m c #FEFEFE",'#10'"n c #F7FAFE",'#10
+  +'"o c #A1C8EA",'#10'"p c #8EB1E3",'#10'"q c #FFFCFF",'#10'"r c #EEF8FF",'#10
+  +'"s c #7CC4FC",'#10'"t c #829ACB",'#10'"u c #FEFEFF",'#10'"v c #FAFAFD",'#10
+  +'"w c #4CB0FC",'#10'"x c #0F9BFB",'#10'"y c #6493D3",'#10'"z c #FBFEFC",'#10
+  +'"A c #F8FDFF",'#10'"B c #E9F4FE",'#10'"C c #FEFEFC",'#10'"D c #FBFCFF",'#10
+  +'"E c #F3F9FE",'#10'"F c #C9D6FE",'#10'"G c #B5B9F3",'#10'"H c #A2A3FC",'#10
+  +'"I c #FCFBFB",'#10'"J c #D7EBFE",'#10'"K c #C2CFFE",'#10'"L c #7478A4",'#10
+  +'"M c #FBFBF8",'#10'"N c #EFA998",'#10'"O c #E2D6E2",'#10'"P c #CAE4FE",'#10
+  +'"Q c #FAFAFA",'#10'"R c #E4CDD1",'#10'"S c #FB3503",'#10'"T c #D6C4CF",'#10
+  +'"U c #FA7145",'#10'"V c #F75A29",'#10'"W c #F5F6F9",'#10'"X c #666B98",'#10
+  +'"Y c #858EBA",'#10'"Z c #F2F3FA",'#10'"0 c #F18266",'#10'"1 c #BBDDFE",'#10
+  +'"2 c #ECF3F8",'#10'"3 c #EAEAEC",'#10'"4 c #E2E3F1",'#10'"5 c #D4ACA9",'#10
+  +'"6 c #B7D0FE",'#10'"7 c #ABD7FE",'#10'"8 c #5C5D8C",'#10'"9 c #D1E3F3",'#10
+  +'"@ c #CCC0CC",'#10'"# c #9ACCFE",'#10'"...,-----------*-a......",'#10'"...,'
+  +'bbccddeefgh*-ia.....",'#10'"...,jklmlmljmnn*op-a....",'#10'"...,qllkjlljnnr'
+  +'*ost-a...",'#10'"...pujlkmkkvnrr*pwxyt...",'#10'"...pzjkmjmAnrrB******...",'
+  +#10'"...-CkkluDErrBBbFGHH*...",'#10'"...-ICjlDnErBBbbJFKGL...",'#10'"...-Mll'
+  +'AnErBbbNOJJPKL...",'#10'"...tQlDnErBBbRSSTPPFL...",'#10'"...tvAnErBBbcUSVJP'
+  +'PFL...",'#10'"...tWDErBBbbNSSTPPPFX...",'#10'"...YZErBBbbdSS0PPP1FX...",'#10
+  +'"...Y2r3S04J0SSFP111FX...",'#10'"...*2BNSSSNSS5P1111KX...",'#10'"...*aBbNSS'
+  +'SSVP111116X...",'#10'"...*cbbJd0SST11111768...",'#10'"...*cbJJP9@N1111177K8'
+  +'...",'#10'"...L4JJJPPF1111177768...",'#10'"...LdJJPPPP1111777768...",'#10'"'
+  +'...L9JPPPP11117777#68...",'#10'"...LfFFFFFFF6KK666668...",'#10'"...LLLLLLLL'
+  +'LLLLLLLLL8...",'#10'"........................"}'#10'G'#4#0#0'/* XPM */'#10
+  +'static char *graphic[] = {'#10'"24 24 25 1",'#10'". c None",'#10'", c #A0B4'
+  +'DA",'#10'"- c #5879BD",'#10'"* c #024BAF",'#10'"a c #2956AB",'#10'"b c #083'
+  +'FA2",'#10'"c c #B3BDE2",'#10'"d c #F0F0F8",'#10'"e c #CCDAEC",'#10'"f c #EC'
+  +'F3F8",'#10'"g c #266EC5",'#10'"h c #4CB0FC",'#10'"i c #0F9BFB",'#10'"j c #0'
+  +'37EE2",'#10'"k c #0158BD",'#10'"l c #4166B3",'#10'"m c #6493D3",'#10'"n c #'
+  +'94A8D6",'#10'"o c #BECDE5",'#10'"p c #0167CC",'#10'"q c #E2E3F1",'#10'"r c '
+  +'#DFEAF5",'#10'"s c #F2F3FA",'#10'"t c #829ACB",'#10'"u c #D4DBEA",'#10'"...'
+  +'.....................",'#10'"........................",'#10'"..............'
+  ,'..........",'#10'".....,-*ab-c.......d,e..",'#10'"...f-ghhhijkae.....a**c."'
+  +','#10'"...lmhhhiiiijbn...o*ppl.",'#10'"..,ghhjk*kpjjj*-..o*ppl.",'#10'"..ai'
+  +'hjaq.r-*jjpk-.o*ppl.",'#10'".f*hi*q....obkppk-o*ppl.",'#10'".opiil......sak'
+  +'ppka*ppl.",'#10'".opij-.......sakppk*ppl.",'#10'".ekija........dakpppppl.",'
+  +#10'"..*jj*r....ntttmbkppppl.",'#10'"..-pjk-...n*kkkkkpppppl.",'#10'"..o*ppb'
+  +'o..tkppppppppppl.",'#10'"...lkpkad.eb**********l.",'#10'"...obpp*-.........'
+  +'......",'#10'"....m*pp*-..............",'#10'"....dakpp*,.............",'#10
+  +'".....ubkpp*n............",'#10'"......u*ppb,............",'#10'".......ubb'
+  +'m.............",'#10'"........um..............",'#10'".....................'
+  +'..."}'#10'G'#4#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 25 1'
+  +'",'#10'". c None",'#10'", c #ECF3F8",'#10'"- c #A0B4DA",'#10'"* c #6493D3",'
+  +#10'"a c #4166B3",'#10'"b c #5879BD",'#10'"c c #BECDE5",'#10'"d c #2956AB",'
+  +#10'"e c #024BAF",'#10'"f c #829ACB",'#10'"g c #F2F3FA",'#10'"h c #0167CC",'
+  +#10'"i c #037EE2",'#10'"j c #0158BD",'#10'"k c #083FA2",'#10'"l c #4CB0FC",'
+  +#10'"m c #7CC4FC",'#10'"n c #CCDAEC",'#10'"o c #DFEAF5",'#10'"p c #0F9BFB",'
+  +#10'"q c #94A8D6",'#10'"r c #E2E3F1",'#10'"s c #D4DBEA",'#10'"t c #7681B4",'
+  +#10'"u c #B3BDE2",'#10'"........................",'#10'"....................'
+  +'....",'#10'"........................",'#10'".............,-*ab-,....",'#10
+  +'"..cdef.....gfehhihjk-...",'#10'"..alme....ndhiiiiihhk-..",'#10'"..alle...-'
+  +'eiiiijjjhhhko.",'#10'"..alpe..-eiiijdqcfkhhjb.",'#10'"..appe.-jiiikf....-eh'
+  +'hk.",'#10'"..appe-eiihkc......dhher",'#10'"..apieeiihks.......ahhec",'#10'"'
+  +'..aiiiiihks........dhhen",'#10'"..aiiihhkqcccr....oehhk.",'#10'"..aiihhjeee'
+  +'eekn...tjhjb.",'#10'"..ahhhhhhhhhhjf..okhhe-.",'#10'"..ajjjjjjjjjjku..ajhhd'
+  +'..",'#10'"................fehhku..",'#10'"...............-khhja...",'#10'".'
+  +'.............-khhhkg...",'#10'".............-khhhkc....",'#10'"............'
+  +'.bjhhk-.....",'#10'"..............djk-......",'#10'"..............gk-......'
+  +'.",'#10'"........................"}'#10#0#0#10'TImageList'#10'ImageList2'#6
+  +'Height'#2#24#5'Width'#2#24#4'left'#3#144#0#3'top'#3#160#0#6'Bitmap'#10'h'
+  +#182#0#0'li'#27#0#0#0#24#0#0#0#24#0#0#0#177#3#0#0'/* XPM */'#10'static char '
+  +'*graphic[] = {'#10'"24 24 15 1",'#10'". c None",'#10'", c #FAD7CE",'#10'"- '
+  +'c #FA7145",'#10'"* c #F18266",'#10'"a c #FB3503",'#10'"b c #FDF6F0",'#10'"c'
+  +' c #F75A29",'#10'"d c #EFA998",'#10'"e c #DE3207",'#10'"f c #DCC6BE",'#10'"'
+  +'g c #F3F3F3",'#10'"h c #E4CDD1",'#10'"i c #E1DDC7",'#10'"j c #ECE3D0",'#10
+  +'"k c #EAEAEC",'#10'"........................",'#10'".......................'
+  +'.",'#10'".,--,...................",'#10'".*aaa,..................",'#10'".*'
+  +'aaaa,.................",'#10'".bcaaaa,..........da,...",'#10'"..bcaaaa,....'
+  +'...b-a-....",'#10'"....*aaaa,.....,ca*.....",'#10'".....*aeaa,...daa*......'
+  +'",'#10'"......daaea,b*aa*.......",'#10'".......deaeacae*........",'#10'"...'
+  +'.....feaeea*.........",'#10'".........*eeae,.........",'#10'".......b-eaeee'
+  +'e,........",'#10'"......,ceeedceee,.......",'#10'".....deeeed.gceee,......"'
+  +','#10'"....*eeeed....*eee,.....",'#10'"..gceeeed......*eee,....",'#10'".bee'
+  +'eeef........deee,...",'#10'".heeee,..........deee,..",'#10'".beeei.........'
+  +'...heee,.",'#10'"..jhk..............,eee.",'#10'"....................,cd.",'
   +#10'"........................"}'#10'G'#4#0#0'/* XPM */'#10'static char *grap'
   +'hic[] = {'#10'"24 24 25 1",'#10'". c None",'#10'", c #A0B4DA",'#10'"- c #58'
   +'79BD",'#10'"* c #024BAF",'#10'"a c #2956AB",'#10'"b c #083FA2",'#10'"c c #B'
@@ -65,7 +117,7 @@ LazarusResources.Add('TForm1','FORMDATA',[
   +' #BECDE5",'#10'"p c #0167CC",'#10'"q c #E2E3F1",'#10'"r c #DFEAF5",'#10'"s '
   +'c #F2F3FA",'#10'"t c #829ACB",'#10'"u c #D4DBEA",'#10'"....................'
   +'....",'#10'"........................",'#10'"........................",'#10
-  ,'".....,-*ab-c.......d,e..",'#10'"...f-ghhhijkae.....a**c.",'#10'"...lmhhhii'
+  +'".....,-*ab-c.......d,e..",'#10'"...f-ghhhijkae.....a**c.",'#10'"...lmhhhii'
   +'iijbn...o*ppl.",'#10'"..,ghhjk*kpjjj*-..o*ppl.",'#10'"..aihjaq.r-*jjpk-.o*p'
   +'pl.",'#10'".f*hi*q....obkppk-o*ppl.",'#10'".opiil......sakppka*ppl.",'#10'"'
   +'.opij-.......sakppk*ppl.",'#10'".ekija........dakpppppl.",'#10'"..*jj*r....'
@@ -77,7 +129,7 @@ LazarusResources.Add('TForm1','FORMDATA',[
   +#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 25 1",'#10'". c Non'
   +'e",'#10'", c #ECF3F8",'#10'"- c #A0B4DA",'#10'"* c #6493D3",'#10'"a c #4166'
   +'B3",'#10'"b c #5879BD",'#10'"c c #BECDE5",'#10'"d c #2956AB",'#10'"e c #024'
-  +'BAF",'#10'"f c #829ACB",'#10'"g c #F2F3FA",'#10'"h c #0167CC",'#10'"i c #03'
+  ,'BAF",'#10'"f c #829ACB",'#10'"g c #F2F3FA",'#10'"h c #0167CC",'#10'"i c #03'
   +'7EE2",'#10'"j c #0158BD",'#10'"k c #083FA2",'#10'"l c #4CB0FC",'#10'"m c #7'
   +'CC4FC",'#10'"n c #CCDAEC",'#10'"o c #DFEAF5",'#10'"p c #0F9BFB",'#10'"q c #'
   +'94A8D6",'#10'"r c #E2E3F1",'#10'"s c #D4DBEA",'#10'"t c #7681B4",'#10'"u c '
@@ -91,228 +143,176 @@ LazarusResources.Add('TForm1','FORMDATA',[
   +'................fehhku..",'#10'"...............-khhja...",'#10'"...........'
   +'...-khhhkg...",'#10'".............-khhhkc....",'#10'".............bjhhk-...'
   +'..",'#10'"..............djk-......",'#10'"..............gk-.......",'#10'".'
-  +'......................."}'#10#0#0#10'TImageList'#10'ImageList2'#6'Height'#2
-  +#24#5'Width'#2#24#4'left'#3#144#0#3'top'#3#160#0#6'Bitmap'#10'h'#182#0#0'li'
-  +#27#0#0#0#24#0#0#0#24#0#0#0#177#3#0#0'/* XPM */'#10'static char *graphic[] ='
-  +' {'#10'"24 24 15 1",'#10'". c None",'#10'", c #FAD7CE",'#10'"- c #FA7145",'
-  +#10'"* c #F18266",'#10'"a c #FB3503",'#10'"b c #FDF6F0",'#10'"c c #F75A29",'
-  +#10'"d c #EFA998",'#10'"e c #DE3207",'#10'"f c #DCC6BE",'#10'"g c #F3F3F3",'
-  +#10'"h c #E4CDD1",'#10'"i c #E1DDC7",'#10'"j c #ECE3D0",'#10'"k c #EAEAEC",'
-  +#10'"........................",'#10'"........................",'#10'".,--,..'
-  +'.................",'#10'".*aaa,..................",'#10'".*aaaa,...........'
-  +'......",'#10'".bcaaaa,..........da,...",'#10'"..bcaaaa,.......b-a-....",'#10
-  +'"....*aaaa,.....,ca*.....",'#10'".....*aeaa,...daa*......",'#10'"......daae'
-  +'a,b*aa*.......",'#10'".......deaeacae*........",'#10'"........feaeea*......'
-  +'...",'#10'".........*eeae,.........",'#10'".......b-eaeeee,........",'#10'"'
-  +'......,ceeedceee,.......",'#10'".....deeeed.gceee,......",'#10'"....*eeeed.'
-  +'...*eee,.....",'#10'"..gceeeed......*eee,....",'#10'".beeeeef........deee,.'
-  +'..",'#10'".heeee,..........deee,..",'#10'".beeei............heee,.",'#10'".'
-  +'.jhk..............,eee.",'#10'"....................,cd.",'#10'"............'
-  +'............"}'#10'G'#4#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"2'
-  +'4 24 25 1",'#10'". c None",'#10'", c #A0B4DA",'#10'"- c #5879BD",'#10'"* c '
-  +'#024BAF",'#10'"a c #2956AB",'#10'"b c #083FA2",'#10'"c c #B3BDE2",'#10'"d c'
-  +' #F0F0F8",'#10'"e c #CCDAEC",'#10'"f c #ECF3F8",'#10'"g c #266EC5",'#10'"h '
-  +'c #4CB0FC",'#10'"i c #0F9BFB",'#10'"j c #037EE2",'#10'"k c #0158BD",'#10'"l'
-  +' c #4166B3",'#10'"m c #6493D3",'#10'"n c #94A8D6",'#10'"o c #BECDE5",'#10'"'
-  +'p c #0167CC",'#10'"q c #E2E3F1",'#10'"r c #DFEAF5",'#10'"s c #F2F3FA",'#10
-  +'"t c #829ACB",'#10'"u c #D4DBEA",'#10'"........................",'#10'"....'
-  +'....................",'#10'"........................",'#10'".....,-*ab-c...'
-  +'....d,e..",'#10'"...f-ghhhijkae.....a**c.",'#10'"...lmhhhiiiijbn...o*ppl.",'
-  +#10'"..,ghhjk*kpjjj*-..o*ppl.",'#10'"..aihjaq.r-*jjpk-.o*ppl.",'#10'".f*hi*q'
-  +'....obkppk-o*ppl.",'#10'".opiil......sakppka*ppl.",'#10'".opij-.......sakpp'
-  +'k*ppl.",'#10'".ekija........dakpppppl.",'#10'"..*jj*r....ntttmbkppppl.",'#10
-  +'"..-pjk-...n*kkkkkpppppl.",'#10'"..o*ppbo..tkppppppppppl.",'#10'"...lkpkad.'
-  +'eb**********l.",'#10'"...obpp*-...............",'#10'"....m*pp*-...........'
-  +'...",'#10'"....dakpp*,.............",'#10'".....ubkpp*n............",'#10'"'
-  +'......u*ppb,............",'#10'".......ubbm.............",'#10'"........um.'
-  +'.............",'#10'"........................"}'#10'G'#4#0#0'/* XPM */'#10
-  +'static char *graphic[] = {'#10'"24 24 25 1",'#10'". c None",'#10'", c #ECF3'
-  +'F8",'#10'"- c #A0B4DA",'#10'"* c #6493D3",'#10'"a c #4166B3",'#10'"b c #587'
-  +'9BD",'#10'"c c #BECDE5",'#10'"d c #2956AB",'#10'"e c #024BAF",'#10'"f c #82'
-  ,'9ACB",'#10'"g c #F2F3FA",'#10'"h c #0167CC",'#10'"i c #037EE2",'#10'"j c #0'
-  +'158BD",'#10'"k c #083FA2",'#10'"l c #4CB0FC",'#10'"m c #7CC4FC",'#10'"n c #'
-  +'CCDAEC",'#10'"o c #DFEAF5",'#10'"p c #0F9BFB",'#10'"q c #94A8D6",'#10'"r c '
-  +'#E2E3F1",'#10'"s c #D4DBEA",'#10'"t c #7681B4",'#10'"u c #B3BDE2",'#10'"...'
-  +'.....................",'#10'"........................",'#10'"..............'
-  +'..........",'#10'".............,-*ab-,....",'#10'"..cdef.....gfehhihjk-..."'
-  +','#10'"..alme....ndhiiiiihhk-..",'#10'"..alle...-eiiiijjjhhhko.",'#10'"..al'
-  +'pe..-eiiijdqcfkhhjb.",'#10'"..appe.-jiiikf....-ehhk.",'#10'"..appe-eiihkc..'
-  +'....dhher",'#10'"..apieeiihks.......ahhec",'#10'"..aiiiiihks........dhhen",'
-  +#10'"..aiiihhkqcccr....oehhk.",'#10'"..aiihhjeeeeekn...tjhjb.",'#10'"..ahhhh'
-  +'hhhhhhjf..okhhe-.",'#10'"..ajjjjjjjjjjku..ajhhd..",'#10'"................fe'
-  +'hhku..",'#10'"...............-khhja...",'#10'"..............-khhhkg...",'#10
-  +'".............-khhhkc....",'#10'".............bjhhk-.....",'#10'"..........'
-  +'....djk-......",'#10'"..............gk-.......",'#10'".....................'
-  +'..."}'#10#204#6#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 68 '
-  +'1",'#10'". c None",'#10'", c #92BDED",'#10'"- c #87A8DC",'#10'"* c #7681B4"'
-  +','#10'"a c #E7EFF6",'#10'"b c #E2F0FE",'#10'"c c #DFEAF5",'#10'"d c #D8E4EF'
-  +'",'#10'"e c #D4DBEA",'#10'"f c #CCDAEC",'#10'"g c #CDD1E4",'#10'"h c #CAD2D'
-  +'E",'#10'"i c #94A8D6",'#10'"j c #FEFFFF",'#10'"k c #FFFEFF",'#10'"l c #FFFF'
-  +'FF",'#10'"m c #FEFEFE",'#10'"n c #F7FAFE",'#10'"o c #A1C8EA",'#10'"p c #8EB'
-  +'1E3",'#10'"q c #FFFCFF",'#10'"r c #EEF8FF",'#10'"s c #7CC4FC",'#10'"t c #82'
-  +'9ACB",'#10'"u c #FEFEFF",'#10'"v c #FAFAFD",'#10'"w c #4CB0FC",'#10'"x c #0'
-  +'F9BFB",'#10'"y c #6493D3",'#10'"z c #FBFEFC",'#10'"A c #F8FDFF",'#10'"B c #'
-  +'E9F4FE",'#10'"C c #FEFEFC",'#10'"D c #FBFCFF",'#10'"E c #F3F9FE",'#10'"F c '
-  +'#C9D6FE",'#10'"G c #B5B9F3",'#10'"H c #A2A3FC",'#10'"I c #FCFBFB",'#10'"J c'
-  +' #D7EBFE",'#10'"K c #C2CFFE",'#10'"L c #7478A4",'#10'"M c #FBFBF8",'#10'"N '
-  +'c #EFA998",'#10'"O c #E2D6E2",'#10'"P c #CAE4FE",'#10'"Q c #FAFAFA",'#10'"R'
-  +' c #E4CDD1",'#10'"S c #FB3503",'#10'"T c #D6C4CF",'#10'"U c #FA7145",'#10'"'
-  +'V c #F75A29",'#10'"W c #F5F6F9",'#10'"X c #666B98",'#10'"Y c #858EBA",'#10
-  +'"Z c #F2F3FA",'#10'"0 c #F18266",'#10'"1 c #BBDDFE",'#10'"2 c #ECF3F8",'#10
-  +'"3 c #EAEAEC",'#10'"4 c #E2E3F1",'#10'"5 c #D4ACA9",'#10'"6 c #B7D0FE",'#10
-  +'"7 c #ABD7FE",'#10'"8 c #5C5D8C",'#10'"9 c #D1E3F3",'#10'"@ c #CCC0CC",'#10
-  +'"# c #9ACCFE",'#10'"...,-----------*-a......",'#10'"...,bbccddeefgh*-ia....'
-  +'.",'#10'"...,jklmlmljmnn*op-a....",'#10'"...,qllkjlljnnr*ost-a...",'#10'"..'
-  +'.pujlkmkkvnrr*pwxyt...",'#10'"...pzjkmjmAnrrB******...",'#10'"...-CkkluDErr'
-  +'BBbFGHH*...",'#10'"...-ICjlDnErBBbbJFKGL...",'#10'"...-MllAnErBbbNOJJPKL...'
-  +'",'#10'"...tQlDnErBBbRSSTPPFL...",'#10'"...tvAnErBBbcUSVJPPFL...",'#10'"...'
-  +'tWDErBBbbNSSTPPPFX...",'#10'"...YZErBBbbdSS0PPP1FX...",'#10'"...Y2r3S04J0SS'
-  +'FP111FX...",'#10'"...*2BNSSSNSS5P1111KX...",'#10'"...*aBbNSSSSVP111116X..."'
-  +','#10'"...*cbbJd0SST11111768...",'#10'"...*cbJJP9@N1111177K8...",'#10'"...L'
-  +'4JJJPPF1111177768...",'#10'"...LdJJPPPP1111777768...",'#10'"...L9JPPPP11117'
-  +'777#68...",'#10'"...LfFFFFFFF6KK666668...",'#10'"...LLLLLLLLLLLLLLLLL8...",'
-  +#10'"........................"}'#10'd'#5#0#0'/* XPM */'#10'static char *grap'
-  +'hic[] = {'#10'"24 24 44 1",'#10'". c None",'#10'", c #EAEAEC",'#10'"- c #C6'
-  +'C9DB",'#10'"* c #D3D7DE",'#10'"a c #4D5B6F",'#10'"b c #5B6A82",'#10'"c c #B'
-  +'7BCCA",'#10'"d c #F2F3FA",'#10'"e c #707D92",'#10'"f c #97A0B1",'#10'"g c #'
-  +'CAD2DE",'#10'"h c #E0E0E1",'#10'"i c #828CA1",'#10'"j c #ABB8C6",'#10'"k c '
-  +'#A6AAB9",'#10'"l c #C2C2C3",'#10'"m c #F3F3F3",'#10'"n c #C7C7C7",'#10'"o c'
-  +' #CACACC",'#10'"p c #8E96A4",'#10'"q c #C0C0C0",'#10'"r c #B9B9B9",'#10'"s '
-  +'c #ABABC8",'#10'"t c #E2E3F1",'#10'"u c #C4C4C4",'#10'"v c #E7EFF6",'#10'"w'
-  +' c #7681B4",'#10'"x c #2956AB",'#10'"y c #4166B3",'#10'"z c #5879BD",'#10'"'
-  +'A c #829ACB",'#10'"B c #083FA2",'#10'"C c #858EBA",'#10'"D c #024BAF",'#10
-  +'"E c #0167CC",'#10'"F c #A0B4DA",'#10'"G c #BECDE5",'#10'"H c #0158BD",'#10
-  +'"I c #ECF3F8",'#10'"J c #B3BDE2",'#10'"K c #6493D3",'#10'"L c #D4DBEA",'#10
-  +'"M c #DFEAF5",'#10'"N c #94A8D6",'#10'"........................",'#10'"....'
-  +'.,-..........**.....",'#10'".....*a,.........bc.....",'#10'".....dbe.......'
-  +'.fa*.....",'#10'"......ebg......hbb......",'#10'"......ffb......efi......",'
-  +#10'"......hijf....jfkl......",'#10'".......eme*..,ehb.......",'#10'".......'
-  +'kkne..ifkf.......",'#10'".......,bopj*eqe*.......",'#10'"........pkrbekse..'
-  +'......",'#10'"........,bcfbkb*........",'#10'".........lbtubp.........",'#10
-  +'".........vbefb*.........",'#10'".........wxbbyz.........",'#10'"......ABBB'
-  +'BzwBBBBCd.....",'#10'".....zDEEEDFGDEHEHz.....",'#10'"....GDDzzHDt.BHzzHDF.'
-  +'...",'#10'"....zHz.IDD..DD..zEz....",'#10'"....yDJ.tDD..xD..JDx....",'#10'"'
-  +'....yHAIzDz..wDz.zHx....",'#10'"....KDDBDBL..MBDBDHz....",'#10'"....mBBDBF.'
-  ,'...LBDDBL....",'#10'".....dNNt......dFNd....."}'#10'6'#6#0#0'/* XPM */'#10
-  +'static char *graphic[] = {'#10'"24 24 58 1",'#10'". c None",'#10'", c #92BD'
-  +'ED",'#10'"- c #87A8DC",'#10'"* c #7681B4",'#10'"a c #BECDE5",'#10'"b c #FEF'
-  +'EFC",'#10'"c c #FFFCFF",'#10'"d c #FEFEFE",'#10'"e c #FBFEFC",'#10'"f c #FA'
-  +'FAFA",'#10'"g c #F8F8F8",'#10'"h c #F5F6F9",'#10'"i c #ECF3F8",'#10'"j c #8'
-  +'EB1E3",'#10'"k c #B5C5D8",'#10'"l c #FEFEFF",'#10'"m c #FFFFFF",'#10'"n c #'
-  +'F8FDFF",'#10'"o c #F7FAFE",'#10'"p c #EEF8FF",'#10'"q c #7CC4FC",'#10'"r c '
-  +'#B3BDE2",'#10'"s c #FEFFFF",'#10'"t c #FBFCFF",'#10'"u c #FCFBFB",'#10'"v c'
-  +' #E9F4FE",'#10'"w c #E2F0FE",'#10'"x c #D7EBFE",'#10'"y c #94A8D6",'#10'"z '
-  +'c #FFFEFF",'#10'"A c #F3F9FE",'#10'"B c #9ACCFE",'#10'"C c #FBFBF8",'#10'"D'
-  +' c #F3F3F3",'#10'"E c #EFEFEF",'#10'"F c #829ACB",'#10'"G c #BBDDFE",'#10'"'
-  +'H c #DFEAF5",'#10'"I c #FCFFFE",'#10'"J c #858EBA",'#10'"K c #CAE4FE",'#10
-  +'"L c #B5B9F3",'#10'"M c #A2A3FC",'#10'"N c #FAFAFD",'#10'"O c #E7EFF6",'#10
-  +'"P c #7478A4",'#10'"Q c #D8E4EF",'#10'"R c #ABD7FE",'#10'"S c #D4DBEA",'#10
-  +'"T c #666B98",'#10'"U c #CCDAEC",'#10'"V c #A3D1F3",'#10'"W c #C9D6FE",'#10
-  +'"X c #CDD1E4",'#10'"Y c #CAD2DE",'#10'"Z c #5C5D8C",'#10'"0 c #C6C9DB",'#10
-  +'"1 c #C2CFFE",'#10'"..,---------*a..........",'#10'"..,bcdefgghi*jk........'
-  +'.",'#10'"..,lmmmmlnop*q-r........",'#10'"..jlsmmmtopp****........",'#10'"..'
-  +'jumsdnopvwxyy*........",'#10'"..-uzmnA,----------*a...",'#10'"..-uBBBB,weeC'
-  +'hhDDEE*jk..",'#10'"..FfGGGG,wzmsbmdnAo*qFr.",'#10'"..FhAAvvjHmbmzItApp****.'
-  +'",'#10'"..JiBBBBjHzzszoApvvKLM*.",'#10'"..JiGGGG-HmsmNopvvwwOGP.",'#10'"..*'
-  +'OOOOO-QhBBBBBBBBBOGP.",'#10'"..*OBBBB-QhGGGGGGGGGOGP.",'#10'"..*OGGGRFQOOOO'
-  +'OOOOOOOGP.",'#10'"..POOOOiFSOBBBBBBBBBOGT.",'#10'"..POOOOOFUORRRRRRRVVOGT."'
-  +','#10'"..PWWWWWJXOOOOOOOOwOOGT.",'#10'"..PPPPPPJYOBBBBBBBBBOGZ.",'#10'"....'
-  +'....JaOKKKGGGGRROGZ.",'#10'"........*aOOOOOOOOOOOGZ.",'#10'"........*kOOOOO'
-  +'OOOOOOGZ.",'#10'"........*0111111111111Z.",'#10'"........PPPPPPPPPPPPPPZ.",'
-  +#10'"........................"}'#10'0'#10#0#0'/* XPM */'#10'static char *gra'
-  +'phic[] = {'#10'"24 24 82 2",'#10'".. c None",'#10'"., c #828CA1",'#10'".- c'
-  +' #C6C9DB",'#10'".* c #F1D190",'#10'".a c #DAB341",'#10'".b c #B7BCCA",'#10
-  +'".c c #A6AAB9",'#10'".d c #C3A666",'#10'".e c #E0BD4B",'#10'".f c #F5E6BE",'
-  +#10'".g c #E6CB7E",'#10'".h c #D8AC2E",'#10'".i c #FEFD99",'#10'".j c #D8C39'
-  +'B",'#10'".k c #8E96A4",'#10'".l c #ABB8C6",'#10'".m c #FFFFFF",'#10'".n c #'
-  +'FEFEFC",'#10'".o c #FFFEFF",'#10'".p c #FEFFFF",'#10'".q c #D3D7DE",'#10'".'
-  +'r c #859187",'#10'".s c #CD9A05",'#10'".t c #F9EFDF",'#10'".u c #FEFEF0",'
-  +#10'".v c #FEFDE4",'#10'".w c #97A0B1",'#10'".x c #88898C",'#10'".y c #FFFDD'
-  +'4",'#10'".z c #FFFDC2",'#10'".A c #EEDE9E",'#10'".B c #FFE39A",'#10'".C c #'
-  +'FEFBAD",'#10'".D c #92BDED",'#10'".E c #87A8DC",'#10'".F c #7681B4",'#10'".'
-  +'G c #BECDE5",'#10'".H c #E9F4FE",'#10'".I c #FEFEFE",'#10'".J c #FCFBFB",'
-  +#10'".K c #FAFAFA",'#10'".L c #F5F6F9",'#10'".M c #ECF3F8",'#10'".N c #8EB1E'
-  +'3",'#10'".O c #B5C5D8",'#10'".P c #E2F0FE",'#10'".Q c #F7FAFE",'#10'".R c #'
-  +'EEF8FF",'#10'".S c #7CC4FC",'#10'".T c #B3BDE2",'#10'".U c #FBFCFF",'#10'".'
-  +'V c #FEF38D",'#10'".W c #DFEAF5",'#10'".X c #FFFCFF",'#10'".Y c #F3F9FE",'
-  +#10'".Z c #D1E3F3",'#10'".0 c #B5B9F3",'#10'".1 c #A2A3FC",'#10'".2 c #FEFEF'
-  +'F",'#10'".3 c #D7EBFE",'#10'".4 c #CAE4FE",'#10'".5 c #B7D0FE",'#10'".6 c #'
-  +'7478A4",'#10'".7 c #FEE984",'#10'".8 c #D8E4EF",'#10'".9 c #9ACCFE",'#10'".'
-  +'@ c #E7EFF6",'#10'".# c #BBDDFE",'#10'".; c #829ACB",'#10'".: c #D4DBEA",'
-  +#10'".= c #666B98",'#10'".+ c #FEDD7B",'#10'".% c #858EBA",'#10'".$ c #CCDAE'
-  +'C",'#10'".( c #FDD270",'#10'".) c #CAD2DE",'#10'".[ c #5C5D8C",'#10'".] c #'
-  +'D5A61D",'#10'",. c #F0D460",'#10'",, c #F9EB71",'#10'",- c #ABD7FE",'#10'",'
-  +'* c #C2CFFE",'#10'"...............,.,.,.,.,.,.,.-..................",'#10'"'
-  +'.......*.a.a.a.,.b.b.b.b.b.c.d.a.a.e.f..........",'#10'".....g.h.i.j.k.l.m.'
-  +'m.n.o.p.q.k.r.a.g.s.t........",'#10'".....a.u.v.w.q.q.q.q.q.q.q.q.q.x.e.v.*'
-  +'.s........",'#10'".....a.u.y.j.,.,.,.,.,.,.,.,.,.,.*.y.*.s........",'#10'".'
-  +'....a.v.y.z.A.A.A.B.A.B.A.B.A.A.y.y.*.s........",'#10'".....a.v.z.z.z.z.z.z'
-  +'.z.z.z.z.z.z.z.z.*.s........",'#10'".....a.y.C.C.C.C.D.E.E.E.E.E.E.E.E.E.F.'
-  +'G........",'#10'".....a.y.i.C.i.C.D.H.p.I.J.J.K.K.L.M.F.N.O......",'#10'"..'
-  +'...a.y.i.i.i.i.D.P.p.o.m.p.m.n.Q.R.F.S.E.T....",'#10'".....a.z.i.i.i.i.N.P.'
-  +'o.o.p.m.U.Q.R.R.F.F.F.F....",'#10'".....a.z.V.i.V.i.N.W.m.I.m.X.Y.Y.R.P.Z.0'
-  +'.1.F....",'#10'".....a.C.V.V.V.V.E.W.2.m.U.Q.R.H.H.P.3.4.5.6....",'#10'"...'
-  +'..a.C.V.7.V.7.E.8.L.9.9.9.9.9.9.9.9.@.#.6....",'#10'".....a.C.7.7.7.7.;.8.L'
-  +'.#.#.#.#.#.#.#.#.@.#.6....",'#10'".....a.i.7.7.7.7.;.:.@.@.@.@.@.@.@.@.@.@.'
-  +'#.=....",'#10'".....a.i.+.+.+.+.;.:.@.9.9.9.9.9.9.9.9.@.#.=....",'#10'"....'
-  +'.a.V.+.+.+.+.%.$.@.3.4.4.4.#.#.#.#.@.#.=....",'#10'".....a.V.(.(.(.(.%.).@.'
-  +'@.@.@.@.@.@.@.@.@.#.=....",'#10'".....a.V.(.(.(.(.F.).@.9.9.9.9.9.9.9.9.@.#'
-  ,'.[....",'#10'".....g.],.,,,,,,.F.G.@.#.#.#,-,-,-,-,-.@.#.=....",'#10'".....'
-  +'..g.a.a.a.a.6.-.@.@.@.@.@.@.@.@.@.@.#.[....",'#10'".................6.O,*,*'
-  +',*,*,*,*,*,*,*,*,*.[....",'#10'".................6.6.6.6.6.6.6.6.6.6.6.6.6.'
-  +'[...."}'#10#130#5#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 4'
-  +'6 1",'#10'". c None",'#10'", c #D5A61D",'#10'"- c #E6CB7E",'#10'"* c #EEDE9'
-  +'E",'#10'"a c #F5E6BE",'#10'"b c #F4DBAC",'#10'"c c #FAD7CE",'#10'"d c #F9EF'
-  +'DF",'#10'"e c #D8AC2E",'#10'"f c #F1D190",'#10'"g c #FFFDD4",'#10'"h c #FFF'
-  +'DC2",'#10'"i c #FEFBAD",'#10'"j c #FEFDE4",'#10'"k c #E1C164",'#10'"l c #FB'
-  +'3503",'#10'"m c #FA7145",'#10'"n c #FEFD99",'#10'"o c #FEFEF0",'#10'"p c #F'
-  +'75A29",'#10'"q c #EFA998",'#10'"r c #FDF6F0",'#10'"s c #FDD270",'#10'"t c #'
-  +'F9EB71",'#10'"u c #F0D460",'#10'"v c #E0BD4B",'#10'"w c #FEF38D",'#10'"x c '
-  +'#FEFFFF",'#10'"y c #FFFEFF",'#10'"z c #FBFCFF",'#10'"A c #FFE39A",'#10'"B c'
-  +' #FEE984",'#10'"C c #FEDD7B",'#10'"D c #E0B437",'#10'"E c #FBFBF8",'#10'"F '
-  +'c #F9EFD1",'#10'"G c #FCB25D",'#10'"H c #FEC661",'#10'"I c #CD9A05",'#10'"J'
-  +' c #FE9C39",'#10'"K c #FFAF4B",'#10'"L c #F0C656",'#10'"M c #FEFFF9",'#10'"'
-  +'N c #ED9344",'#10'"O c #E0803A",'#10'"P c #DAB341",'#10'"..................'
-  +'......",'#10'"........................",'#10'"...,,,,,................",'#10
-  +'"..,--*ab,........cd.....",'#10'".efgghijk,,,,,,,,lm.....",'#10'".,jnnnnnoa'
-  +'ajghiiplqr....",'#10'".,innnnnnnnnnnnsll......",'#10'".,innnnnnnnnntumlpvvv'
-  +'vv.",'#10'".,iwwwwwwwwuv*bllbxyzav.",'#10'".,ABBBBBCuDkEjqlpsooov..",'#10'"'
-  +'.,ACCvvvvbFohhplGHjja-..",'#10'".,Asv*ogfpGhiAlliHggvo..",'#10'".IAHDoniJll'
-  +'GnKlmnHhik...",'#10'".IALkgnnnmllGplGnshvd...",'#10'".IsDbiwwwnmllllCwHnv..'
-  +'..",'#10'".IfeMBwwwBwmllpwwHua....",'#10'".IsvgBBBBBtCplNBBLD.....",'#10'".'
-  +'IL*ACCCCCCCsODDI,b.....",'#10'".IIrCCCCCLv,I,kfF.......",'#10'".IvFsLD,Ieka'
-  +'d...........",'#10'".IkvIP-ar...............",'#10'".IIF...................'
-  +'.",'#10'"........................",'#10'"........................"}'#10'('#5
-  +#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 40 1",'#10'". c Non'
-  +'e",'#10'", c #D1E3F3",'#10'"- c #266EC5",'#10'"* c #0167CC",'#10'"a c #A1C8'
-  +'EA",'#10'"b c #6493D3",'#10'"c c #037EE2",'#10'"d c #FFFFFF",'#10'"e c #FEF'
-  +'EFE",'#10'"f c #FFFEFF",'#10'"g c #FEFFFF",'#10'"h c #FCFFFE",'#10'"i c #F7'
-  +'FAFE",'#10'"j c #F3F9FE",'#10'"k c #EEF8FF",'#10'"l c #E9F4FE",'#10'"m c #E'
-  +'2F0FE",'#10'"n c #FEFEFF",'#10'"o c #FAFAFD",'#10'"p c #999ACC",'#10'"q c #'
-  +'039A02",'#10'"r c #FEFEFC",'#10'"s c #FCFBFB",'#10'"t c #D7EBFE",'#10'"u c '
-  +'#B3B3B5",'#10'"v c #AFAFAF",'#10'"w c #A6AAB9",'#10'"x c #CAE4FE",'#10'"y c'
-  +' #F8FDFF",'#10'"z c #FA7145",'#10'"A c #F8F8F8",'#10'"B c #083FA2",'#10'"C '
-  +'c #CD9A05",'#10'"D c #F18266",'#10'"E c #BBDDFE",'#10'"F c #FBFCFF",'#10'"G'
-  +' c #E7EFF6",'#10'"H c #979699",'#10'"I c #ABD7FE",'#10'"J c #B7D0FE",'#10'"'
-  +'........................",'#10'"........................",'#10'"...........'
-  +'.............",'#10'",-********************a.",'#10'"b*********************'
-  +'*.",'#10'"*ccccccccccccccccccccc*.",'#10'"*dddddedfdgddfhijklmmm*.",'#10'"*'
-  +'dddendfgffgfddoiklmmm*.",'#10'"*ddgpppgddccchfiqqqmmm*.",'#10'"*dddpppdfrcc'
-  +'csikqqqmmm*.",'#10'"*ddrpppfhdcccjilqqqttt*.",'#10'"*dddedgfdgddjkkklltttt*'
-  +'.",'#10'"*ddduuuggduuvklmvvwxxx*.",'#10'"*ddgfrhdfyjklmmttxxxxx*.",'#10'"*d'
-  +'fdzzzdeABBBmmtCCCxxx*.",'#10'"*dgdzDzdijBBB,ttCCCEEE*.",'#10'"*dfdzzzFiGBBB'
-  +'ttxCCCEEE*.",'#10'"*ddgddyjkkGG,xtxxxEEEE*.",'#10'"*dgdHHHllmHHHxxxHHHIEI*.'
-  +'",'#10'"*gddjlmmmtxxxxxxEIIIIJ*.",'#10'"*gdijklmmtttxxEEEIIIII*.",'#10'"***'
-  +'********************.",'#10'"........................",'#10'"..............'
-  +'.........."}'#10'E'#6#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 '
-  +'24 59 1",'#10'". c None",'#10'", c #E2F3D9",'#10'"- c #7FCE7A",'#10'"* c #3'
-  +'9C339",'#10'"a c #19B209",'#10'"b c #A9DE91",'#10'"c c #F0F9EF",'#10'"d c #'
-  +'E1F1E1",'#10'"e c #71CE47",'#10'"f c #69C330",'#10'"g c #4FBB25",'#10'"h c '
-  +'#1BA30E",'#10'"i c #B9E5BB",'#10'"j c #BFE6AF",'#10'"k c #87E058",'#10'"l c'
-  +' #3DA625",'#10'"m c #CCEBD8",'#10'"n c #94B451",'#10'"o c #2E9918",'#10'"p '
-  +'c #49AA49",'#10'"q c #FEFEF0",'#10'"r c #FFFFFF",'#10'"s c #FCFBFB",'#10'"t'
-  +' c #19830F",'#10'"u c #B0D0AF",'#10'"v c #FBFBF8",'#10'"w c #FFFCFF",'#10'"'
-  +'x c #FFFEFF",'#10'"y c #FBFEFC",'#10'"z c #FEFEFC",'#10'"A c #9EC7A1",'#10
+  +'......................."}'#10#204#6#0#0'/* XPM */'#10'static char *graphic['
+  +'] = {'#10'"24 24 68 1",'#10'". c None",'#10'", c #92BDED",'#10'"- c #87A8DC'
+  +'",'#10'"* c #7681B4",'#10'"a c #E7EFF6",'#10'"b c #E2F0FE",'#10'"c c #DFEAF'
+  +'5",'#10'"d c #D8E4EF",'#10'"e c #D4DBEA",'#10'"f c #CCDAEC",'#10'"g c #CDD1'
+  +'E4",'#10'"h c #CAD2DE",'#10'"i c #94A8D6",'#10'"j c #FEFFFF",'#10'"k c #FFF'
+  +'EFF",'#10'"l c #FFFFFF",'#10'"m c #FEFEFE",'#10'"n c #F7FAFE",'#10'"o c #A1'
+  +'C8EA",'#10'"p c #8EB1E3",'#10'"q c #FFFCFF",'#10'"r c #EEF8FF",'#10'"s c #7'
+  +'CC4FC",'#10'"t c #829ACB",'#10'"u c #FEFEFF",'#10'"v c #FAFAFD",'#10'"w c #'
+  +'4CB0FC",'#10'"x c #0F9BFB",'#10'"y c #6493D3",'#10'"z c #FBFEFC",'#10'"A c '
+  +'#F8FDFF",'#10'"B c #E9F4FE",'#10'"C c #FEFEFC",'#10'"D c #FBFCFF",'#10'"E c'
+  +' #F3F9FE",'#10'"F c #C9D6FE",'#10'"G c #B5B9F3",'#10'"H c #A2A3FC",'#10'"I '
+  +'c #FCFBFB",'#10'"J c #D7EBFE",'#10'"K c #C2CFFE",'#10'"L c #7478A4",'#10'"M'
+  +' c #FBFBF8",'#10'"N c #EFA998",'#10'"O c #E2D6E2",'#10'"P c #CAE4FE",'#10'"'
+  +'Q c #FAFAFA",'#10'"R c #E4CDD1",'#10'"S c #FB3503",'#10'"T c #D6C4CF",'#10
+  +'"U c #FA7145",'#10'"V c #F75A29",'#10'"W c #F5F6F9",'#10'"X c #666B98",'#10
+  +'"Y c #858EBA",'#10'"Z c #F2F3FA",'#10'"0 c #F18266",'#10'"1 c #BBDDFE",'#10
+  +'"2 c #ECF3F8",'#10'"3 c #EAEAEC",'#10'"4 c #E2E3F1",'#10'"5 c #D4ACA9",'#10
+  +'"6 c #B7D0FE",'#10'"7 c #ABD7FE",'#10'"8 c #5C5D8C",'#10'"9 c #D1E3F3",'#10
+  +'"@ c #CCC0CC",'#10'"# c #9ACCFE",'#10'"...,-----------*-a......",'#10'"...,'
+  +'bbccddeefgh*-ia.....",'#10'"...,jklmlmljmnn*op-a....",'#10'"...,qllkjlljnnr'
+  +'*ost-a...",'#10'"...pujlkmkkvnrr*pwxyt...",'#10'"...pzjkmjmAnrrB******...",'
+  +#10'"...-CkkluDErrBBbFGHH*...",'#10'"...-ICjlDnErBBbbJFKGL...",'#10'"...-Mll'
+  +'AnErBbbNOJJPKL...",'#10'"...tQlDnErBBbRSSTPPFL...",'#10'"...tvAnErBBbcUSVJP'
+  +'PFL...",'#10'"...tWDErBBbbNSSTPPPFX...",'#10'"...YZErBBbbdSS0PPP1FX...",'#10
+  +'"...Y2r3S04J0SSFP111FX...",'#10'"...*2BNSSSNSS5P1111KX...",'#10'"...*aBbNSS'
+  +'SSVP111116X...",'#10'"...*cbbJd0SST11111768...",'#10'"...*cbJJP9@N1111177K8'
+  +'...",'#10'"...L4JJJPPF1111177768...",'#10'"...LdJJPPPP1111777768...",'#10'"'
+  +'...L9JPPPP11117777#68...",'#10'"...LfFFFFFFF6KK666668...",'#10'"...LLLLLLLL'
+  +'LLLLLLLLL8...",'#10'"........................"}'#10'd'#5#0#0'/* XPM */'#10
+  +'static char *graphic[] = {'#10'"24 24 44 1",'#10'". c None",'#10'", c #EAEA'
+  +'EC",'#10'"- c #C6C9DB",'#10'"* c #D3D7DE",'#10'"a c #4D5B6F",'#10'"b c #5B6'
+  +'A82",'#10'"c c #B7BCCA",'#10'"d c #F2F3FA",'#10'"e c #707D92",'#10'"f c #97'
+  +'A0B1",'#10'"g c #CAD2DE",'#10'"h c #E0E0E1",'#10'"i c #828CA1",'#10'"j c #A'
+  +'BB8C6",'#10'"k c #A6AAB9",'#10'"l c #C2C2C3",'#10'"m c #F3F3F3",'#10'"n c #'
+  +'C7C7C7",'#10'"o c #CACACC",'#10'"p c #8E96A4",'#10'"q c #C0C0C0",'#10'"r c '
+  +'#B9B9B9",'#10'"s c #ABABC8",'#10'"t c #E2E3F1",'#10'"u c #C4C4C4",'#10'"v c'
+  +' #E7EFF6",'#10'"w c #7681B4",'#10'"x c #2956AB",'#10'"y c #4166B3",'#10'"z '
+  +'c #5879BD",'#10'"A c #829ACB",'#10'"B c #083FA2",'#10'"C c #858EBA",'#10'"D'
+  +' c #024BAF",'#10'"E c #0167CC",'#10'"F c #A0B4DA",'#10'"G c #BECDE5",'#10'"'
+  +'H c #0158BD",'#10'"I c #ECF3F8",'#10'"J c #B3BDE2",'#10'"K c #6493D3",'#10
+  +'"L c #D4DBEA",'#10'"M c #DFEAF5",'#10'"N c #94A8D6",'#10'".................'
+  +'.......",'#10'".....,-..........**.....",'#10'".....*a,.........bc.....",'
+  +#10'".....dbe........fa*.....",'#10'"......ebg......hbb......",'#10'"......f'
+  +'fb......efi......",'#10'"......hijf....jfkl......",'#10'".......eme*..,ehb.'
+  +'......",'#10'".......kkne..ifkf.......",'#10'".......,bopj*eqe*.......",'#10
+  +'"........pkrbekse........",'#10'"........,bcfbkb*........",'#10'".........l'
+  +'btubp.........",'#10'".........vbefb*.........",'#10'".........wxbbyz......'
+  +'...",'#10'"......ABBBBzwBBBBCd.....",'#10'".....zDEEEDFGDEHEHz.....",'#10'"'
+  +'....GDDzzHDt.BHzzHDF....",'#10'"....zHz.IDD..DD..zEz....",'#10'"....yDJ.tDD'
+  +'..xD..JDx....",'#10'"....yHAIzDz..wDz.zHx....",'#10'"....KDDBDBL..MBDBDHz..'
+  ,'..",'#10'"....mBBDBF....LBDDBL....",'#10'".....dNNt......dFNd....."}'#10'6'
+  +#6#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 58 1",'#10'". c N'
+  +'one",'#10'", c #92BDED",'#10'"- c #87A8DC",'#10'"* c #7681B4",'#10'"a c #BE'
+  +'CDE5",'#10'"b c #FEFEFC",'#10'"c c #FFFCFF",'#10'"d c #FEFEFE",'#10'"e c #F'
+  +'BFEFC",'#10'"f c #FAFAFA",'#10'"g c #F8F8F8",'#10'"h c #F5F6F9",'#10'"i c #'
+  +'ECF3F8",'#10'"j c #8EB1E3",'#10'"k c #B5C5D8",'#10'"l c #FEFEFF",'#10'"m c '
+  +'#FFFFFF",'#10'"n c #F8FDFF",'#10'"o c #F7FAFE",'#10'"p c #EEF8FF",'#10'"q c'
+  +' #7CC4FC",'#10'"r c #B3BDE2",'#10'"s c #FEFFFF",'#10'"t c #FBFCFF",'#10'"u '
+  +'c #FCFBFB",'#10'"v c #E9F4FE",'#10'"w c #E2F0FE",'#10'"x c #D7EBFE",'#10'"y'
+  +' c #94A8D6",'#10'"z c #FFFEFF",'#10'"A c #F3F9FE",'#10'"B c #9ACCFE",'#10'"'
+  +'C c #FBFBF8",'#10'"D c #F3F3F3",'#10'"E c #EFEFEF",'#10'"F c #829ACB",'#10
+  +'"G c #BBDDFE",'#10'"H c #DFEAF5",'#10'"I c #FCFFFE",'#10'"J c #858EBA",'#10
+  +'"K c #CAE4FE",'#10'"L c #B5B9F3",'#10'"M c #A2A3FC",'#10'"N c #FAFAFD",'#10
+  +'"O c #E7EFF6",'#10'"P c #7478A4",'#10'"Q c #D8E4EF",'#10'"R c #ABD7FE",'#10
+  +'"S c #D4DBEA",'#10'"T c #666B98",'#10'"U c #CCDAEC",'#10'"V c #A3D1F3",'#10
+  +'"W c #C9D6FE",'#10'"X c #CDD1E4",'#10'"Y c #CAD2DE",'#10'"Z c #5C5D8C",'#10
+  +'"0 c #C6C9DB",'#10'"1 c #C2CFFE",'#10'"..,---------*a..........",'#10'"..,b'
+  +'cdefgghi*jk.........",'#10'"..,lmmmmlnop*q-r........",'#10'"..jlsmmmtopp***'
+  +'*........",'#10'"..jumsdnopvwxyy*........",'#10'"..-uzmnA,----------*a...",'
+  +#10'"..-uBBBB,weeChhDDEE*jk..",'#10'"..FfGGGG,wzmsbmdnAo*qFr.",'#10'"..FhAAv'
+  +'vjHmbmzItApp****.",'#10'"..JiBBBBjHzzszoApvvKLM*.",'#10'"..JiGGGG-HmsmNopvv'
+  +'wwOGP.",'#10'"..*OOOOO-QhBBBBBBBBBOGP.",'#10'"..*OBBBB-QhGGGGGGGGGOGP.",'#10
+  +'"..*OGGGRFQOOOOOOOOOOOGP.",'#10'"..POOOOiFSOBBBBBBBBBOGT.",'#10'"..POOOOOFU'
+  +'ORRRRRRRVVOGT.",'#10'"..PWWWWWJXOOOOOOOOwOOGT.",'#10'"..PPPPPPJYOBBBBBBBBBO'
+  +'GZ.",'#10'"........JaOKKKGGGGRROGZ.",'#10'"........*aOOOOOOOOOOOGZ.",'#10'"'
+  +'........*kOOOOOOOOOOOGZ.",'#10'"........*0111111111111Z.",'#10'"........PPP'
+  +'PPPPPPPPPPPZ.",'#10'"........................"}'#10'0'#10#0#0'/* XPM */'#10
+  +'static char *graphic[] = {'#10'"24 24 82 2",'#10'".. c None",'#10'"., c #82'
+  +'8CA1",'#10'".- c #C6C9DB",'#10'".* c #F1D190",'#10'".a c #DAB341",'#10'".b '
+  +'c #B7BCCA",'#10'".c c #A6AAB9",'#10'".d c #C3A666",'#10'".e c #E0BD4B",'#10
+  +'".f c #F5E6BE",'#10'".g c #E6CB7E",'#10'".h c #D8AC2E",'#10'".i c #FEFD99",'
+  +#10'".j c #D8C39B",'#10'".k c #8E96A4",'#10'".l c #ABB8C6",'#10'".m c #FFFFF'
+  +'F",'#10'".n c #FEFEFC",'#10'".o c #FFFEFF",'#10'".p c #FEFFFF",'#10'".q c #'
+  +'D3D7DE",'#10'".r c #859187",'#10'".s c #CD9A05",'#10'".t c #F9EFDF",'#10'".'
+  +'u c #FEFEF0",'#10'".v c #FEFDE4",'#10'".w c #97A0B1",'#10'".x c #88898C",'
+  +#10'".y c #FFFDD4",'#10'".z c #FFFDC2",'#10'".A c #EEDE9E",'#10'".B c #FFE39'
+  +'A",'#10'".C c #FEFBAD",'#10'".D c #92BDED",'#10'".E c #87A8DC",'#10'".F c #'
+  +'7681B4",'#10'".G c #BECDE5",'#10'".H c #E9F4FE",'#10'".I c #FEFEFE",'#10'".'
+  +'J c #FCFBFB",'#10'".K c #FAFAFA",'#10'".L c #F5F6F9",'#10'".M c #ECF3F8",'
+  +#10'".N c #8EB1E3",'#10'".O c #B5C5D8",'#10'".P c #E2F0FE",'#10'".Q c #F7FAF'
+  +'E",'#10'".R c #EEF8FF",'#10'".S c #7CC4FC",'#10'".T c #B3BDE2",'#10'".U c #'
+  +'FBFCFF",'#10'".V c #FEF38D",'#10'".W c #DFEAF5",'#10'".X c #FFFCFF",'#10'".'
+  +'Y c #F3F9FE",'#10'".Z c #D1E3F3",'#10'".0 c #B5B9F3",'#10'".1 c #A2A3FC",'
+  +#10'".2 c #FEFEFF",'#10'".3 c #D7EBFE",'#10'".4 c #CAE4FE",'#10'".5 c #B7D0F'
+  +'E",'#10'".6 c #7478A4",'#10'".7 c #FEE984",'#10'".8 c #D8E4EF",'#10'".9 c #'
+  +'9ACCFE",'#10'".@ c #E7EFF6",'#10'".# c #BBDDFE",'#10'".; c #829ACB",'#10'".'
+  +': c #D4DBEA",'#10'".= c #666B98",'#10'".+ c #FEDD7B",'#10'".% c #858EBA",'
+  +#10'".$ c #CCDAEC",'#10'".( c #FDD270",'#10'".) c #CAD2DE",'#10'".[ c #5C5D8'
+  +'C",'#10'".] c #D5A61D",'#10'",. c #F0D460",'#10'",, c #F9EB71",'#10'",- c #'
+  +'ABD7FE",'#10'",* c #C2CFFE",'#10'"...............,.,.,.,.,.,.,.-...........'
+  +'.......",'#10'".......*.a.a.a.,.b.b.b.b.b.c.d.a.a.e.f..........",'#10'"....'
+  +'.g.h.i.j.k.l.m.m.n.o.p.q.k.r.a.g.s.t........",'#10'".....a.u.v.w.q.q.q.q.q.'
+  +'q.q.q.q.x.e.v.*.s........",'#10'".....a.u.y.j.,.,.,.,.,.,.,.,.,.,.*.y.*.s..'
+  +'......",'#10'".....a.v.y.z.A.A.A.B.A.B.A.B.A.A.y.y.*.s........",'#10'".....'
+  +'a.v.z.z.z.z.z.z.z.z.z.z.z.z.z.z.*.s........",'#10'".....a.y.C.C.C.C.D.E.E.E'
+  +'.E.E.E.E.E.E.F.G........",'#10'".....a.y.i.C.i.C.D.H.p.I.J.J.K.K.L.M.F.N.O.'
+  +'.....",'#10'".....a.y.i.i.i.i.D.P.p.o.m.p.m.n.Q.R.F.S.E.T....",'#10'".....a'
+  +'.z.i.i.i.i.N.P.o.o.p.m.U.Q.R.R.F.F.F.F....",'#10'".....a.z.V.i.V.i.N.W.m.I.'
+  +'m.X.Y.Y.R.P.Z.0.1.F....",'#10'".....a.C.V.V.V.V.E.W.2.m.U.Q.R.H.H.P.3.4.5.6'
+  +'....",'#10'".....a.C.V.7.V.7.E.8.L.9.9.9.9.9.9.9.9.@.#.6....",'#10'".....a.'
+  +'C.7.7.7.7.;.8.L.#.#.#.#.#.#.#.#.@.#.6....",'#10'".....a.i.7.7.7.7.;.:.@.@.@'
+  +'.@.@.@.@.@.@.@.#.=....",'#10'".....a.i.+.+.+.+.;.:.@.9.9.9.9.9.9.9.9.@.#.=.'
+  +'...",'#10'".....a.V.+.+.+.+.%.$.@.3.4.4.4.#.#.#.#.@.#.=....",'#10'".....a.V'
+  +'.(.(.(.(.%.).@.@.@.@.@.@.@.@.@.@.#.=....",'#10'".....a.V.(.(.(.(.F.).@.9.9.'
+  ,'9.9.9.9.9.9.@.#.[....",'#10'".....g.],.,,,,,,.F.G.@.#.#.#,-,-,-,-,-.@.#.=..'
+  +'..",'#10'".......g.a.a.a.a.6.-.@.@.@.@.@.@.@.@.@.@.#.[....",'#10'".........'
+  +'........6.O,*,*,*,*,*,*,*,*,*,*,*.[....",'#10'".................6.6.6.6.6.6'
+  +'.6.6.6.6.6.6.6.[...."}'#10#130#5#0#0'/* XPM */'#10'static char *graphic[] ='
+  +' {'#10'"24 24 46 1",'#10'". c None",'#10'", c #D5A61D",'#10'"- c #E6CB7E",'
+  +#10'"* c #EEDE9E",'#10'"a c #F5E6BE",'#10'"b c #F4DBAC",'#10'"c c #FAD7CE",'
+  +#10'"d c #F9EFDF",'#10'"e c #D8AC2E",'#10'"f c #F1D190",'#10'"g c #FFFDD4",'
+  +#10'"h c #FFFDC2",'#10'"i c #FEFBAD",'#10'"j c #FEFDE4",'#10'"k c #E1C164",'
+  +#10'"l c #FB3503",'#10'"m c #FA7145",'#10'"n c #FEFD99",'#10'"o c #FEFEF0",'
+  +#10'"p c #F75A29",'#10'"q c #EFA998",'#10'"r c #FDF6F0",'#10'"s c #FDD270",'
+  +#10'"t c #F9EB71",'#10'"u c #F0D460",'#10'"v c #E0BD4B",'#10'"w c #FEF38D",'
+  +#10'"x c #FEFFFF",'#10'"y c #FFFEFF",'#10'"z c #FBFCFF",'#10'"A c #FFE39A",'
+  +#10'"B c #FEE984",'#10'"C c #FEDD7B",'#10'"D c #E0B437",'#10'"E c #FBFBF8",'
+  +#10'"F c #F9EFD1",'#10'"G c #FCB25D",'#10'"H c #FEC661",'#10'"I c #CD9A05",'
+  +#10'"J c #FE9C39",'#10'"K c #FFAF4B",'#10'"L c #F0C656",'#10'"M c #FEFFF9",'
+  +#10'"N c #ED9344",'#10'"O c #E0803A",'#10'"P c #DAB341",'#10'"..............'
+  +'..........",'#10'"........................",'#10'"...,,,,,................"'
+  +','#10'"..,--*ab,........cd.....",'#10'".efgghijk,,,,,,,,lm.....",'#10'".,jn'
+  +'nnnnoaajghiiplqr....",'#10'".,innnnnnnnnnnnsll......",'#10'".,innnnnnnnnntu'
+  +'mlpvvvvv.",'#10'".,iwwwwwwwwuv*bllbxyzav.",'#10'".,ABBBBBCuDkEjqlpsooov..",'
+  +#10'".,ACCvvvvbFohhplGHjja-..",'#10'".,Asv*ogfpGhiAlliHggvo..",'#10'".IAHDon'
+  +'iJllGnKlmnHhik...",'#10'".IALkgnnnmllGplGnshvd...",'#10'".IsDbiwwwnmllllCwH'
+  +'nv....",'#10'".IfeMBwwwBwmllpwwHua....",'#10'".IsvgBBBBBtCplNBBLD.....",'#10
+  +'".IL*ACCCCCCCsODDI,b.....",'#10'".IIrCCCCCLv,I,kfF.......",'#10'".IvFsLD,Ie'
+  +'kad...........",'#10'".IkvIP-ar...............",'#10'".IIF.................'
+  +'...",'#10'"........................",'#10'"........................"}'#10'('
+  +#5#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24 24 40 1",'#10'". c N'
+  +'one",'#10'", c #D1E3F3",'#10'"- c #266EC5",'#10'"* c #0167CC",'#10'"a c #A1'
+  +'C8EA",'#10'"b c #6493D3",'#10'"c c #037EE2",'#10'"d c #FFFFFF",'#10'"e c #F'
+  +'EFEFE",'#10'"f c #FFFEFF",'#10'"g c #FEFFFF",'#10'"h c #FCFFFE",'#10'"i c #'
+  +'F7FAFE",'#10'"j c #F3F9FE",'#10'"k c #EEF8FF",'#10'"l c #E9F4FE",'#10'"m c '
+  +'#E2F0FE",'#10'"n c #FEFEFF",'#10'"o c #FAFAFD",'#10'"p c #999ACC",'#10'"q c'
+  +' #039A02",'#10'"r c #FEFEFC",'#10'"s c #FCFBFB",'#10'"t c #D7EBFE",'#10'"u '
+  +'c #B3B3B5",'#10'"v c #AFAFAF",'#10'"w c #A6AAB9",'#10'"x c #CAE4FE",'#10'"y'
+  +' c #F8FDFF",'#10'"z c #FA7145",'#10'"A c #F8F8F8",'#10'"B c #083FA2",'#10'"'
+  +'C c #CD9A05",'#10'"D c #F18266",'#10'"E c #BBDDFE",'#10'"F c #FBFCFF",'#10
+  +'"G c #E7EFF6",'#10'"H c #979699",'#10'"I c #ABD7FE",'#10'"J c #B7D0FE",'#10
+  +'"........................",'#10'"........................",'#10'"..........'
+  +'..............",'#10'",-********************a.",'#10'"b********************'
+  +'**.",'#10'"*ccccccccccccccccccccc*.",'#10'"*dddddedfdgddfhijklmmm*.",'#10'"'
+  +'*dddendfgffgfddoiklmmm*.",'#10'"*ddgpppgddccchfiqqqmmm*.",'#10'"*dddpppdfrc'
+  +'ccsikqqqmmm*.",'#10'"*ddrpppfhdcccjilqqqttt*.",'#10'"*dddedgfdgddjkkklltttt'
+  +'*.",'#10'"*ddduuuggduuvklmvvwxxx*.",'#10'"*ddgfrhdfyjklmmttxxxxx*.",'#10'"*'
+  +'dfdzzzdeABBBmmtCCCxxx*.",'#10'"*dgdzDzdijBBB,ttCCCEEE*.",'#10'"*dfdzzzFiGBB'
+  +'BttxCCCEEE*.",'#10'"*ddgddyjkkGG,xtxxxEEEE*.",'#10'"*dgdHHHllmHHHxxxHHHIEI*'
+  +'.",'#10'"*gddjlmmmtxxxxxxEIIIIJ*.",'#10'"*gdijklmmtttxxEEEIIIII*.",'#10'"**'
+  +'*********************.",'#10'"........................",'#10'".............'
+  +'..........."}'#10'E'#6#0#0'/* XPM */'#10'static char *graphic[] = {'#10'"24'
+  +' 24 59 1",'#10'". c None",'#10'", c #E2F3D9",'#10'"- c #7FCE7A",'#10'"* c #'
+  +'39C339",'#10'"a c #19B209",'#10'"b c #A9DE91",'#10'"c c #F0F9EF",'#10'"d c '
+  +'#E1F1E1",'#10'"e c #71CE47",'#10'"f c #69C330",'#10'"g c #4FBB25",'#10'"h c'
+  +' #1BA30E",'#10'"i c #B9E5BB",'#10'"j c #BFE6AF",'#10'"k c #87E058",'#10'"l '
+  +'c #3DA625",'#10'"m c #CCEBD8",'#10'"n c #94B451",'#10'"o c #2E9918",'#10'"p'
+  +' c #49AA49",'#10'"q c #FEFEF0",'#10'"r c #FFFFFF",'#10'"s c #FCFBFB",'#10'"'
+  +'t c #19830F",'#10'"u c #B0D0AF",'#10'"v c #FBFBF8",'#10'"w c #FFFCFF",'#10
+  +'"x c #FFFEFF",'#10'"y c #FBFEFC",'#10'"z c #FEFEFC",'#10'"A c #9EC7A1",'#10
   +'"B c #039A02",'#10'"C c #FDF6F0",'#10'"D c #F3F3F3",'#10'"E c #438C2A",'#10
   +'"F c #FEFEFE",'#10'"G c #FEFFF9",'#10'"H c #32B416",'#10'"I c #0A7105",'#10
   +'"J c #F5FAF2",'#10'"K c #FEFFFF",'#10'"L c #FCFFFE",'#10'"M c #F5F6F9",'#10

components/virtualtreeview-unstable/demos/objects/mvcdemo.lpi

@@ -65,7 +65,10 @@
   </ProjectOptions>
   <CompilerOptions>
     <Version Value="5"/>
+<<<<<<< .mine
+=======
     <PathDelim Value="\"/>
+>>>>>>> .r167
     <CodeGeneration>
       <Generate Value="Faster"/>
     </CodeGeneration>

components/virtualtreeview-unstable/units/gtk/virtualdragmanager.pas

@@ -405,7 +405,7 @@ type
     function GetData(const FormatEtcIn: TFormatEtc; out Medium: TStgMedium): HResult; virtual; stdcall;
     function GetDataHere(const FormatEtc: TFormatEtc; out Medium: TStgMedium): HResult; virtual; stdcall;
     function QueryGetData(const FormatEtc: TFormatEtc): HResult; virtual; stdcall;
-    function SetData(const FormatEtc: TFormatEtc; var Medium: TStgMedium; DoRelease: BOOL): HResult; virtual; stdcall;
+    function SetData(const FormatEtc: TFormatEtc;{$ifdef VER2_0}var{$else}const{$endif} Medium: TStgMedium; DoRelease: BOOL): HResult; virtual; stdcall;
   end;
 
   // TVTDragManager is a class to manage drag and drop in a Virtual Treeview.
@@ -1335,7 +1335,7 @@ end;
 
 //----------------------------------------------------------------------------------------------------------------------
 
-function TVTDataObject.SetData(const FormatEtc: TFormatEtc; var Medium: TStgMedium; DoRelease: BOOL): HResult;
+function TVTDataObject.SetData(const FormatEtc: TFormatEtc;{$ifdef VER2_0}var{$else}const{$endif} Medium: TStgMedium; DoRelease: BOOL): HResult;
 
 // Allows dynamic adding to the IDataObject during its existance. Most noteably it is used to implement
 // IDropSourceHelper and allows to set a special format for optimized moves during a shell transfer.

components/virtualtreeview-unstable/units/gtk2/virtualdragmanager.pas

@@ -405,7 +405,7 @@ type
     function GetData(const FormatEtcIn: TFormatEtc; out Medium: TStgMedium): HResult; virtual; stdcall;
     function GetDataHere(const FormatEtc: TFormatEtc; out Medium: TStgMedium): HResult; virtual; stdcall;
     function QueryGetData(const FormatEtc: TFormatEtc): HResult; virtual; stdcall;
-    function SetData(const FormatEtc: TFormatEtc; var Medium: TStgMedium; DoRelease: BOOL): HResult; virtual; stdcall;
+    function SetData(const FormatEtc: TFormatEtc;{$ifdef VER2_0}var{$else}const{$endif} Medium: TStgMedium; DoRelease: BOOL): HResult; virtual; stdcall;
   end;
 
   // TVTDragManager is a class to manage drag and drop in a Virtual Treeview.
@@ -1335,7 +1335,7 @@ end;
 
 //----------------------------------------------------------------------------------------------------------------------
 
-function TVTDataObject.SetData(const FormatEtc: TFormatEtc; var Medium: TStgMedium; DoRelease: BOOL): HResult;
+function TVTDataObject.SetData(const FormatEtc: TFormatEtc;{$ifdef VER2_0}var{$else}const{$endif} Medium: TStgMedium; DoRelease: BOOL): HResult;
 
 // Allows dynamic adding to the IDataObject during its existance. Most noteably it is used to implement
 // IDropSourceHelper and allows to set a special format for optimized moves during a shell transfer.