From 819371cd4b13b34a3a3d68e73d2481d1cbb5d1dc Mon Sep 17 00:00:00 2001
From: =?utf8?q?Jean-Philippe=20Bruy=C3=A8re?= <jp_bruyere@hotmail.com>
Date: Mon, 6 Jul 2020 08:18:33 +0200
Subject: [PATCH] list item

---
 Crow.sln                                      |   7 +
 Crow/Crow.csproj                              |   2 +-
 Crow/Default.style                            |  17 +-
 Crow/Templates/ContextMenu.template           |   5 +-
 Crow/Templates/DefaultItem.template           |   9 +-
 Crow/Templates/DirectoryView.template         |  69 +++--
 Crow/Templates/FileItems.template             |  28 +-
 Crow/Templates/GroupBox.template              |   6 +-
 Crow/Templates/MenuItem.template              |  46 +--
 Crow/Templates/Tooltip.template               |   4 +-
 Crow/src/DebugUtils/DbgEvent.cs               | 237 ++++++++++++++
 Crow/src/DebugUtils/DbgEventSource.cs         |  34 ++
 .../DbgEventTypeColors.cs                     |   4 +-
 Crow/src/DebugUtils/DbgEventWidget (copie).cs |  87 ++++++
 Crow/src/DebugUtils/DbgWidgetRecord.cs        |  50 +++
 Crow/src/{debug => DebugUtils}/DebugLogger.cs |   3 +-
 Crow/src/DebugUtils/Utils.cs                  |  29 ++
 .../src/EventArgs/SelectionChangeEventArgs.cs |  27 +-
 Crow/src/EventArgs/TreeExpandEventArg.cs      |  18 ++
 Crow/src/Fill/SolidColor.cs                   |  26 +-
 Crow/src/IML/Instantiator.cs                  |  10 +-
 Crow/src/Interface.cs                         |  39 ++-
 Crow/src/LayoutingQueueItem.cs                |   2 +-
 Crow/src/Widgets/Expandable.cs                |  27 +-
 Crow/src/Widgets/Group.cs                     |  20 +-
 Crow/src/Widgets/ListItem.cs                  |  42 +++
 Crow/src/Widgets/PrivateContainer.cs          |   7 +
 Crow/src/Widgets/TemplatedContainer.cs        |   7 +
 Crow/src/Widgets/TemplatedControl.cs          |   1 +
 Crow/src/Widgets/TemplatedGroup.cs            | 141 ++++-----
 Crow/src/Widgets/TreeView.cs                  |  22 --
 Crow/src/Widgets/Widget.cs                    |  52 +++-
 Samples/BasicTests/BasicTests.cs              |  13 +-
 Samples/DebugLogAnalyzer/DbgEventWidget.cs    | 143 +++++++++
 .../DebugLogAnalyzer}/DbgLogViewer.cs         | 291 +++++++++---------
 .../DebugLogAnalyzer/DebugLogAnalyzer.csproj  |   9 +
 Samples/DebugLogAnalyzer/Program.cs           | 178 +++++++++++
 .../Properties/AssemblyInfo.cs                |   5 +
 .../ui/DbgEventTreeItems.itemp                |  70 +++++
 .../DebugLogAnalyzer/ui/DbgEvtTooltip.crow    |  37 +++
 Samples/DebugLogAnalyzer/ui/dbglog.crow       |  98 ++++++
 Samples/HelloWorld/HelloWorld.csproj          |  15 +-
 Samples/HelloWorld/main.cs                    |   2 +
 Samples/ShowCase/ShowCase.cs                  |  14 +-
 Samples/common/SampleBase.cs                  |  74 +++++
 Samples/common/samples.style                  |   4 +-
 Samples/common/ui/Interfaces/CheckBox2.imlt   |   4 +-
 .../ui/Interfaces/Divers/classBindings.crow   |   9 +
 .../common/ui/Interfaces/Divers/dbglog.crow   |  99 ------
 .../ui/Interfaces/Divers/splitter0.crow       |   7 +
 Samples/common/ui/Interfaces/Splitter/1.crow  |  30 --
 Samples/common/ui/Interfaces/Splitter/3.crow  |  44 ---
 Samples/common/ui/Interfaces/TabItem.template |  24 --
 Samples/common/ui/Interfaces/colorItem.crow   |  10 +-
 54 files changed, 1613 insertions(+), 645 deletions(-)
 create mode 100644 Crow/src/DebugUtils/DbgEvent.cs
 create mode 100644 Crow/src/DebugUtils/DbgEventSource.cs
 rename Crow/src/{debug => DebugUtils}/DbgEventTypeColors.cs (96%)
 create mode 100644 Crow/src/DebugUtils/DbgEventWidget (copie).cs
 create mode 100644 Crow/src/DebugUtils/DbgWidgetRecord.cs
 rename Crow/src/{debug => DebugUtils}/DebugLogger.cs (98%)
 create mode 100644 Crow/src/DebugUtils/Utils.cs
 create mode 100644 Crow/src/EventArgs/TreeExpandEventArg.cs
 create mode 100644 Crow/src/Widgets/ListItem.cs
 create mode 100644 Samples/DebugLogAnalyzer/DbgEventWidget.cs
 rename {Crow/src/debug => Samples/DebugLogAnalyzer}/DbgLogViewer.cs (77%)
 create mode 100644 Samples/DebugLogAnalyzer/DebugLogAnalyzer.csproj
 create mode 100644 Samples/DebugLogAnalyzer/Program.cs
 create mode 100644 Samples/DebugLogAnalyzer/Properties/AssemblyInfo.cs
 create mode 100644 Samples/DebugLogAnalyzer/ui/DbgEventTreeItems.itemp
 create mode 100644 Samples/DebugLogAnalyzer/ui/DbgEvtTooltip.crow
 create mode 100644 Samples/DebugLogAnalyzer/ui/dbglog.crow
 create mode 100644 Samples/common/ui/Interfaces/Divers/classBindings.crow
 delete mode 100644 Samples/common/ui/Interfaces/Divers/dbglog.crow
 create mode 100644 Samples/common/ui/Interfaces/Divers/splitter0.crow
 delete mode 100644 Samples/common/ui/Interfaces/Splitter/1.crow
 delete mode 100644 Samples/common/ui/Interfaces/Splitter/3.crow
 delete mode 100644 Samples/common/ui/Interfaces/TabItem.template

diff --git a/Crow.sln b/Crow.sln
index a0113386..ee474496 100644
--- a/Crow.sln
+++ b/Crow.sln
@@ -27,6 +27,8 @@ Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "BasicTests", "Samples\Basic
 EndProject
 Project("{9A19103F-16F7-4668-BE54-9A1E7A4F7556}") = "PerfTests", "Samples\PerfTests\PerfTests.csproj", "{18EBB41F-815E-4BF5-B80F-C9E2FAB2993A}"
 EndProject
+Project("{FAE04EC0-301F-11D3-BF4B-00C04F79EFBC}") = "DebugLogAnalyzer", "Samples\DebugLogAnalyzer\DebugLogAnalyzer.csproj", "{7915538F-B2B1-414C-95A3-1FC58E3286B9}"
+EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		Debug|Any CPU = Debug|Any CPU
@@ -59,6 +61,10 @@ Global
 		{18EBB41F-815E-4BF5-B80F-C9E2FAB2993A}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{18EBB41F-815E-4BF5-B80F-C9E2FAB2993A}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{18EBB41F-815E-4BF5-B80F-C9E2FAB2993A}.Release|Any CPU.Build.0 = Release|Any CPU
+		{7915538F-B2B1-414C-95A3-1FC58E3286B9}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{7915538F-B2B1-414C-95A3-1FC58E3286B9}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{7915538F-B2B1-414C-95A3-1FC58E3286B9}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{7915538F-B2B1-414C-95A3-1FC58E3286B9}.Release|Any CPU.Build.0 = Release|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
@@ -69,6 +75,7 @@ Global
 		{91F1CE07-EECE-4F1D-A3EE-7239B563654A} = {B2C7855A-2878-47FD-AD32-9A83DB4AB8C6}
 		{7AEB6DD5-916E-4415-84E1-78EC6E5881CE} = {B2C7855A-2878-47FD-AD32-9A83DB4AB8C6}
 		{18EBB41F-815E-4BF5-B80F-C9E2FAB2993A} = {B2C7855A-2878-47FD-AD32-9A83DB4AB8C6}
+		{7915538F-B2B1-414C-95A3-1FC58E3286B9} = {B2C7855A-2878-47FD-AD32-9A83DB4AB8C6}
 	EndGlobalSection
 	GlobalSection(ExtensibilityGlobals) = postSolution
 		SolutionGuid = {00D4E149-7131-49F4-BAAD-559AA961A78E}
diff --git a/Crow/Crow.csproj b/Crow/Crow.csproj
index 38082c37..8a0b9434 100644
--- a/Crow/Crow.csproj
+++ b/Crow/Crow.csproj
@@ -32,7 +32,7 @@
 	</PropertyGroup>
 	<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
 		<DebugType>full</DebugType>
-		<DefineConstants>$(DefineConstants);DEBUG_LOG;DEBUG;TRACE;DEBUG_LAYOUTING;DEBUG_DISPOSE;_DEBUG_BINDING;_DEBUG_CLIP_RECTANGLE</DefineConstants>
+		<DefineConstants>$(DefineConstants);_DEBUG_LOG;DEBUG;TRACE;DEBUG_LAYOUTING;DEBUG_DISPOSE;_DEBUG_BINDING;_DEBUG_CLIP_RECTANGLE</DefineConstants>
 		<CheckForOverflowUnderflow>true</CheckForOverflowUnderflow>
 	</PropertyGroup>
 	<ItemGroup Condition="$(TargetFramework.StartsWith('netstandard'))">
diff --git a/Crow/Default.style b/Crow/Default.style
index 8bc81ea6..cbc9dcba 100644
--- a/Crow/Default.style
+++ b/Crow/Default.style
@@ -10,6 +10,10 @@ IconSize = "11";
 IconMargin = "1";
 ToggleIconSize = "16";
 
+TooltipBackground = "Khaki";
+TooltipForeground = "DimGrey";
+TooltipMargin = "3";
+
 WindowBackgroundColor = "DarkGrey";
 WindowBorderColor = "Grey";
 WindowBorderWidth = "1";
@@ -84,8 +88,8 @@ Menu {
 	Height = "Fit";
 	Width = "Stretched";
 	VerticalAlignment = "Top";
-	SelectionBackground = "${ControlHighlight}";
-	SelectionColoring = "false";
+	//SelectionBackground = "${ControlHighlight}";
+	//SelectionColoring = "false";
 }
 MenuItem {
 	Caption = "MenuItem";
@@ -96,8 +100,13 @@ MenuItem {
 	MouseEnter = "{Background=${ControlHighlight}}";
 	MouseLeave = "{Background=${MenuBackground}}";
 	//SelectionBackground = "${ControlHighlight}";
-	SelectionBackground = "Transparent";
-	SelectionColoring = "false";
+	//SelectionBackground = "Transparent";
+	//SelectionColoring = "false";
+}
+ListItem {
+	//Selected = "{Background=${ControlHighlight}}";
+	//Unselected = "{Background=Transparent}";
+	//Margin="1";
 }
 MessageBox {
 	Background = "0.1,0.1,0.2,0.85";
diff --git a/Crow/Templates/ContextMenu.template b/Crow/Templates/ContextMenu.template
index 7fc8dcc9..fda09d1f 100644
--- a/Crow/Templates/ContextMenu.template
+++ b/Crow/Templates/ContextMenu.template
@@ -1,7 +1,6 @@
 <?xml version="1.0" encoding="UTF-8" ?>
 <MenuItem MinimumSize="20,20" Height="Fit" Width="160" Caption="Context Menu" Data="{ContextCommands}" Orientation="Vertical"
-	IsOpened ="true" Visible="{/IsOpened}" SelectionBackground="Transparent"
-	Background="Red">
+	IsOpened ="true" Visible="{/IsOpened}" Background="Red">
 	<Template>
 		<HorizontalStack>
 			<Border Background="DimGrey" Foreground="DimGrey" CornerRadius="5">
@@ -11,7 +10,7 @@
 		</HorizontalStack>
 	</Template>
 	<ItemTemplate>
-		<MenuItem Command="{}" Width="150" PopWidth="120" SelectionBackground="Transparent" IsEnabled="{CanExecute}">
+		<MenuItem Command="{}" Width="150" PopWidth="120" IsEnabled="{CanExecute}">
 			<Template>
 				<Popper Font="{./Font}" Caption="{./Caption}"  Background="{./Background}" PopDirection="{./PopDirection}"
 					Foreground = "{./Foreground}" CanPop="{./HasChildren}" MouseDown="./onMI_Click"
diff --git a/Crow/Templates/DefaultItem.template b/Crow/Templates/DefaultItem.template
index 38840830..f2d7102d 100644
--- a/Crow/Templates/DefaultItem.template
+++ b/Crow/Templates/DefaultItem.template
@@ -1,8 +1,7 @@
 <?xml version="1.0"?>
-<Container Height="Fit" Margin="0" Focusable="true"
-		HorizontalAlignment="Left"
-		MouseEnter="{Background=SteelBlue}"
-		MouseLeave="{Background=Transparent}">
+<ListItem Height="Fit" Margin="0" Focusable="true" HorizontalAlignment="Left" 
+				Selected = "{Background=${ControlHighlight}}"
+				Unselected = "{Background=Transparent}">
 	<Label Text="{}" HorizontalAlignment="Left" />
-</Container>
+</ListItem>
 
diff --git a/Crow/Templates/DirectoryView.template b/Crow/Templates/DirectoryView.template
index 36f042cf..009f46d0 100644
--- a/Crow/Templates/DirectoryView.template
+++ b/Crow/Templates/DirectoryView.template
@@ -2,43 +2,46 @@
 <TreeView IsRoot="true" Name="treeView" Data="{./FileSystemEntries}" Background="{./Background}"
 		SelectedItemChanged="./onSelectedItemChanged">
 	<ItemTemplate DataType="System.IO.FileInfo">
-		<Border CornerRadius="2" Margin="0" Focusable="true"  Height="Fit" Width="Stretched" Foreground="Transparent"
-				MouseEnter="{Foreground=DimGrey}"
-				MouseLeave="{Foreground=Transparent}">
+		<ListItem CornerRadius="2" Margin="0" Height="Fit" Width="Stretched"
+				Selected="{Background=${ControlHighlight}}"
+				Unselected="{Background=Transparent}">
 			<HorizontalStack>
-				<Image Margin="1" Width="14" Height="14"
-					Path="#Crow.Icons.file.svg"/>
+				<Image Margin="1" Width="14" Height="14" Path="#Crow.Icons.file.svg"/>
 				<Label Text="{Name}" Width="Stretched"/>
 			</HorizontalStack>
-		</Border>
+		</ListItem>
 	</ItemTemplate>
 	<ItemTemplate DataType="System.IO.DirectoryInfo" Data="GetFileSystemInfosOrdered">
-		<Expandable Caption="{Name}" MouseDoubleClick="/onClickForExpand">
-			<Template>
-				<VerticalStack>
-					<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
-							Foreground="Transparent"
-							MouseEnter="{Foreground=DimGrey}"
-							MouseLeave="{Foreground=Transparent}">
-						<HorizontalStack Spacing="1">
-							<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
-								Path="{./Image}"
-								Visible="{./IsExpandable}"
-								SvgSub="{./IsExpanded}"
-								MouseEnter="{Background=LightGrey}"
-								MouseLeave="{Background=Transparent}"/>
-							<Image Margin="1" Width="16" Height="16"
-								Path="#Crow.Icons.folder.svg" SvgSub="{./IsExpanded}"/>
-							<Label Text="{./Caption}"/>
-						</HorizontalStack>
-					</Border>
-					<Container Name="Content" Visible="false"/>
-				</VerticalStack>
-			</Template>
-			<HorizontalStack Height="Fit">
-				<Widget Width="12" Height="10"/>
-				<VerticalStack Height="Fit" Name="ItemsContainer"/>
-			</HorizontalStack>
-		</Expandable>
+		<ListItem
+				Selected="{/exp.Background=${ControlHighlight}}"
+				Unselected="{/exp.Background=Transparent}">
+			<Expandable Name="exp" Caption="{Name}" MouseDoubleClick="/onClickForExpand">
+				<Template>
+					<VerticalStack>
+						<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
+								Foreground="Transparent"
+								MouseEnter="{Foreground=DimGrey}"
+								MouseLeave="{Foreground=Transparent}">
+							<HorizontalStack Background="{./Background}" Spacing="1">
+								<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
+									Path="{./Image}"
+									Visible="{./IsExpandable}"
+									SvgSub="{./IsExpanded}"
+									MouseEnter="{Background=LightGrey}"
+									MouseLeave="{Background=Transparent}"/>
+								<Image Margin="1" Width="16" Height="16"
+									Path="#Crow.Icons.folder.svg" SvgSub="{./IsExpanded}"/>
+								<Label Text="{./Caption}"/>
+							</HorizontalStack>
+						</Border>
+						<Container Name="Content" Visible="false"/>
+					</VerticalStack>
+				</Template>
+				<HorizontalStack Height="Fit">
+					<Widget Width="12" Height="10"/>
+					<VerticalStack Height="Fit" Name="ItemsContainer"/>
+				</HorizontalStack>
+			</Expandable>
+		</ListItem>
 	</ItemTemplate>
 </TreeView>
diff --git a/Crow/Templates/FileItems.template b/Crow/Templates/FileItems.template
index fb95e29b..2fad3384 100644
--- a/Crow/Templates/FileItems.template
+++ b/Crow/Templates/FileItems.template
@@ -2,24 +2,24 @@
 	<Widget Height="16" Background="Red"/>
 </ItemTemplate>
 <ItemTemplate DataType="System.IO.FileInfo">
-	<HorizontalStack Focusable="true"  Height="Fit">
-		<Image Margin="2" Width="16" Height="16"
-			Path="#Crow.Icons.file.svg"/>
-			<Label Text="{Name}" Width="Stretched"
-				MouseEnter="{Background=RoyalBlue}"
-				MouseLeave="{Background=Transparent}"/>
-	</HorizontalStack>
+	<ListItem Height="Fit"
+				Selected = "{Background=${ControlHighlight}}"
+				Unselected = "{Background=Transparent}">
+		<HorizontalStack>
+			<Image Margin="2" Width="16" Height="16" Path="#Crow.Icons.file.svg"/>
+			<Label Text="{Name}" Width="Stretched"/>
+		</HorizontalStack>
+	</ListItem>
 </ItemTemplate>
 <ItemTemplate DataType="System.IO.DirectoryInfo">
-	<Border Foreground="Transparent" Focusable="true" Height="Fit">
-		<HorizontalStack
-				MouseEnter="{Background=RoyalBlue}"
-				MouseLeave="{Background=Transparent}">
-			<Image Margin="2" Width="16" Height="16"
-				Path="#Crow.Icons.folder.svg"/>
+	<ListItem Height="Fit"
+				Selected = "{Background=${ControlHighlight}}"
+				Unselected = "{Background=Transparent}">
+		<HorizontalStack>
+			<Image Margin="2" Width="16" Height="16" Path="#Crow.Icons.folder.svg"/>
 			<Label Text="{Name}" Width="Stretched"/>
 			<Label Text="{LastAccessTime}" />
 		</HorizontalStack>
-	</Border>
+	</ListItem>
 </ItemTemplate>
 
diff --git a/Crow/Templates/GroupBox.template b/Crow/Templates/GroupBox.template
index cab91564..cc444567 100644
--- a/Crow/Templates/GroupBox.template
+++ b/Crow/Templates/GroupBox.template
@@ -1,12 +1,12 @@
 <?xml version="1.0"?>
-<Container Background="{./Background}">
-	<Group>
+<Container Background="{./Background}" >
+	<Group CacheEnabled="true">
 		<VerticalStack Spacing="0">
 			<Widget Height="6"/>
 			<Border  CornerRadius="{./CornerRadius}" BorderWidth="1" Margin="10" Foreground="{./Foreground}">
 				<Container Name="Content" Margin="0" MinimumSize="70,10"/>
 			</Border>
 		</VerticalStack>
-		<Label Text="{./Caption}" VerticalAlignment="Top" Left="8" Background="Clear" Margin="1"/>
+		<Label Text="{./Caption}" VerticalAlignment="Top" Left="8" Background="Clear" Margin="1" CacheEnabled="true"/>
 	</Group>
 </Container>
\ No newline at end of file
diff --git a/Crow/Templates/MenuItem.template b/Crow/Templates/MenuItem.template
index b4e119dc..d5b39dd4 100644
--- a/Crow/Templates/MenuItem.template
+++ b/Crow/Templates/MenuItem.template
@@ -1,23 +1,25 @@
 <?xml version="1.0"?>
-<Popper Font="{./Font}" Caption="{./Caption}"  Background="{./Background}" PopDirection="{./PopDirection}"
-	Foreground = "{./Foreground}" CanPop="{./HasChildren}"
-	IsPopped="{²./IsOpened}" PopWidth="{./PopWidth}" PopHeight="{./PopHeight}">
-	<Template>
-		<CheckBox IsChecked="{²./IsPopped}" Caption="{./Caption}" Background="{./Background}" Foreground="{./Foreground}">
-			<Template>		
-				<Border Name="border1"
-						MinimumSize = "60,0"
-						Foreground="Transparent"
-						Background="{./Background}">
-						<Label Text="{./Caption}"
-							Foreground="{./Foreground}"
-							Margin="2" HorizontalAlignment="Left"
-							Font="{./Font}"	/>
-				</Border>
-			</Template>		
-		</CheckBox>
-	</Template>
-	<Border Foreground="DimGrey" Width="{../PopWidth}" Height="{../PopHeight}" Background="${MenuBackground}">
-		<VerticalStack Name="ItemsContainer"/>
-	</Border>
-</Popper>
\ No newline at end of file
+<ListItem>
+	<Popper Font="{./Font}" Caption="{./Caption}"  Background="{./Background}" PopDirection="{./PopDirection}"
+		Foreground = "{./Foreground}" CanPop="{./HasChildren}"
+		IsPopped="{²./IsOpened}" PopWidth="{./PopWidth}" PopHeight="{./PopHeight}">
+		<Template>
+			<CheckBox IsChecked="{²./IsPopped}" Caption="{./Caption}" Background="{./Background}" Foreground="{./Foreground}">
+				<Template>		
+					<Border Name="border1"
+							MinimumSize = "60,0"
+							Foreground="Transparent"
+							Background="{./Background}">
+							<Label Text="{./Caption}"
+								Foreground="{./Foreground}"
+								Margin="2" HorizontalAlignment="Left"
+								Font="{./Font}"	/>
+					</Border>
+				</Template>		
+			</CheckBox>
+		</Template>
+		<Border Foreground="DimGrey" Width="{../PopWidth}" Height="{../PopHeight}" Background="${MenuBackground}">
+			<VerticalStack Name="ItemsContainer" Width="Stretched" />
+		</Border>
+	</Popper>
+</ListItem>
\ No newline at end of file
diff --git a/Crow/Templates/Tooltip.template b/Crow/Templates/Tooltip.template
index 277ac7cd..f05bca38 100644
--- a/Crow/Templates/Tooltip.template
+++ b/Crow/Templates/Tooltip.template
@@ -1,4 +1,4 @@
 <?xml version="1.0" encoding="UTF-8" ?>
-<Border Fit="true" Foreground="DimGrey" Background="Khaki">
-	<Label Margin="3" Foreground="DimGrey" Multiline="true" Text="{Tooltip}"/>
+<Border Fit="true" Foreground="${TooltipForeground}" Background="${TooltipBackground}">
+	<Label Margin="${TooltipMargin}" Foreground="${TooltipForeground}" Multiline="true" Text="{Tooltip}"/>
 </Border>
diff --git a/Crow/src/DebugUtils/DbgEvent.cs b/Crow/src/DebugUtils/DbgEvent.cs
new file mode 100644
index 00000000..00c0d9e7
--- /dev/null
+++ b/Crow/src/DebugUtils/DbgEvent.cs
@@ -0,0 +1,237 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using System.Threading;
+
+namespace Crow
+{
+	public class DbgEvent : DbgEventSource
+	{
+		public long begin, end;
+		public int threadId;
+		public DbgEvtType type;
+		public DbgEvent parentEvent;
+		public bool HasChildEvents => Events != null && Events.Count > 0;
+		public override long Duration => end - begin;
+		public virtual bool IsWidgetEvent => false;
+		public virtual bool IsLayoutEvent => false;
+
+		bool isSelected;
+		bool isExpanded;
+		Widget listContainer;
+
+		public bool IsSelected {
+			get => isSelected;
+			set {
+				if (isSelected == value)
+					return;
+				isSelected = value;
+				NotifyValueChangedAuto (isSelected);
+			}
+		}
+		public bool IsExpanded {
+			get => isExpanded;
+			set {
+				if (isExpanded == value)
+					return;
+				isExpanded = value;
+				if (isExpanded && parentEvent != null)
+					parentEvent.IsExpanded = true;
+				NotifyValueChangedAuto (isExpanded);
+			}
+		}
+		public Widget ListContainer {
+			get => listContainer;
+			set {
+				if (listContainer == value)
+					return;
+				listContainer = value;
+				NotifyValueChangedAuto (listContainer);
+			}
+		}
+
+		public virtual Color Color {
+			get {
+				switch (type) {
+				case DbgEvtType.Layouting:
+					return Colors.Yellow;
+				case DbgEvtType.Clipping:
+					return Colors.DarkTurquoise;
+				case DbgEvtType.Drawing:
+					return Colors.MidnightBlue;
+				case DbgEvtType.Update:
+					return Colors.Grey;
+				case DbgEvtType.IFaceLoad:
+					return Colors.Teal;
+				default:
+					return Colors.White;
+				}
+
+			}
+		}
+
+		public void AddEvent (DbgEvent evt)
+		{
+			if (Events == null)
+				Events = new List<DbgEvent> () { evt };
+			else
+				Events.Add (evt);
+			evt.parentEvent = this;
+		}
+
+		public DbgEvent () { }
+		public DbgEvent (long timeStamp, DbgEvtType evt)
+		{
+			type = evt;
+			begin = timeStamp;
+			end = timeStamp;
+			threadId = Thread.CurrentThread.ManagedThreadId;
+		}
+
+		public static DbgEvent Parse (string str)
+		{
+			if (str == null)
+				return null;
+			string [] tmp = str.Trim ().Split (';');
+
+			DbgEvtType evtType = (DbgEvtType)Enum.Parse (typeof (DbgEvtType), tmp [3]);
+
+			if (evtType.HasFlag (DbgEvtType.Widget)) {
+				if (evtType.HasFlag (DbgEvtType.Layouting))
+					return new DbgLayoutEvent () {
+						begin = long.Parse (tmp [0]),
+						end = long.Parse (tmp [1]),
+						threadId = int.Parse (tmp [2]),
+						type = evtType,
+						InstanceIndex = int.Parse (tmp [4]),
+						layouting = (LayoutingType)Enum.Parse (typeof (LayoutingType), tmp [5]),
+						result = evtType == DbgEvtType.GOProcessLayouting ?
+							(LayoutingQueueItem.Result)Enum.Parse (typeof (LayoutingQueueItem.Result), tmp [6])
+							: LayoutingQueueItem.Result.Unknown,
+						OldSlot = Rectangle.Parse (tmp [7]),
+						NewSlot = Rectangle.Parse (tmp [8]),
+					};
+				return new DbgWidgetEvent () {
+					begin = long.Parse (tmp [0]),
+					end = long.Parse (tmp [1]),
+					threadId = int.Parse (tmp [2]),
+					type = evtType,
+					InstanceIndex = int.Parse (tmp [4]),
+				};
+			}
+			return new DbgEvent () {
+				begin = long.Parse (tmp [0]),
+				end = long.Parse (tmp [1]),
+				threadId = int.Parse (tmp [2]),
+				type = evtType,
+			};
+		}
+		public override string ToString ()
+			=> $"{begin};{end};{threadId};{type}";
+			
+	}
+	public class DbgWidgetEvent : DbgEvent
+	{
+		public int InstanceIndex;
+		public override Color Color {
+			get {
+				switch (type) {
+				case DbgEvtType.GOClassCreation:
+					return Colors.DarkSlateGrey;
+				case DbgEvtType.GOInitialization:
+					return Colors.DarkOliveGreen;
+				case DbgEvtType.GOClippingRegistration:
+					return Colors.MediumTurquoise;
+				case DbgEvtType.GORegisterClip:
+					return Colors.Turquoise;
+				case DbgEvtType.GORegisterForGraphicUpdate:
+					return Colors.LightPink;
+				case DbgEvtType.GOEnqueueForRepaint:
+					return Colors.LightSalmon;
+				case DbgEvtType.GONewDataSource:
+					return Colors.MediumVioletRed;
+				case DbgEvtType.GODraw:
+					return Colors.SteelBlue;
+				case DbgEvtType.GORecreateCache:
+					return Colors.CornflowerBlue;
+				case DbgEvtType.GOUpdateCache:
+					return Colors.SteelBlue;
+				case DbgEvtType.GOPaint:
+					return Colors.RoyalBlue;
+				case DbgEvtType.GOLockUpdate:
+					return Colors.SaddleBrown;
+				case DbgEvtType.GOLockClipping:
+					return Colors.Sienna;
+				case DbgEvtType.GOLockRender:
+					return Colors.BurlyWood;
+				case DbgEvtType.GOLockLayouting:
+					return Colors.GoldenRod;
+				case DbgEvtType.TGCancelLoadingThread:
+					return Colors.Maroon;
+				default:
+					return Colors.Crimson;
+				}
+				if (type.HasFlag (DbgEvtType.Lock))
+					return Colors.DarkMagenta;
+				return Colors.White;
+			}
+		}
+		public override bool IsWidgetEvent => true;
+		public DbgWidgetEvent () { }
+#if DEBUG_LOG
+		public DbgWidgetEvent (long timeStamp, DbgEvtType evt, Widget w) : base (timeStamp, evt)
+		{
+			InstanceIndex = w.instanceIndex;
+		}
+#endif
+		public override string ToString ()
+			=> $"{base.ToString ()};{InstanceIndex}";
+	}
+	public class DbgLayoutEvent : DbgWidgetEvent
+	{
+		public LayoutingType layouting;
+		public LayoutingQueueItem.Result result;
+		public Rectangle OldSlot, NewSlot;
+		public override Color Color {
+			get {
+				if (type == DbgEvtType.GORegisterLayouting)
+					return Colors.GreenYellow;
+				if (type == DbgEvtType.GOProcessLayoutingWithNoParent)
+					return Colors.DarkRed;
+				switch (result) {
+				case LayoutingQueueItem.Result.Success:
+					return Colors.Green;
+				case LayoutingQueueItem.Result.Deleted:
+					return Colors.Red;
+				case LayoutingQueueItem.Result.Discarded:
+					return Colors.OrangeRed;
+				default:
+					return Colors.Orange;
+				}
+			}
+		}
+		public override bool IsLayoutEvent => true;
+		public DbgLayoutEvent () { }
+#if DEBUG_LOG
+		public DbgLayoutEvent (long timeStamp, DbgEvtType evt, LayoutingQueueItem lqi) :
+			base (timeStamp, evt, lqi.graphicObject)
+		{
+			layouting = lqi.LayoutType;
+			result = lqi.result;
+			OldSlot = lqi.Slot;
+			NewSlot = lqi.NewSlot;
+		}
+		public void SetLQI (LayoutingQueueItem lqi)
+		{
+			layouting = lqi.LayoutType;
+			result = lqi.result;
+			OldSlot = lqi.Slot;
+			NewSlot = lqi.NewSlot;
+		}
+#endif
+		public override string ToString ()
+			=> $"{base.ToString ()};{layouting};{result};{OldSlot};{NewSlot}";
+	}
+}
\ No newline at end of file
diff --git a/Crow/src/DebugUtils/DbgEventSource.cs b/Crow/src/DebugUtils/DbgEventSource.cs
new file mode 100644
index 00000000..409f2147
--- /dev/null
+++ b/Crow/src/DebugUtils/DbgEventSource.cs
@@ -0,0 +1,34 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using System.Runtime.CompilerServices;
+
+namespace Crow
+{
+	//base class for both events and widgetRecord having an event list
+	public abstract class DbgEventSource : IValueChange
+	{
+		public event EventHandler<ValueChangeEventArgs> ValueChanged;
+		public virtual void NotifyValueChanged (string MemberName, object _value)
+			=> ValueChanged.Raise (this, new ValueChangeEventArgs (MemberName, _value));
+		public void NotifyValueChangedAuto (object _value, [CallerMemberName] string caller = null)
+			=> NotifyValueChanged (caller, _value);
+
+		//flattened event list of this widget
+		public List<DbgEvent> Events;
+		public virtual long Duration {
+			get {
+				if (Events == null)
+					return 0;
+				long tot = 0;
+				foreach (DbgEvent e in Events) 
+					tot += e.Duration;
+				return tot;
+			}
+		}
+
+
+	}
+}
\ No newline at end of file
diff --git a/Crow/src/debug/DbgEventTypeColors.cs b/Crow/src/DebugUtils/DbgEventTypeColors.cs
similarity index 96%
rename from Crow/src/debug/DbgEventTypeColors.cs
rename to Crow/src/DebugUtils/DbgEventTypeColors.cs
index 3be2c209..d2871904 100644
--- a/Crow/src/debug/DbgEventTypeColors.cs
+++ b/Crow/src/DebugUtils/DbgEventTypeColors.cs
@@ -8,7 +8,7 @@ using System.Linq;
 
 namespace Crow
 {
-	public class DbgEventTypeColors : Widget
+	/*public class DbgEventTypeColors : Widget
 	{
 		protected override void onDraw (Context gr)
 		{
@@ -49,6 +49,6 @@ namespace Crow
 
 			}
 		}
-	}
+	}*/
 }
 
diff --git a/Crow/src/DebugUtils/DbgEventWidget (copie).cs b/Crow/src/DebugUtils/DbgEventWidget (copie).cs
new file mode 100644
index 00000000..c7892a9b
--- /dev/null
+++ b/Crow/src/DebugUtils/DbgEventWidget (copie).cs	
@@ -0,0 +1,87 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using Crow.Cairo;
+#if DEBUG_LOG
+namespace Crow
+{
+	/*
+	/// <summary>
+	/// Compressed event list without gaps
+	/// </summary>
+	public class DbgEventListWidget : Widget
+	{
+		public DbgEventListWidget (){}
+
+		DbgWidgetRecord wRec;
+		public DbgWidgetRecord WidgetRecord {
+			get => wRec;
+			set {
+				if (wRec == value)
+					return;
+				wRec = value;
+				pixelPerTick = WidgetRecord == null ? 0 : (double)ClientRectangle.Width / WidgetRecord.Duration;
+				NotifyValueChangedAuto (wRec);
+				RegisterForRedraw ();
+			}
+		}
+
+		double pixelPerTick;
+
+		public override void OnLayoutChanges (LayoutingType layoutType)
+		{
+			if (layoutType == LayoutingType.Width)
+				pixelPerTick = WidgetRecord == null ? 0 : (double)ClientRectangle.Width / WidgetRecord.Duration;
+			base.OnLayoutChanges (layoutType);
+		}
+
+		protected override void onDraw (Context gr)
+		{
+			if (WidgetRecord == null || WidgetRecord.Duration == 0) {
+				base.onDraw (gr);
+				return;
+			}
+
+			Rectangle cb = ClientRectangle;
+
+			drawEvent (gr, cb.Height, WidgetRecord);
+		}
+		void drawEvent (Context ctx, int h, DbgEvent dbge)
+		{
+			double w = dbge.Duration == 0 ? 1.0 : dbge.Duration * pixelPerTick;
+			double x = (dbge.begin - WidgetRecord.begin) * pixelPerTick;
+
+			ctx.Rectangle (x, Margin, w, h);
+			ctx.SetSource (dbge.Color);
+			ctx.Fill ();
+			if (dbge.Events == null)
+				return;
+			foreach (DbgEvent e in dbge.Events)
+				drawEvent (ctx, h, e);
+		}
+
+		public override void onMouseMove (object sender, MouseMoveEventArgs e)
+		{
+			if (WidgetRecord != null) {
+				Point m = ScreenPointToLocal (e.Position);
+				long curTick = (long)(m.X / pixelPerTick) + WidgetRecord.begin;
+				NotifyValueChanged ("HoverEvent", hoverEvent (WidgetRecord, curTick));
+				e.Handled = true;
+			}
+			base.onMouseMove (sender, e);
+		}
+
+		DbgEvent hoverEvent (DbgEvent hevt, long curTick){
+			if (hevt.Events != null) {
+				foreach (DbgEvent e in hevt.Events) {
+					if (curTick >= e.begin && curTick <= e.end)
+						return hoverEvent (e, curTick);
+				}
+			}
+			return hevt;
+		}
+	}*/
+}
+#endif
\ No newline at end of file
diff --git a/Crow/src/DebugUtils/DbgWidgetRecord.cs b/Crow/src/DebugUtils/DbgWidgetRecord.cs
new file mode 100644
index 00000000..8aaf1c47
--- /dev/null
+++ b/Crow/src/DebugUtils/DbgWidgetRecord.cs
@@ -0,0 +1,50 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using System.Linq;
+
+namespace Crow
+{
+	/// <summary>
+	/// Recorded Widget instance data.
+	/// </summary>
+	public class DbgWidgetRecord : DbgEventSource
+	{
+		public DbgWidgetRecord ()
+		{
+			 Events = new List<DbgEvent> ();
+		}
+		public int listIndex;//prevent doing an IndexOf on list for each event to know y pos on screen
+							 //public int instanceNum;//class instantiation order, used to bind events to objs
+		public string name;
+		//0 is the main graphic tree, for other obj tree not added to main tree, it range from 1->n
+		//useful to track events for obj shown later, not on start
+		public int treeIndex;
+		public int yIndex;//index in parenting, the whole main graphic tree is one continuous suite
+		public int xLevel;//depth
+		public String Width;
+		public String Height;
+
+		public static DbgWidgetRecord Parse (string str)
+		{
+			DbgWidgetRecord g = new DbgWidgetRecord ();
+			if (str == null)
+				return null;
+			string [] tmp = str.Trim ().Split (';');
+			g.name = tmp [0];
+			g.yIndex = int.Parse (tmp [1]);
+			g.xLevel = int.Parse (tmp [2]);
+			g.Width = tmp [3];
+			g.Height = tmp [4];
+			return g;
+		}
+
+		public List<DbgWidgetEvent> RootEvents => Events.OfType<DbgWidgetEvent> ().Where (
+			e => (e.parentEvent != null && !e.parentEvent.type.HasFlag (DbgEvtType.Widget)) ||
+			(e.parentEvent is DbgWidgetEvent w && w.InstanceIndex != e.InstanceIndex)).ToList();
+
+		public override string ToString () => $"{name}";
+	}
+}
\ No newline at end of file
diff --git a/Crow/src/debug/DebugLogger.cs b/Crow/src/DebugUtils/DebugLogger.cs
similarity index 98%
rename from Crow/src/debug/DebugLogger.cs
rename to Crow/src/DebugUtils/DebugLogger.cs
index 1c188737..ecb9dbd1 100644
--- a/Crow/src/debug/DebugLogger.cs
+++ b/Crow/src/DebugUtils/DebugLogger.cs
@@ -62,6 +62,7 @@ namespace Crow
 		GORegisterLayouting 			= Layouting | Widget | 0x01,
 		GOProcessLayouting				= Layouting | Widget | 0x02,
 		GOProcessLayoutingWithNoParent 	= Layouting | Widget | Warning | 0x01,
+		GOMeasure						= Widget | 0x03,
 		GODraw							= Drawing | Widget | 0x01,
 		GORecreateCache					= Drawing | Widget | 0x02,
 		GOUpdateCache					= Drawing | Widget | 0x03,
@@ -235,7 +236,7 @@ namespace Crow
 						//Widget.GraphicObjects = Widget.GraphicObjects.OrderBy (o => o.yIndex).ToList ();
 						for (int i = 0; i < Widget.GraphicObjects.Count; i++) {
 							Widget g = Widget.GraphicObjects [i];
-							s.WriteLine ($"{g.GetType ().Name};{g.yIndex};{g.xLevel}");
+							s.WriteLine ($"{g.GetType ().Name};{g.yIndex};{g.xLevel};{g.Width};{g.Height}");
 						}
 					}
 					s.WriteLine ("[Events]");
diff --git a/Crow/src/DebugUtils/Utils.cs b/Crow/src/DebugUtils/Utils.cs
new file mode 100644
index 00000000..ce3d5c38
--- /dev/null
+++ b/Crow/src/DebugUtils/Utils.cs
@@ -0,0 +1,29 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Diagnostics;
+using System.Runtime.CompilerServices;
+
+namespace Crow
+{
+	public static class Logger
+	{
+		[Flags]
+		public enum LogType
+		{
+			Info		= 1,
+			Warning		= 2,
+			Error		= 4,
+		}
+
+		public static LogType CurrentLogLevel = LogType.Error;
+
+		static Stopwatch timer = Stopwatch.StartNew ();
+
+
+		public static void LOG(string message = null, [CallerMemberName] string caller = null) {
+			Console.WriteLine ($"{timer.ElapsedMilliseconds, 10} {caller}: {message}");
+		}
+	}
+}
diff --git a/Crow/src/EventArgs/SelectionChangeEventArgs.cs b/Crow/src/EventArgs/SelectionChangeEventArgs.cs
index 988a6975..a2097f12 100644
--- a/Crow/src/EventArgs/SelectionChangeEventArgs.cs
+++ b/Crow/src/EventArgs/SelectionChangeEventArgs.cs
@@ -1,28 +1,6 @@
-//
-// SelectionChangeEventArgs.cs
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
 //
-// Author:
-//       Jean-Philippe Bruyère <jp.bruyere@hotmail.com>
-//
-// Copyright (c) 2013-2017 Jean-Philippe Bruyère
-//
-// Permission is hereby granted, free of charge, to any person obtaining a copy
-// of this software and associated documentation files (the "Software"), to deal
-// in the Software without restriction, including without limitation the rights
-// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-// copies of the Software, and to permit persons to whom the Software is
-// furnished to do so, subject to the following conditions:
-//
-// The above copyright notice and this permission notice shall be included in
-// all copies or substantial portions of the Software.
-//
-// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-// THE SOFTWARE.
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
 
 using System;
 
@@ -32,7 +10,6 @@ namespace Crow
 	{		
 		public object NewValue;
 
-
 		public SelectionChangeEventArgs (object _newValue) : base()
 		{
 			NewValue = _newValue;
diff --git a/Crow/src/EventArgs/TreeExpandEventArg.cs b/Crow/src/EventArgs/TreeExpandEventArg.cs
new file mode 100644
index 00000000..7641aa5d
--- /dev/null
+++ b/Crow/src/EventArgs/TreeExpandEventArg.cs
@@ -0,0 +1,18 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+namespace Crow
+{
+	public class TreeExpandEventArg : EventArgs
+	{
+		/// <summary>
+		/// Source of the expand/collapse event
+		/// </summary>
+		public Expandable SourceWidget;
+		public TreeExpandEventArg (Expandable sourceWidget)
+		{
+
+		}
+	}
+}
diff --git a/Crow/src/Fill/SolidColor.cs b/Crow/src/Fill/SolidColor.cs
index 3fb1d452..efccd399 100644
--- a/Crow/src/Fill/SolidColor.cs
+++ b/Crow/src/Fill/SolidColor.cs
@@ -1,28 +1,6 @@
-//
-// SolidColor.cs
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
 //
-// Author:
-//       Jean-Philippe Bruyère <jp.bruyere@hotmail.com>
-//
-// Copyright (c) 2013-2017 Jean-Philippe Bruyère
-//
-// Permission is hereby granted, free of charge, to any person obtaining a copy
-// of this software and associated documentation files (the "Software"), to deal
-// in the Software without restriction, including without limitation the rights
-// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-// copies of the Software, and to permit persons to whom the Software is
-// furnished to do so, subject to the following conditions:
-//
-// The above copyright notice and this permission notice shall be included in
-// all copies or substantial portions of the Software.
-//
-// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-// THE SOFTWARE.
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
 
 using System;
 using System.Collections.Generic;
diff --git a/Crow/src/IML/Instantiator.cs b/Crow/src/IML/Instantiator.cs
index 2f9aa94a..7bf27b28 100644
--- a/Crow/src/IML/Instantiator.cs
+++ b/Crow/src/IML/Instantiator.cs
@@ -1563,7 +1563,15 @@ namespace Crow.IML {
 			if (t != null) {
 				knownGOTypes.Add (typeName, t);
 				return t;
-			}			
+			}
+
+			foreach (Type expT in Assembly.GetEntryAssembly ().GetExportedTypes ()) {
+				if (expT.Name != typeName)
+					continue;
+				knownGOTypes.Add (typeName, expT);
+				return expT;
+			}
+
 			foreach (Assembly a in Interface.crowAssemblies) {
 				foreach (Type expT in a.GetExportedTypes ()) {
 					if (expT.Name != typeName)
diff --git a/Crow/src/Interface.cs b/Crow/src/Interface.cs
index 87e8a1f1..520899fd 100644
--- a/Crow/src/Interface.cs
+++ b/Crow/src/Interface.cs
@@ -1293,7 +1293,6 @@ namespace Crow
 
 		protected void initTooltip ()
 		{
-			ToolTipContainer = CreateInstance ("#Crow.Tooltip.template");
 			Thread t = new Thread (toolTipThreadFunc);
 			t.IsBackground = true;
 			t.Start ();
@@ -1306,6 +1305,12 @@ namespace Crow
 						Widget g = _hoverWidget;
 						while (g != null) {
 							if (!string.IsNullOrEmpty (g.Tooltip)) {
+								if (g.Tooltip.StartsWith("#", StringComparison.Ordinal)) {
+									//custom tooltip container
+									ToolTipContainer = CreateInstance (g.Tooltip);
+								} else
+									ToolTipContainer = CreateInstance ("#Crow.Tooltip.template");
+								ToolTipContainer.LayoutChanged += ToolTipContainer_LayoutChanged;
 								AddWidget (ToolTipContainer);
 								ToolTipContainer.DataSource = g;
 								ToolTipContainer.Top = MousePosition.Y + 10;
@@ -1324,12 +1329,42 @@ namespace Crow
 		void resetTooltip ()
 		{
 			if (tooltipVisible) {
-				//ToolTipContainer.DataSource = null;
+				ToolTipContainer.LayoutChanged -= ToolTipContainer_LayoutChanged;
+				ToolTipContainer.DataSource = null;
 				RemoveWidget (ToolTipContainer);
 				tooltipVisible = false;
+				ToolTipContainer.Dispose ();
+				ToolTipContainer = null;
 			}
 			tooltipTimer.Restart ();
 		}
+		void ToolTipContainer_LayoutChanged (object sender, LayoutingEventArgs e)
+		{
+			Widget ttc = sender as Widget;
+			//tooltip container datasource is the widget triggering the tooltip
+			Rectangle r = ScreenCoordinates ((ttc.DataSource as Widget).Slot);
+
+			if (e.LayoutType == LayoutingType.X) {
+					if (ttc.Slot.Right > clientRectangle.Right)
+						ttc.Left = clientRectangle.Right - ttc.Slot.Width;
+			}/* else if (e.LayoutType == LayoutingType.Y) {
+				if (ttc.Slot.Height < tc.ClientRectangle.Height) {
+					if (PopDirection.HasFlag (Alignment.Bottom)) {
+						if (r.Bottom + ttc.Slot.Height > tc.ClientRectangle.Bottom)
+							ttc.Top = r.Top - ttc.Slot.Height;
+						else
+							ttc.Top = r.Bottom;
+					} else if (PopDirection.HasFlag (Alignment.Top)) {
+						if (r.Top - ttc.Slot.Height < tc.ClientRectangle.Top)
+							ttc.Top = r.Bottom;
+						else
+							ttc.Top = r.Top - ttc.Slot.Height;
+					} else
+						ttc.Top = r.Top;
+				} else
+					ttc.Top = 0;
+			}*/
+		}
 		#endregion
 
 		#region Contextual menu
diff --git a/Crow/src/LayoutingQueueItem.cs b/Crow/src/LayoutingQueueItem.cs
index 4fc22d1a..86d3e9e7 100644
--- a/Crow/src/LayoutingQueueItem.cs
+++ b/Crow/src/LayoutingQueueItem.cs
@@ -103,6 +103,7 @@ namespace Crow
 			}
 			#if DEBUG_LOG
 			DbgLogger.StartEvent (DbgEvtType.GOProcessLayouting, this);
+			Slot = graphicObject.Slot;
 			#endif
 			LayoutingTries++;
 			if (!Layoutable.UpdateLayout (LayoutType)) {
@@ -131,7 +132,6 @@ namespace Crow
 			else{
 				result = Result.Success;
 			}
-			Slot = graphicObject.LastSlots;
 			NewSlot = graphicObject.Slot;
 			(DbgLogger.EndEvent (DbgEvtType.GOProcessLayouting) as DbgLayoutEvent).SetLQI (this);
 			#endif
diff --git a/Crow/src/Widgets/Expandable.cs b/Crow/src/Widgets/Expandable.cs
index e0b3c72a..4cb0a2b4 100644
--- a/Crow/src/Widgets/Expandable.cs
+++ b/Crow/src/Widgets/Expandable.cs
@@ -1,32 +1,9 @@
-//
-// Expandable.cs
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
 //
-// Author:
-//       Jean-Philippe Bruyère <jp.bruyere@hotmail.com>
-//
-// Copyright (c) 2013-2017 Jean-Philippe Bruyère
-//
-// Permission is hereby granted, free of charge, to any person obtaining a copy
-// of this software and associated documentation files (the "Software"), to deal
-// in the Software without restriction, including without limitation the rights
-// to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
-// copies of the Software, and to permit persons to whom the Software is
-// furnished to do so, subject to the following conditions:
-//
-// The above copyright notice and this permission notice shall be included in
-// all copies or substantial portions of the Software.
-//
-// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-// IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-// FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-// AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-// LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
-// OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
-// THE SOFTWARE.
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
 
 using System;
 using System.ComponentModel;
-using System.Xml.Serialization;
 
 namespace Crow
 {
diff --git a/Crow/src/Widgets/Group.cs b/Crow/src/Widgets/Group.cs
index 419479b5..df452bee 100644
--- a/Crow/src/Widgets/Group.cs
+++ b/Crow/src/Widgets/Group.cs
@@ -81,7 +81,7 @@ namespace Crow
 
 			childrenRWLock.ExitWriteLock();
 
-			g.RegisteredLayoutings = LayoutingType.None;
+			//g.RegisteredLayoutings = LayoutingType.None;
 			g.LayoutChanged += OnChildLayoutChanges;
 			g.RegisterForLayouting (LayoutingType.Sizing | LayoutingType.ArrangeChildren);
 		}
@@ -214,6 +214,24 @@ namespace Crow
 
 			return tmp;
 		}
+		public override Widget FindByType<T> ()
+		{
+			if (this is T)
+				return this;
+			Widget tmp = null;
+
+			childrenRWLock.EnterReadLock ();
+
+			foreach (Widget w in Children) {
+				tmp = w.FindByType<T> ();
+				if (tmp != null)
+					break;
+			}
+
+			childrenRWLock.ExitReadLock ();
+
+			return tmp;
+		}
 		public override bool Contains (Widget goToFind)
 		{
 			foreach (Widget w in Children) {
diff --git a/Crow/src/Widgets/ListItem.cs b/Crow/src/Widgets/ListItem.cs
new file mode 100644
index 00000000..2ed49291
--- /dev/null
+++ b/Crow/src/Widgets/ListItem.cs
@@ -0,0 +1,42 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.ComponentModel;
+
+namespace Crow
+{
+	/// <summary>
+	/// Top container to use as ItemTemplate's root for TemplatedGroups (lists, treeviews, ...) that add selection
+	/// status and events
+	/// </summary>
+	public class ListItem : Container
+	{
+		#region CTOR
+		public ListItem (){}
+		public ListItem (Interface iface, string style = null) : base (iface, style) { }
+		#endregion
+
+		bool isSelected;
+
+		public event EventHandler Selected;
+		public event EventHandler Unselected;
+
+		[DefaultValue (false)]
+		public virtual bool IsSelected {
+			get { return isSelected; }
+			set {
+				if (isSelected == value)
+					return;
+				isSelected = value;
+
+				if (isSelected)
+					Selected.Raise (this, null);
+				else
+					Unselected.Raise (this, null);
+
+				NotifyValueChangedAuto (isSelected);
+			}
+		}
+	}
+}
diff --git a/Crow/src/Widgets/PrivateContainer.cs b/Crow/src/Widgets/PrivateContainer.cs
index 4972ab96..c8e3dfdb 100644
--- a/Crow/src/Widgets/PrivateContainer.cs
+++ b/Crow/src/Widgets/PrivateContainer.cs
@@ -81,6 +81,13 @@ namespace Crow
 
 			return child == null ? null : child.FindByName (nameToFind);
 		}
+		public override Widget FindByType<T> ()
+		{
+			if (this is T)
+				return this;
+
+			return child == null ? null : child.FindByType<T> ();
+		}
 		public override bool Contains (Widget goToFind)
 		{
 			return child == goToFind ? true : 
diff --git a/Crow/src/Widgets/TemplatedContainer.cs b/Crow/src/Widgets/TemplatedContainer.cs
index 31039f45..b607ff91 100644
--- a/Crow/src/Widgets/TemplatedContainer.cs
+++ b/Crow/src/Widgets/TemplatedContainer.cs
@@ -60,6 +60,13 @@ namespace Crow
 
 			return Content == null ? null : Content.FindByName (nameToFind);
 		}
+		public override Widget FindByType<T> ()
+		{
+			if (this is T)
+				return this;
+
+			return Content == null ? null : Content.FindByType<T> ();
+		}
 		public override bool Contains (Widget goToFind)
 		{
 			if (Content == goToFind)
diff --git a/Crow/src/Widgets/TemplatedControl.cs b/Crow/src/Widgets/TemplatedControl.cs
index b2081312..e700513e 100644
--- a/Crow/src/Widgets/TemplatedControl.cs
+++ b/Crow/src/Widgets/TemplatedControl.cs
@@ -79,6 +79,7 @@ namespace Crow
 		/// <returns>widget identified by name, or null if not found</returns>
 		/// <param name="nameToFind">widget's name to find</param>
 		public override Widget FindByName (string nameToFind) => nameToFind == this.Name ? this : null;
+		public override Widget FindByType<T> () => this is TemplatedControl ? this : null;
 		public Widget FindByNameInTemplate (string nameToFind) => child?.FindByName (nameToFind);
 		/// <summary>
 		///onDraw is overrided to prevent default drawing of background, template top container
diff --git a/Crow/src/Widgets/TemplatedGroup.cs b/Crow/src/Widgets/TemplatedGroup.cs
index 416be311..f4e63f43 100644
--- a/Crow/src/Widgets/TemplatedGroup.cs
+++ b/Crow/src/Widgets/TemplatedGroup.cs
@@ -8,6 +8,7 @@ using System.Collections.Generic;
 using System.ComponentModel;
 using System.Linq;
 using System.Threading;
+using Crow.Cairo;
 using Crow.IML;
 
 namespace Crow {
@@ -41,13 +42,14 @@ namespace Crow {
 
 		#region events
 		public event EventHandler<SelectionChangeEventArgs> SelectedItemChanged;
+		/// <summary>
+		/// raised when root widget of item template is a 'ListItem' and this item is selected.
+		/// </summary>
+		public event EventHandler<SelectionChangeEventArgs> SelectedItemContainerChanged;
 		public event EventHandler Loaded;
 		#endregion
 
 		IEnumerable data;
-		int _selectedIndex = -1;
-		Color selBackground, selForeground;
-		bool selColoring;
 
 		int itemPerPage = 50;
 		CrowThread loadingThread = null;
@@ -121,56 +123,23 @@ namespace Crow {
 				: items.Children;
 			}
 		}
-		/// <summary>
-		/// Enable SelectionBackground and SelectionForeground color for selected item
-		/// </summary>
-		[DefaultValue (false)]
-		public bool SelectionColoring {
-			get => selColoring;
-			set {
-				if (selColoring == value)
-					return;
-				selColoring = value;
-				NotifyValueChangedAuto (selColoring);
-			}
-		}
-		[DefaultValue(-1)]public virtual int SelectedIndex{
-			get { return _selectedIndex; }
-			set {
-				if (value == _selectedIndex)
-					return;
 
-				if (selColoring && _selectedIndex >= 0 && Items.Count > _selectedIndex) {
-					Items[_selectedIndex].Foreground = Colors.Transparent;
-					Items[_selectedIndex].Background = Colors.Transparent;
-				}
-
-				_selectedIndex = value;
+		object selectedItem;
+		Widget selectedItemContainer = null;
 
-				if (selColoring && _selectedIndex >= 0 && Items.Count > _selectedIndex) {
-					Items[_selectedIndex].Foreground = SelectionForeground;
-					Items[_selectedIndex].Background = SelectionBackground;
-				}
-
-				NotifyValueChangedAuto (_selectedIndex);
-				NotifyValueChanged ("SelectedItem", SelectedItem);
-				SelectedItemChanged.Raise (this, new SelectionChangeEventArgs (SelectedItem));
-			}
-		}
 		[XmlIgnore]public virtual object SelectedItem{
-			get { return data == null ? null : _selectedIndex < 0 ? data.GetDefaultValue() : data is IList tmp ? tmp[_selectedIndex] : null; }
+			get => selectedItem;
 			set {
-				if (data == null) {
-					SelectedIndex = -1;
-					return;
-				}
-				//TODO:double check if value type will be notified to binding sys
-				if (value == SelectedItem)
+				if (SelectedItem == value)
 					return;
-				
-				SelectedIndex = (int)((IList)data)?.IndexOf (value);
+					
+				selectedItem = value;
+
+				NotifyValueChanged ("SelectedItem", SelectedItem);
+				SelectedItemChanged.Raise (this, new SelectionChangeEventArgs (SelectedItem));
 			}
 		}
+
 		[XmlIgnore]public bool HasItems {
 			get { return Items.Count > 0; }
 		}
@@ -210,9 +179,8 @@ namespace Crow {
 				loadingThread.Finished += (object sender, EventArgs e) => (sender as TemplatedGroup).Loaded.Raise (sender, e);
 				loadingThread.Start ();
 
-				NotifyValueChanged ("SelectedIndex", _selectedIndex);
-				NotifyValueChanged ("SelectedItem", SelectedItem);
-				SelectedItemChanged.Raise (this, new SelectionChangeEventArgs (SelectedItem));
+				//NotifyValueChanged ("SelectedIndex", _selectedIndex);
+				//NotifyValueChanged ("SelectedItem", SelectedItem);
 				NotifyValueChanged ("HasItems", HasItems);
 			}
 		}
@@ -245,28 +213,6 @@ namespace Crow {
 
 		}
 
-		[DefaultValue("SteelBlue")]
-		public virtual Color SelectionBackground {
-			get { return selBackground; }
-			set {
-				if (value == selBackground)
-					return;
-				selBackground = value;
-				NotifyValueChangedAuto (selBackground);
-				RegisterForRedraw ();
-			}
-		}
-		[DefaultValue("White")]
-		public virtual Color SelectionForeground {
-			get { return selForeground; }
-			set {
-				if (value == selForeground)
-					return;
-				selForeground = value;
-				NotifyValueChangedAuto (selForeground);
-				RegisterForRedraw ();
-			}
-		}
 
 		protected void raiseSelectedItemChanged(){
 			SelectedItemChanged.Raise (this, new SelectionChangeEventArgs (SelectedItem));
@@ -288,9 +234,8 @@ namespace Crow {
 
 		public virtual void ClearItems()
 		{
-			_selectedIndex = -1;
-			NotifyValueChanged ("SelectedIndex", _selectedIndex);
-			NotifyValueChanged ("SelectedItem", null);
+			selectedItemContainer = null;
+			SelectedItem = null;
 
 			items.ClearChildren ();
 			NotifyValueChanged ("HasChildren", false);
@@ -310,6 +255,18 @@ namespace Crow {
 			}
 			return null;
 		}
+		public override Widget FindByType<T> ()
+		{
+			if (this is T)
+				return this;
+
+			foreach (Widget w in Items) {
+				Widget r = w.FindByType<T> ();
+				if (r != null)
+					return r;
+			}
+			return null;
+		}
 		public override bool Contains (Widget goToFind)
 		{
 			foreach (Widget w in Items) {
@@ -487,18 +444,32 @@ namespace Crow {
 				g.MouseClick += itemClick;
 			Monitor.Exit (IFace.LayoutMutex);
 
-			if (iTemp.Expand != null && g is Expandable) {
+			if (iTemp.Expand != null) {
 				Expandable e = g as Expandable;
-				e.Expand += iTemp.Expand;
-				if ((o as ICollection) == null)
-					e.GetIsExpandable = new BooleanTestOnInstance((instance) => true);
-				else
-					e.GetIsExpandable = iTemp.HasSubItems;
+				if (e == null)
+					e = g.FindByType<Expandable> () as Expandable;
+					
+				if (e != null) { 
+					e.Expand += iTemp.Expand;
+					if ((o as ICollection) == null)
+						e.GetIsExpandable = new BooleanTestOnInstance ((instance) => true);
+					else
+						e.GetIsExpandable = iTemp.HasSubItems;
+				}
+			}
+
+			if (g is ListItem li) {
+				li.Selected += Li_Selected;
 			}
 
 			g.DataSource = o;
 		}
 
+		//void expandable_expandevent (object sender, EventHandler )
+		void Li_Selected (object sender, EventArgs e)
+		{
+			SelectedItemContainerChanged.Raise (this, new SelectionChangeEventArgs (sender));
+		}
 
 		//		protected void _list_LayoutChanged (object sender, LayoutingEventArgs e)
 		//		{
@@ -531,7 +502,15 @@ namespace Crow {
 		}
 		internal virtual void itemClick(object sender, MouseButtonEventArgs e){
 			//SelectedIndex = (int)((IList)data)?.IndexOf((sender as Widget).DataSource);
-			SelectedIndex = items.Children.IndexOf(sender as Widget);
+			if (selectedItemContainer is ListItem li)
+				li.IsSelected = false;
+			selectedItemContainer = sender as Widget;
+			if (selectedItemContainer is ListItem nli)
+				nli.IsSelected = true;
+			if (selectedItemContainer == null)
+				return;
+			SelectedItem = selectedItemContainer.DataSource;
+			//SelectedIndex = items.Children.IndexOf(sender as Widget);
 		}
 
 		bool emitHelperIsAlreadyExpanded (Widget go){
diff --git a/Crow/src/Widgets/TreeView.cs b/Crow/src/Widgets/TreeView.cs
index e150ef86..2bcdfd8a 100644
--- a/Crow/src/Widgets/TreeView.cs
+++ b/Crow/src/Widgets/TreeView.cs
@@ -11,7 +11,6 @@ namespace Crow
 	//if their are expandable, some functions and events are added
 	public class TreeView : TemplatedGroup
 	{
-		Widget selectedItemContainer = null;
 		bool isRoot;
 
 		#region CTOR
@@ -29,28 +28,7 @@ namespace Crow
 				NotifyValueChangedAuto (isRoot);
 			}
 		}
-		[XmlIgnore]public override object SelectedItem {
-			get {
-				return selectedItemContainer == null ?
-					"" : selectedItemContainer.DataSource;
-			}
-		}
 
-		internal override void itemClick (object sender, MouseButtonEventArgs e)
-		{
-			Widget tmp = sender as Widget;
-			//if (!tmp.HasFocus)
-			//	return;
-			/*if (selectedItemContainer != null) {
-				selectedItemContainer.Foreground = Color.Transparent;
-				selectedItemContainer.Background = Color.Transparent;
-			}*/
-			selectedItemContainer = tmp;
-			//selectedItemContainer.Foreground = SelectionForeground;
-			//selectedItemContainer.Background = SelectionBackground;
-			NotifyValueChanged ("SelectedItem", SelectedItem);
-			raiseSelectedItemChanged ();
-		}
 
 		void onExpandAll_MouseClick (object sender, MouseButtonEventArgs e)
 		{
diff --git a/Crow/src/Widgets/Widget.cs b/Crow/src/Widgets/Widget.cs
index 0ca6e92a..b93e9868 100644
--- a/Crow/src/Widgets/Widget.cs
+++ b/Crow/src/Widgets/Widget.cs
@@ -262,7 +262,7 @@ namespace Crow
 			loadDefaultValues ();
 		}
 		#region private fields
-		LayoutingType registeredLayoutings = LayoutingType.All;
+		LayoutingType registeredLayoutings;// = LayoutingType.All;
 		ILayoutable logicalParent;
 		ILayoutable parent;
 		string name;
@@ -379,6 +379,12 @@ namespace Crow
 				return cb;
 			}
 		}
+		/// <summary>
+		/// Compute rectangle position on surface of the context. It ma be the first cached surface in parenting chain,
+		/// or the top backend surface if no cached widget is part of the current widget tree.
+		/// </summary>
+		/// <returns>A new rectangle with same dimension as the input one with x and y relative to the context surface</returns>
+		/// <param name="r">A rectangle to compute the coordinate for.</param>
 		public virtual Rectangle ContextCoordinates(Rectangle r){
 			Widget go = Parent as Widget;
 			if (go == null)
@@ -387,6 +393,15 @@ namespace Crow
 				r + Parent.ClientRectangle.Position :
 				Parent.ContextCoordinates (r);
 		}
+
+		public virtual Rectangle RelativeSlot (Widget target)
+		{
+			if (this == target)
+				return Slot;
+			if (Parent is Widget p)
+				return Slot + p.RelativeSlot (target).Position + Margin;
+			return Slot + new Point(Margin, Margin);
+		}
 		public virtual Rectangle ScreenCoordinates (Rectangle r){
 			try {
 				return
@@ -465,6 +480,7 @@ namespace Crow
 		public event EventHandler<DataSourceChangeEventArgs> ParentChanged;
 		/// <summary>Occurs when the logical parent has changed</summary>
 		public event EventHandler<DataSourceChangeEventArgs> LogicalParentChanged;
+		public event EventHandler Painted;
 		#endregion
 
 		internal bool hasDoubleClick => MouseDoubleClick != null;
@@ -973,12 +989,12 @@ namespace Crow
 			get {
 				return rootDataLevel ? dataSource : dataSource == null ?
 					LogicalParent == null ? null :
-					LogicalParent is Widget ? (LogicalParent as Widget).DataSource : null :
+					LogicalParent is Widget w ? w.DataSource : null :
 					dataSource;
 			}
 		}
 		/// <summary>
-		/// If true, lock datasource seeking upward in logic or graphic tree to this widget
+		/// If true, lock datasource seeking upward in logic or graphic tree to this widget.
 		/// </summary>
 		[DesignCategory ("Data")][DefaultValue(false)]
 		public virtual bool RootDataLevel {
@@ -1023,6 +1039,17 @@ namespace Crow
 				NotifyValueChangedAuto (style);
 			}
 		}
+		/// <summary>
+		/// Gets or sets a tooltip to show when mouse stay still over the control.
+		/// </summary>
+		/// <remarks>
+		/// By default, the tooltip container widget that will be show is defined in '#Crow.Tooltip.template' and the widget
+		/// tooltip string is interpreted as a single string helper message that may be a binding expression.
+		/// If the widget Tooltip property start with a '#', the tooltip string will be interpreted as a resource path of
+		/// a custom IML template to show, which will have its datasource set to the widget triggering the tooltip.
+		/// </remarks>
+		/// <value>A single helpt string that may comes from a binding expression, or by starting with a '#',
+		/// You may provide a custom tooltip template resource path.</value>
 		[DesignCategory ("Divers")]
 		public virtual string Tooltip {
 			get { return tooltip; }
@@ -1250,6 +1277,10 @@ namespace Crow
 		public virtual Widget FindByName(string nameToFind){
 			return string.Equals(nameToFind, name, StringComparison.Ordinal) ? this : null;
 		}
+		public virtual Widget FindByType<T> ()
+		{
+			return this is T ? this : null;
+		}
 		public virtual bool Contains(Widget goToFind){
 			return false;
 		}
@@ -1442,7 +1473,7 @@ namespace Crow
 		[MethodImpl(MethodImplOptions.AggressiveInlining)]
 		public void RegisterForRedraw ()
 		{
-#if DEBUG
+#if DEBUG_LOG
 			if (disposed) {
 				DbgLogger.AddEvent (DbgEvtType.GORegisterForRedraw | DbgEvtType.AlreadyDisposed, this);
 				return;
@@ -1458,6 +1489,9 @@ namespace Crow
 
 		/// <summary> return size of content + margins </summary>
 		public virtual int measureRawSize (LayoutingType lt) {
+#if DEBUG_LOG
+			DbgLogger.AddEvent(DbgEvtType.GOMeasure, this);
+#endif
 			return lt == LayoutingType.Width ?
 				contentSize.Width + 2 * margin: contentSize.Height + 2 * margin;
 		}
@@ -1766,11 +1800,10 @@ namespace Crow
 
 			Rectangle rb = Slot + Parent.ClientRectangle.Position;
 			if (clearBackground) {
-					ctx.Save ();
-					ctx.Operator = Operator.Clear;
-					ctx.Rectangle (rb);
-					ctx.Fill ();
-					ctx.Restore ();
+				ctx.Operator = Operator.Clear;
+				ctx.Rectangle (rb);
+				ctx.Fill ();
+				ctx.Operator = Operator.Over;
 			}
 
 			ctx.SetSourceSurface (bmp, rb.X, rb.Y);
@@ -1835,6 +1868,7 @@ namespace Crow
 				}
 				LastPaintedSlot = Slot;
 			}
+			Painted.Raise (this, null);
 		}
 		void paintDisabled(Context gr, Rectangle rb){
 			gr.Operator = Operator.Xor;
diff --git a/Samples/BasicTests/BasicTests.cs b/Samples/BasicTests/BasicTests.cs
index bfebafcd..2e42052a 100644
--- a/Samples/BasicTests/BasicTests.cs
+++ b/Samples/BasicTests/BasicTests.cs
@@ -39,7 +39,8 @@ namespace tests
 			//testFiles = new string [] { @"Interfaces/TemplatedControl/testEnumSelector.crow" };
 			//testFiles = new string [] { @"Interfaces/Divers/all.crow" };
 			//testFiles = new string [] { @"Interfaces/Divers/gauge.crow" };
-			testFiles = new string [] { @"Interfaces/Divers/testSlider.crow" };
+			//testFiles = new string [] { @"Interfaces/Stack/StretchedInFit4.crow" };
+			testFiles = new string [] { @"Interfaces/TemplatedGroup/1.crow" };
 			//testFiles = new string [] { @"Interfaces/Divers/colorPicker2.crow" };
 			testFiles = testFiles.Concat (Directory.GetFiles (@"Interfaces/GraphicObject", "*.crow")).ToArray ();
 			testFiles = testFiles.Concat (Directory.GetFiles (@"Interfaces/Container", "*.crow")).ToArray ();
@@ -69,18 +70,20 @@ namespace tests
 					Quit ();
 					break;
 				case Key.F2:
+					//if (IsKeyDown (Key.LeftShift))
+						//DbgLogger.Reset ();
+					//DbgLogger.save (this);
+					return false;
+				case Key.F3:
 					idx--;
 					break;
-				case Key.F3:
+				case Key.F4:
 					idx++;
 					break;
 				case Key.F1:
 					//TestList.Add ("new string");
 					NotifyValueChanged ("TestList", TestList);
 					break;
-				case Key.F4:
-					Load ("Interfaces/TemplatedContainer/testWindow.goml").DataSource = this;
-					return false;
 				case Key.F5:
 					Load ("Interfaces/Divers/testFileDialog.crow").DataSource = this;
 					return false;
diff --git a/Samples/DebugLogAnalyzer/DbgEventWidget.cs b/Samples/DebugLogAnalyzer/DbgEventWidget.cs
new file mode 100644
index 00000000..1528e205
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/DbgEventWidget.cs
@@ -0,0 +1,143 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using System.ComponentModel;
+using Crow.Cairo;
+
+namespace Crow
+{
+	public class DbgEventWidget : Widget
+	{
+		public DbgEventWidget (){}
+
+		DbgEvent evt, hoverEvt;
+		long ticksPerPixel;
+		double pixelPerTick;
+
+		public DbgEvent Event {
+			get => evt;
+			set {
+				if (evt == value)
+					return;
+				evt = value;
+				updatePixelPerTicks ();
+				NotifyValueChangedAuto (evt);
+				RegisterForRedraw ();
+			}
+		}
+		public DbgEvent HoverEvent {
+			get => hoverEvt;
+			private set {
+				if (hoverEvt == value)
+					return;
+				hoverEvt = value;
+				NotifyValueChangedAuto (hoverEvt);
+			}
+		}
+
+		[DefaultValue ("1000")]
+		public long TicksPerPixel {
+			get => ticksPerPixel;
+			set {
+				if (ticksPerPixel == value)
+					return;
+				ticksPerPixel = value;
+				NotifyValueChangedAuto (ticksPerPixel);
+				if (Width == Measure.Fit)
+					RegisterForLayouting (LayoutingType.Width);
+			}
+		}
+
+		public override int measureRawSize (LayoutingType lt)
+		{
+			updatePixelPerTicks ();
+			if (lt == LayoutingType.Width)
+				contentSize.Width = Event == null ? 0 : (int)Math.Max(pixelPerTick * Event.Duration, 2);
+			
+			return base.measureRawSize (lt);
+		}
+
+		public override void OnLayoutChanges (LayoutingType layoutType)
+		{
+			if (layoutType == LayoutingType.Width)
+				updatePixelPerTicks ();
+
+			base.OnLayoutChanges (layoutType);
+		}
+
+		protected override void onDraw (Context gr)
+		{
+			if (Event == null) {
+				base.onDraw (gr);
+				return;
+			}
+
+			gr.LineWidth = 1;
+			gr.SetDash (new double [] { 1.0, 3.0 }, 0);
+
+			Rectangle cb = ClientRectangle;
+
+			if (Event.Duration == 0) {
+				gr.SetSource (Event.Color);
+				gr.Rectangle (cb);
+				gr.Fill ();
+				return;
+			}
+
+			drawEvent (gr, cb.Height, Event);
+		}
+		void drawEvent (Context ctx, int h, DbgEvent dbge)
+		{
+			double w = Math.Max(dbge.Duration * pixelPerTick, 2.0);
+			double x = (dbge.begin - Event.begin) * pixelPerTick;
+
+			ctx.Rectangle (x, Margin, w, h);
+			ctx.SetSource (dbge.Color);
+			if (dbge.IsSelected) {
+				ctx.FillPreserve ();
+				ctx.SetSourceRGB (1, 1, 1);
+				ctx.Stroke ();
+			}else
+				ctx.Fill ();
+
+			if (dbge.Events == null)
+				return;
+			foreach (DbgEvent e in dbge.Events)
+				drawEvent (ctx, h, e);
+		}
+
+		public override void onMouseMove (object sender, MouseMoveEventArgs e)
+		{
+			if (Event != null) {
+				Point m = ScreenPointToLocal (e.Position);
+				long curTick = (long)(m.X / pixelPerTick) + Event.begin;
+				/*if (Width == Measure.Fit) 
+					NotifyValueChanged ("HoverEvent", Event);
+				else*/
+				HoverEvent = hoverEvent (Event, curTick);
+
+				e.Handled = true;
+			}
+			base.onMouseMove (sender, e);
+		}
+
+		DbgEvent hoverEvent (DbgEvent hevt, long curTick){
+			if (hevt.Events != null) {
+				foreach (DbgEvent e in hevt.Events) {
+					if (curTick >= e.begin && curTick <= e.end)
+						return hoverEvent (e, curTick);
+				}
+			}
+			return hevt;
+		}
+		void updatePixelPerTicks ()
+		{
+			if (Width == Measure.Fit)
+				pixelPerTick = 1.0 / ticksPerPixel;
+			else
+				pixelPerTick = Event == null ? 0 : (double)ClientRectangle.Width / Event.Duration;
+		}
+	}
+}
\ No newline at end of file
diff --git a/Crow/src/debug/DbgLogViewer.cs b/Samples/DebugLogAnalyzer/DbgLogViewer.cs
similarity index 77%
rename from Crow/src/debug/DbgLogViewer.cs
rename to Samples/DebugLogAnalyzer/DbgLogViewer.cs
index 57bd8e30..4b7a108a 100644
--- a/Crow/src/debug/DbgLogViewer.cs
+++ b/Samples/DebugLogAnalyzer/DbgLogViewer.cs
@@ -36,38 +36,110 @@ namespace Crow
 
 		FontExtents fe;
 
-		double xScale = 1.0/512.0, yScale = 1.0, leftMargin, topMargin = 0.0;
-		string logFile;
-		DbgWidgetRecord curWidget;
-		DbgEvent curEvent;
+		double xScale = 1.0/1024.0, yScale = 1.0, leftMargin, topMargin = 0.0;
+		DbgWidgetRecord curWidget, hoverWidget;
+		DbgEvent curEvent, hoverEvent;
 
-		List<DbgEvent> events;
-		List<DbgWidgetRecord> objs;
+		List<DbgEvent> events = new List<DbgEvent> ();
+		List<DbgWidgetRecord> widgets = new List<DbgWidgetRecord> ();
 
-		public List<DbgEvent> Events => events;
-		public List<DbgWidgetRecord> Widgets => objs;
+		public List<DbgEvent> Events {
+			get => events;
+			set {
+				if (events == value)
+					return;
+				events = value;
+				NotifyValueChanged (nameof (Events), events);
+				if (events == null)
+					return;
 
+				maxTicks = 0;
+				minTicks = long.MaxValue;
+				foreach (DbgEvent e in events) {
+					if (e.begin < minTicks)
+						minTicks = e.begin;
+					if (e.end > maxTicks)
+						maxTicks = e.end;
+				}
 
-		long currentTick = 0, selStart = -1, selEnd = -1, minTicks = 0, maxTicks = 0, visibleTicks = 0;
-		int currentLine = -1;
-		int visibleLines = 1;
-		Point mousePos;
+				visibleTicks = maxTicks - minTicks;
+				XScale = (ClientRectangle.Width - leftMargin)/visibleTicks;
+				ScrollX = 0;
+				ScrollY = 0;
 
-		public string LogFile {
-			get { return logFile; }
+				RegisterForGraphicUpdate ();
+			}
+		}
+		public List<DbgWidgetRecord> Widgets {
+			get => widgets;
 			set {
-				if (logFile == value)
+				if (widgets == value)
 					return;
-				logFile = value;
-
-				Console.WriteLine ("before load");
-				loadDebugFile ();
-				Console.WriteLine ("after load");
+				widgets = value;
+				NotifyValueChanged (nameof (Widgets), widgets);
+				updateMargins ();
+				updateMaxScrollX ();
+				updateMaxScrollY ();
+			}
+		}
+		public DbgWidgetRecord CurrentWidget {
+			get => curWidget;
+			set {
+				if (curWidget == value)
+					return;
+				curWidget = value;
+				NotifyValueChanged (nameof (CurrentWidget), curWidget);
+			}
+		}
+		public DbgEvent CurrentEvent {
+			get => curEvent;
+			set {
+				if (curEvent == value)
+					return;
+				if (curEvent != null)
+					curEvent.IsSelected = false;
+				curEvent = value;
+				if (curEvent != null) {
+					curEvent.IsSelected = true;
+					if (curEvent is DbgWidgetEvent we) {
+						//CurrentWidget = Widgets [we.InstanceIndex];
+						currentLine = we.InstanceIndex;
+					}
+					currentTick = curEvent.begin;
+					if (curEvent.begin > minTicks + ScrollX + visibleTicks ||
+						curEvent.end < minTicks + ScrollX) {
+						ScrollX = (int)(currentTick - visibleTicks / 2);
+					}
+				}
+				NotifyValueChanged (nameof (CurrentEvent), curEvent);
+				RegisterForRedraw ();
+			}
+		}
+		public DbgWidgetRecord HoverWidget {
+			get => hoverWidget;
+			internal set {
+				if (hoverWidget == value)
+					return;
+				hoverWidget = value;
+				NotifyValueChanged (nameof (HoverWidget), hoverWidget);
+			}
+		}
 
-				NotifyValueChanged ("LogFile", logFile);
-				RegisterForGraphicUpdate ();
+		public DbgEvent HoverEvent {
+			get => hoverEvent;
+			set {
+				if (hoverEvent == value)
+					return;
+				hoverEvent = value;
+				NotifyValueChanged (nameof (HoverEvent), hoverEvent);
 			}
 		}
+
+		long currentTick = 0, selStart = -1, selEnd = -1, minTicks = 0, maxTicks = 0, visibleTicks = 0;
+		int currentLine = -1;
+		int visibleLines = 1;
+		Point mousePos;
+
 		public double XScale {
 			get { return xScale; }
 			set {
@@ -99,7 +171,7 @@ namespace Crow
 
 					fe = gr.FontExtents;
 				}
-				loadDebugFile ();
+				updateMargins ();
 			}
 		}
 		public override int ScrollY {
@@ -107,7 +179,7 @@ namespace Crow
 			set {
 				base.ScrollY = value;
 
-				if (objs == null)
+				if (widgets == null)
 					return;
 
 				Rectangle cb = ClientRectangle;
@@ -125,34 +197,6 @@ namespace Crow
 			}
 		}
 
-		public DbgWidgetRecord CurrentWidget {
-			get => curWidget;
-			internal set {
-				if (curWidget == value)
-					return;
-				curWidget = value;
-				NotifyValueChanged (nameof (CurrentWidget), curWidget);
-			}
-		}
-		public DbgEvent CurrentEvent {
-			get => curEvent;
-			internal set {
-				if (curEvent == value)
-					return;
-
-				if (curEvent != null)
-					curEvent.IsSelected = false;
-				curEvent = value;
-				if (curEvent != null) {
-					curEvent.IsSelected = true;
-					curEvent.IsExpanded = true;
-				}
-
-				NotifyValueChanged (nameof (CurrentEvent), curEvent);
-			}
-		}
-
-
 		void drawEvents (Context ctx, List<DbgEvent> evts)
 		{
 			if (evts == null || evts.Count == 0)
@@ -188,7 +232,7 @@ namespace Crow
 					ctx.Rectangle (x, penY, w, fe.Height);
 					ctx.Fill ();
 				} else {
-					double x = xScale * (evt.begin - minTicks - ScrollX);
+					/*double x = xScale * (evt.begin - minTicks - ScrollX);
 					x += leftMargin + cb.Left;
 
 					double trunc = Math.Truncate (x);
@@ -208,7 +252,7 @@ namespace Crow
 					ctx.Fill ();
 					ctx.MoveTo (x - 0.5 * te.Width, penY - ctx.FontExtents.Descent);
 					ctx.SetSource (Colors.Jet);
-					ctx.ShowText (s);
+					ctx.ShowText (s);*/
 
 				}
 				drawEvents (ctx, evt.Events);
@@ -224,7 +268,7 @@ namespace Crow
 			gr.FontOptions = Interface.FontRenderingOptions;
 			gr.Antialias = Cairo.Antialias.None;
 
-			if (objs == null)
+			if (widgets == null)
 				return;
 
 			gr.LineWidth = 1.0;
@@ -234,10 +278,10 @@ namespace Crow
 			double penY = topMargin + ClientRectangle.Top;
 
 			for (int i = 0; i < visibleLines; i++) {
-				if (i + ScrollY >= objs.Count)
+				if (i + ScrollY >= widgets.Count)
 					break;
 				int gIdx = i + ScrollY;
-				DbgWidgetRecord g = objs [gIdx];
+				DbgWidgetRecord g = widgets [gIdx];
 
 				penY += fe.Height;
 
@@ -255,10 +299,6 @@ namespace Crow
 
 				gr.MoveTo (penX, penY - gr.FontExtents.Descent);
 				gr.ShowText (g.name + gIdx);
-
-				gr.SetSource (Crow.Colors.White);
-				gr.MoveTo (cb.X, penY - gr.FontExtents.Descent);
-				gr.ShowText ((i + ScrollY).ToString ());
 			}
 
 			drawEvents (gr, events);
@@ -331,17 +371,25 @@ namespace Crow
 			Rectangle r = new Rectangle(mousePos.X, 0, 1, Slot.Height);
 			Rectangle ctxR = ContextCoordinates (r);
 			Rectangle cb = ClientRectangle;
+			ctx.LineWidth = 1.0;
+			double x = xScale * (currentTick - minTicks - ScrollX) + leftMargin;
+			if (x - Math.Truncate (x) > 0.5)
+				x = Math.Truncate (x) + 0.5;
+			else
+				x = Math.Truncate (x) - 0.5;
+			ctx.MoveTo (x, cb.Top + topMargin - 4.0);
+			ctx.LineTo (x, cb.Bottom);
 
-			ctx.Rectangle (ctxR);
+			//ctx.Rectangle (ctxR);
 			ctx.SetSource (Colors.CornflowerBlue);
-			ctx.Fill();
+			ctx.Stroke();
 
 			ctx.SelectFontFace (Font.Name, Font.Slant, Font.Wheight);
 			ctx.SetFontSize (Font.Size);
 			ctx.FontOptions = Interface.FontRenderingOptions;
 			ctx.Antialias = Interface.Antialias;
 
-			ctx.MoveTo (ctxR.X, ctxR.Y + fe.Height);
+			ctx.MoveTo (ctxR.X - ctx.TextExtents (currentTick.ToString ()).Width / 2, ctxR.Y + fe.Height);
 			ctx.ShowText (currentTick.ToString ());
 
 			ctx.Operator = Cairo.Operator.Add;
@@ -356,6 +404,10 @@ namespace Crow
 				ctx.Fill ();
 			}
 
+			if (CurrentWidget != null) {
+
+			}
+
 			if (selStart < 0 || selEnd < 0) {
 				ctx.Operator = Cairo.Operator.Over;
 				return;
@@ -384,6 +436,10 @@ namespace Crow
 			base.OnLayoutChanges (layoutType);
 			switch (layoutType) {
 			case LayoutingType.Width:
+				if (xScale < 0) {
+					visibleTicks = maxTicks - minTicks;
+					XScale = (ClientRectangle.Width - leftMargin) / visibleTicks;
+				}
 				updateVisibleTicks ();
 				break;
 			case LayoutingType.Height:
@@ -410,6 +466,9 @@ namespace Crow
 			else if (IFace.IsDown(Glfw.MouseButton.Right)) {
 				ScrollX += (int)(lastTick - currentTick);
 				updateMouseLocalPos (e.Position);
+			} else {
+				HoverWidget = (currentLine < 0 || currentLine >= widgets.Count) ? null : widgets [currentLine];
+				HoverEvent = hoverWidget?.Events.FirstOrDefault (ev => ev.begin <= currentTick && ev.end >= currentTick);
 			}
 
 			if (RegisteredLayoutings == LayoutingType.None && !IsDirty)
@@ -421,8 +480,8 @@ namespace Crow
 			base.onMouseDown (sender, e);
 
 			if (e.Button == Glfw.MouseButton.Left) {
-				CurrentWidget = (currentLine < 0 || currentLine >= objs.Count) ? null : objs [currentLine];
-				CurrentEvent = curWidget?.Events.FirstOrDefault (ev => ev.begin <= currentTick && ev.end >= currentTick);
+				CurrentWidget = hoverWidget;
+				CurrentEvent = hoverEvent;
 				selStart = currentTick;
 				selEnd = -1;
 			}
@@ -433,6 +492,18 @@ namespace Crow
 		{
 			base.onMouseUp (sender, e);
 
+			if (e.Button == Glfw.MouseButton.Left && selEnd > 0 && selEnd != selStart) {
+				long scrX = 0;
+				if (selStart < selEnd) {
+					visibleTicks = selEnd - selStart;
+					scrX = selStart - minTicks;
+				} else {
+					visibleTicks = selStart - selEnd;
+					scrX = selEnd - minTicks;
+				}
+				XScale = (ClientRectangle.Width - leftMargin) / visibleTicks;
+				ScrollX = (int)scrX;
+			}
 			selStart = -1;
 			selEnd = -1;
 
@@ -442,7 +513,7 @@ namespace Crow
 		/// <summary> Process scrolling vertically, or if shift is down, vertically </summary>
 		public override void onMouseWheel (object sender, MouseWheelEventArgs e)
 		{			
-			//base.onMouseWheel (sender, e);
+			base.onMouseWheel (sender, e);
 
 			if (IFace.Shift)
 				ScrollX -= (int)((double)(e.Delta * MouseWheelSpeed) / xScale);
@@ -472,90 +543,31 @@ namespace Crow
 				selEnd = selStart = -1;
 			}
 		}
-		async void loadDebugFile ()
-		{
-			await loadDebugFileAsync ();
-		}
 
-
-
-		async Task loadDebugFileAsync ()
+		void updateMargins ()
 		{
-			if (!File.Exists (logFile))
-				return;
-
-			events = new List<DbgEvent> ();
-			objs = new List<DbgWidgetRecord> ();
-			minTicks = maxTicks = 0;
 			leftMargin = topMargin = 0.0;
 
+			if (widgets == null)
+				return;
+
 			using (Context gr = new Context (IFace.surf)) {
 				double maxNameWidth = 0.0;
 
 				gr.SelectFontFace (Font.Name, Font.Slant, Font.Wheight);
 				gr.SetFontSize (Font.Size);
 
-				using (StreamReader s = new StreamReader (logFile)) {
-					if (s.ReadLine () != "[GraphicObjects]")
-						return;
-					while (!s.EndOfStream) {
-						string l = s.ReadLine ();
-						if (l == "[Events]")
-							break;
-						DbgWidgetRecord o = DbgWidgetRecord.Parse (l);
-						objs.Add (o);
-						double nameWidth = gr.TextExtents (o.name).Width + 5.0 * o.xLevel;
-						if (nameWidth > maxNameWidth)
-							maxNameWidth = nameWidth;
-					}
-
-					Stack<DbgEvent> startedEvents = new Stack<DbgEvent> ();
-
-					if (!s.EndOfStream) {
-						while (!s.EndOfStream) {
-							int level = 0;
-							while (s.Peek () == (int)'\t') {
-								s.Read ();
-								level++;
-							}
-							DbgEvent evt = DbgEvent.Parse (s.ReadLine ());
-							if (evt.end > maxTicks)
-								maxTicks = evt.end;
-							if (level == 0) {
-								startedEvents.Clear ();
-								events.Add (evt);
-							} else {
-								int levelDiff = level - startedEvents.Count + 1;
-								if (levelDiff > 0) {
-									if (levelDiff > 1)
-										System.Diagnostics.Debugger.Break ();
-									startedEvents.Peek ().AddEvent (evt);
-								} else {
-									startedEvents.Pop ();
-									if (-levelDiff > startedEvents.Count)
-										System.Diagnostics.Debugger.Break ();
-									while (startedEvents.Count > level)
-										startedEvents.Pop ();
-									startedEvents.Peek ().AddEvent (evt);
-								}
-							}
-							startedEvents.Push (evt);
-							if (evt.type.HasFlag(DbgEvtType.Widget))
-								objs [(evt as DbgWidgetEvent).InstanceIndex].Events.Add (evt);
-						}
-						if (events.Count > 0)
-							minTicks = events [0].begin;
-					}
+				foreach (DbgWidgetRecord o in widgets) {
+					double nameWidth = gr.TextExtents (o.name).Width + 5.0 * o.xLevel;
+					if (nameWidth > maxNameWidth)
+						maxNameWidth = nameWidth;
 				}
 
-				leftMargin = 2.5 + maxNameWidth;
+				leftMargin = 10.5 + maxNameWidth;
 				topMargin = 2.0 * fe.Height;
 
-				updateVisibleLines ();
-				updateVisibleTicks ();
+				RegisterForGraphicUpdate ();
 			}
-			NotifyValueChanged ("Widgets", Widgets);
-			NotifyValueChanged ("Events", Events);
 		}
 
 		void updateVisibleLines ()
@@ -573,17 +585,17 @@ namespace Crow
 
 		void updateMaxScrollX ()
 		{
-			if (objs == null)
+			if (widgets == null)
 				MaxScrollX = 0;
 			else
 				MaxScrollX = (int)Math.Max (0L, maxTicks - minTicks - visibleTicks);
 		}
 		void updateMaxScrollY ()
 		{
-			if (objs == null)
+			if (widgets == null)
 				MaxScrollY = 0;
 			else
-				MaxScrollY = Math.Max (0, objs.Count - visibleLines);
+				MaxScrollY = Math.Max (0, widgets.Count - visibleLines);
 		}
 
 		void updateMouseLocalPos (Point mPos)
@@ -611,6 +623,7 @@ namespace Crow
 			mousePos.Y = Math.Min (cb.Bottom, mousePos.Y);
 
 			currentTick = (int)((double)(mousePos.X - cb.X) / xScale) + minTicks + ScrollX;
+			RegisterForRedraw ();
 		}
 		void zoom (long start, long end) {						
 			//Rectangle cb = ClientRectangle;
diff --git a/Samples/DebugLogAnalyzer/DebugLogAnalyzer.csproj b/Samples/DebugLogAnalyzer/DebugLogAnalyzer.csproj
new file mode 100644
index 00000000..df93e686
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/DebugLogAnalyzer.csproj
@@ -0,0 +1,9 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project Sdk="Microsoft.NET.Sdk">
+	<ItemGroup>
+		<EmbeddedResource Include="ui\**\*.*">
+			<LogicalName>Dbg.%(Filename)%(Extension)</LogicalName>
+		</EmbeddedResource>
+</ItemGroup>
+
+</Project>
\ No newline at end of file
diff --git a/Samples/DebugLogAnalyzer/Program.cs b/Samples/DebugLogAnalyzer/Program.cs
new file mode 100644
index 00000000..6be26ced
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/Program.cs
@@ -0,0 +1,178 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+using System;
+using System.Collections.Generic;
+using System.IO;
+using Crow;
+using Crow.Cairo;
+
+namespace DebugLogAnalyzer
+{
+	public class Program : SampleBase
+	{
+		static void Main (string [] args)
+		{
+#if NETCOREAPP3_1
+			DllMapCore.Resolve.Enable (true);
+#endif
+			using (Program app = new Program ()) 
+				app.Run ();
+		}
+
+		List<DbgEvent> events = new List<DbgEvent>();
+		List<DbgWidgetRecord> widgets = new List<DbgWidgetRecord>();
+		DbgEvent curEvent = new DbgEvent();
+		DbgWidgetRecord curWidget = new DbgWidgetRecord();
+
+		public List<DbgEvent> Events {
+			get => events;
+			set {
+				if (events == value)
+					return;
+				events = value;
+				NotifyValueChanged (nameof (Events), events);
+			}
+		}
+		public List<DbgWidgetRecord> Widgets {
+			get => widgets;
+			set {
+				if (widgets == value)
+					return;
+				widgets = value;
+				NotifyValueChanged (nameof (Widgets), widgets);
+			}
+		}
+		public DbgEvent CurrentEvent {
+			get => curEvent;
+			set {
+				if (curEvent == value)
+					return;
+
+				if (curEvent != null)
+					curEvent.IsSelected = false;
+				curEvent = value;
+				if (curEvent != null) {
+					curEvent.IsSelected = true;
+					if (curEvent.parentEvent != null)
+						curEvent.parentEvent.IsExpanded = true;
+				}
+
+				NotifyValueChanged (nameof (CurrentEvent), curEvent);
+			}
+		}
+		public DbgWidgetRecord CurrentWidget {
+			get => curWidget;
+			set {
+				if (curWidget == value)
+					return;
+				curWidget = value;
+				NotifyValueChanged (nameof (CurrentWidget), curWidget);
+				NotifyValueChanged ("CurWidgetRootEvents", CurWidgetRootEvents);
+			}
+		}
+		public List<DbgWidgetEvent> CurWidgetRootEvents => curWidget == null? new List<DbgWidgetEvent>() : curWidget.RootEvents;
+
+		Scroller dbgTreeViewScroller;
+
+		protected override void OnInitialized ()
+		{
+			Load ("#Dbg.dbglog.crow").DataSource = this;
+
+			TreeView tv = FindByName("dbgTV") as TreeView;
+			dbgTreeViewScroller = tv.FindByNameInTemplate ("scroller1") as Scroller;
+
+			loadDebugFile ("/var/tmp/debug.log");
+		}
+
+		void loadDebugFile (string logFile)
+		{
+			if (!File.Exists (logFile))
+				return;
+
+			List<DbgEvent> evts = new List<DbgEvent> ();
+			List<DbgWidgetRecord> objs = new List<DbgWidgetRecord> ();
+
+			using (StreamReader s = new StreamReader (logFile)) {
+				if (s.ReadLine () != "[GraphicObjects]")
+					return;
+				while (!s.EndOfStream) {
+					string l = s.ReadLine ();
+					if (l == "[Events]")
+						break;
+					DbgWidgetRecord o = DbgWidgetRecord.Parse (l);
+					objs.Add (o);
+				}
+
+				Stack<DbgEvent> startedEvents = new Stack<DbgEvent> ();
+
+				if (!s.EndOfStream) {
+					while (!s.EndOfStream) {
+						int level = 0;
+						while (s.Peek () == (int)'\t') {
+							s.Read ();
+							level++;
+						}
+						DbgEvent evt = DbgEvent.Parse (s.ReadLine ());							
+						if (level == 0) {
+							startedEvents.Clear ();
+							evts.Add (evt);
+						} else {
+							int levelDiff = level - startedEvents.Count + 1;
+							if (levelDiff > 0) {
+								if (levelDiff > 1)
+									System.Diagnostics.Debugger.Break ();
+								startedEvents.Peek ().AddEvent (evt);
+							} else {
+								startedEvents.Pop ();
+								if (-levelDiff > startedEvents.Count)
+									System.Diagnostics.Debugger.Break ();
+								while (startedEvents.Count > level)
+									startedEvents.Pop ();
+								startedEvents.Peek ().AddEvent (evt);
+							}
+						}
+						startedEvents.Push (evt);
+						if (evt.type.HasFlag (DbgEvtType.Widget))
+							objs [(evt as DbgWidgetEvent).InstanceIndex].Events.Add (evt);
+					}
+				}
+			}
+			Widgets = objs;
+			Events = evts;
+		}
+
+		int targetTvScroll = -1;
+
+		void onTvPainted (object sender, EventArgs e)
+		{
+			if (targetTvScroll < 0 || targetTvScroll > dbgTreeViewScroller.MaxScrollY + dbgTreeViewScroller.Slot.Height)
+				return;
+			dbgTreeViewScroller.MaxScrollY = targetTvScroll;
+			targetTvScroll = -1;
+		}
+
+		void onSelectedItemContainerChanged (object sender, SelectionChangeEventArgs e)
+		{
+			TreeView tv = sender as TreeView;
+			Group it = tv.FindByNameInTemplate ("ItemsContainer") as Group;
+
+			ListItem li = e.NewValue as ListItem;
+			Rectangle selRect = li.RelativeSlot (it);
+
+			if (selRect.Y > dbgTreeViewScroller.ScrollY && selRect.Y < dbgTreeViewScroller.Slot.Height + dbgTreeViewScroller.ScrollY)
+				return;
+
+			Console.WriteLine ($"Scroll={dbgTreeViewScroller.ScrollY} selRectY={selRect.Y} MaxScrollY={dbgTreeViewScroller.MaxScrollY} ScrollerH={dbgTreeViewScroller.Slot.Height}");
+			targetTvScroll = selRect.Y;
+			if (selRect.Y > dbgTreeViewScroller.MaxScrollY + dbgTreeViewScroller.Slot.Height)
+				targetTvScroll = selRect.Y;
+			else {
+				targetTvScroll = -1;
+				dbgTreeViewScroller.ScrollY = selRect.Y;
+			}
+		}
+
+	}
+}
+
diff --git a/Samples/DebugLogAnalyzer/Properties/AssemblyInfo.cs b/Samples/DebugLogAnalyzer/Properties/AssemblyInfo.cs
new file mode 100644
index 00000000..d8646524
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/Properties/AssemblyInfo.cs
@@ -0,0 +1,5 @@
+// Copyright (c) 2013-2020  Jean-Philippe Bruyère <jp_bruyere@hotmail.com>
+//
+// This code is licensed under the MIT license (MIT) (http://opensource.org/licenses/MIT)
+[assembly: Crow.Crow ]
+
diff --git a/Samples/DebugLogAnalyzer/ui/DbgEventTreeItems.itemp b/Samples/DebugLogAnalyzer/ui/DbgEventTreeItems.itemp
new file mode 100644
index 00000000..2f6fbfbf
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/ui/DbgEventTreeItems.itemp
@@ -0,0 +1,70 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<ItemTemplate Data="Events">
+	<ListItem IsSelected="{²IsSelected}" Height="Fit"
+						Selected="{/exp.Background=${ControlHighlight}}"
+						Unselected="{/exp.Background=Transparent}">
+		<Expandable Name="exp" Caption="{type}" MouseDoubleClick="/onClickForExpand" CacheEnabled="true" IsExpanded="{²IsExpanded}">
+			<Template>
+					<VerticalStack>
+						<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
+								Foreground="Transparent"
+								Background="{./Background}"
+								MouseEnter="{Foreground=DimGrey}"
+								MouseLeave="{Foreground=Transparent}">
+							<HorizontalStack Spacing="2" >
+								<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
+									Path="{./Image}"
+									Visible="{HasChildEvents}"
+									SvgSub="{./IsExpanded}"
+									MouseEnter="{Background=LightGrey}"
+									MouseLeave="{Background=Transparent}"/>
+								<Label Text="{./Caption}" Width="80" Font="mono, 8" />
+								<Label Text="{Duration}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
+								<DbgEventWidget Event="{}" Tooltip="#Dbg.DbgEvtTooltip.crow" Width="Stretched" Height="5"/>
+							</HorizontalStack>
+						</Border>
+						<Container Name="Content" Visible="false"/>
+					</VerticalStack>
+			</Template>
+			<HorizontalStack Height="Fit">
+				<Widget Width="12" Height="10"/>
+				<VerticalStack Height="Fit" Name="ItemsContainer"/>
+			</HorizontalStack>
+		</Expandable>
+	</ListItem>
+</ItemTemplate>		
+<ItemTemplate Data="Events" DataType="DbgWidgetEvent">
+	<ListItem IsSelected="{²IsSelected}" Height="Fit"
+						Selected="{/exp.Background=${ControlHighlight}}"
+						Unselected="{/exp.Background=Transparent}">
+		<Expandable Name="exp" Caption="{type}" MouseDoubleClick="/onClickForExpand" CacheEnabled="true" IsExpanded="{²IsExpanded}">
+			<Template>
+				<VerticalStack>
+					<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
+							Foreground="Transparent"
+							Background="{./Background}"
+							MouseEnter="{Foreground=DimGrey}"
+							MouseLeave="{Foreground=Transparent}">
+						<HorizontalStack Spacing="2" >
+							<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
+								Path="{./Image}"
+								Visible="{HasChildEvents}"
+								SvgSub="{./IsExpanded}"
+								MouseEnter="{Background=LightGrey}"
+								MouseLeave="{Background=Transparent}"/>
+							<Label Text="{./Caption}" Width="80" Font="mono, 8" />
+							<Label Text="{Duration}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
+							<Label Text="{InstanceIndex}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
+							<DbgEventWidget Event="{}" Tooltip="#Dbg.DbgEvtTooltip.crow" Width="Stretched" Height="5"/>
+						</HorizontalStack>
+					</Border>
+					<Container Name="Content" Visible="false"/>
+				</VerticalStack>
+			</Template>
+			<HorizontalStack Height="Fit">
+				<Widget Width="12" Height="10"/>
+				<VerticalStack Height="Fit" Name="ItemsContainer"/>
+			</HorizontalStack>
+		</Expandable>
+	</ListItem>
+</ItemTemplate>		
\ No newline at end of file
diff --git a/Samples/DebugLogAnalyzer/ui/DbgEvtTooltip.crow b/Samples/DebugLogAnalyzer/ui/DbgEvtTooltip.crow
new file mode 100644
index 00000000..9d40f45d
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/ui/DbgEvtTooltip.crow
@@ -0,0 +1,37 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<Border Fit="true" Foreground="${TooltipForeground}" Background="${TooltipBackground}">
+	<VerticalStack Fit="true" Margin="${TooltipMargin}" DataSource="{HoverEvent}">
+		<Label Text="{type}" Background="{Color}" Foreground="Black" Width="200" TextAlignment="Center" Margin="6"/>
+		<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Visible="{IsWidgetEvent}" Background="DimGrey" Margin="2">
+			<Label Text="Instance:" Foreground="White" Width="50%" />	
+			<Label Text="{InstanceIndex}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+		</HorizontalStack>
+		<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+			<Label Text="Duration:" Foreground="White" Width="50%" />	
+			<Label Text="{Duration}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Right"/>				
+		</HorizontalStack>
+		<HorizontalStack Height="Fit" Width="Stretched" Spacing="2">
+			<Label Text="Begin:" Foreground="${TooltipForeground}" Width="50%"/>	
+			<Label Text="{begin}" Foreground="${TooltipForeground}" Width="Stretched" TextAlignment="Right"/>				
+		</HorizontalStack>
+		<HorizontalStack Height="Fit" Width="Stretched" Spacing="2">
+			<Label Text="End:" Foreground="${TooltipForeground}" Width="50%"/>	
+			<Label Text="{end}" Foreground="${TooltipForeground}" Width="Stretched" TextAlignment="Right"/>				
+		</HorizontalStack>
+		<VerticalStack Height="Fit" Width="Stretched" >
+			<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+				<Label Text="Result:" Foreground="White" Width="50%" />	
+				<Label Text="{result}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+			</HorizontalStack>
+			<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+				<Label Text="Old Slot:" Foreground="White" Width="50%" />	
+				<Label Text="{OldSlot}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+			</HorizontalStack>
+			<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+				<Label Text="New Slot:" Foreground="White" Width="50%" />	
+				<Label Text="{NewSlot}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+			</HorizontalStack>
+		</VerticalStack>		
+		<!--<Label Text="{}" Foreground="${TooltipForeground}"/>-->
+	</VerticalStack>
+</Border>
\ No newline at end of file
diff --git a/Samples/DebugLogAnalyzer/ui/dbglog.crow b/Samples/DebugLogAnalyzer/ui/dbglog.crow
new file mode 100644
index 00000000..72d96bf0
--- /dev/null
+++ b/Samples/DebugLogAnalyzer/ui/dbglog.crow
@@ -0,0 +1,98 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<VerticalStack>
+	<VerticalStack Height="40%">
+		<DbgLogViewer Visible="true" Name="dbv" Events="{Events}" Widgets="{Widgets}" MouseWheelSpeed="10" Font="mono, 8"									
+									CurrentEvent="{²CurrentEvent}" CurrentWidget="{²CurrentWidget}" Background="Onyx"/>
+		<ScrollBar Style="HScrollBar" Maximum="{../dbv.MaxScrollX}" Value="{²../dbv.ScrollX}"/>
+		<HorizontalStack Height="Fit" DataSource="{CurrentWidget}">
+			<Label Text="{name}"/>
+			<Label Text="{listIndex}"/>
+			<Label Text="{treeIndex}"/>
+			<Label Text="{yIndex}"/>
+			<Label Text="{xLevel}"/>
+			<Label Text="Width:"/>
+			<Label Text="{Width}"/>
+			<Label Text="Height:"/>
+			<Label Text="{Height}"/>
+			<Label Text="ScrollX"/>
+			<Label Text="{../../dbv.ScrollX}"/>
+		</HorizontalStack>
+	</VerticalStack>
+	<Splitter/>
+	<HorizontalStack Height="40%">
+		<VerticalStack Width="Stretched">
+			<TreeView Height="Stretched" Name="dbgTV" Data="{Events}" SelectedItem="{²CurrentEvent}" Background="DarkGrey"
+						SelectedItemContainerChanged="onSelectedItemContainerChanged" Painted="onTvPainted"
+						ItemTemplate="#Dbg.DbgEventTreeItems.itemp"/> 
+			<ListBox Data="{CurWidgetRootEvents}" Height="100" SelectedItem="{²CurrentEvent}">
+				<ItemTemplate>
+					<ListItem Margin="0" Height="16" IsSelected="{²IsSelected}" Width="Fit"
+								Selected="{Background=${ControlHighlight}}"
+								Unselected="{Background=Transparent}">
+						<DbgEventWidget Height="10" Width="Fit" Event="{}" Tooltip="#Dbg.DbgEvtTooltip.crow" TicksPerPixel="20" VerticalAlignment="Center"/>
+					</ListItem>
+				</ItemTemplate>
+				<Template>
+					<Wrapper Name="ItemsContainer" Spacing="0" Background="DarkGrey"/>
+				</Template>
+			</ListBox>				
+		</VerticalStack>
+		<Splitter/>
+		<VerticalStack Height="Stretched" Width="20%" Margin="${TooltipMargin}" DataSource="{CurrentEvent}">
+				<Label Text="{type}" Background="{Color}" Foreground="Black" Width="200" TextAlignment="Center" Margin="6"/>
+				<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Visible="{IsWidgetEvent}" Background="DimGrey" Margin="2">
+					<Label Text="Instance:" Foreground="White" Width="50%" />	
+					<Label Text="{InstanceIndex}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+				</HorizontalStack>
+				<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+					<Label Text="Duration:" Foreground="White" Width="50%" />	
+					<Label Text="{Duration}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Right"/>				
+				</HorizontalStack>
+				<HorizontalStack Height="Fit" Width="Stretched" Spacing="2">
+					<Label Text="Begin:" Foreground="${TooltipForeground}" Width="50%"/>	
+					<Label Text="{begin}" Foreground="${TooltipForeground}" Width="Stretched" TextAlignment="Right"/>				
+				</HorizontalStack>
+				<HorizontalStack Height="Fit" Width="Stretched" Spacing="2">
+					<Label Text="End:" Foreground="${TooltipForeground}" Width="50%"/>	
+					<Label Text="{end}" Foreground="${TooltipForeground}" Width="Stretched" TextAlignment="Right"/>				
+				</HorizontalStack>
+				<VerticalStack Height="Fit" Width="Stretched" >
+					<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+						<Label Text="Layout:" Foreground="White" Width="50%" />	
+						<Label Text="{layouting}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+					</HorizontalStack>
+					<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+						<Label Text="Result:" Foreground="White" Width="50%" />	
+						<Label Text="{result}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+					</HorizontalStack>
+					<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+						<Label Text="Old Slot:" Foreground="White" Width="50%" />	
+						<Label Text="{OldSlot}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+					</HorizontalStack>
+					<HorizontalStack Height="Fit" Width="Stretched" Spacing="2" Background="DimGrey" Margin="2">
+						<Label Text="New Slot:" Foreground="White" Width="50%" />	
+						<Label Text="{NewSlot}" Foreground="White" Background="Onyx" Width="Stretched" TextAlignment="Center"/>				
+					</HorizontalStack>
+				</VerticalStack>		
+				<!--<Label Text="{}" Foreground="${TooltipForeground}"/>-->
+			</VerticalStack>		
+	</HorizontalStack>
+	<Splitter/>
+	<VerticalStack Name="vs">
+			
+		<VerticalStack DataSource="{CurrentEvent}">
+			<ListBox Data="{Events}" Height="100" SelectedItem="{²CurrentEvent}">
+				<ItemTemplate>
+					<ListItem Margin="0" IsSelected="{²IsSelected}" Height="12"
+								Selected="{Background=${ControlHighlight}}"
+								Unselected="{Background=Transparent}">
+						<HorizontalStack>
+							<Label Text="{type}" Width="80"/>
+							<DbgEventWidget Height="8" Width="Stretched" Event="{}"/>
+						</HorizontalStack>
+					</ListItem>
+				</ItemTemplate>
+			</ListBox>
+		</VerticalStack>
+	</VerticalStack>
+</VerticalStack>
\ No newline at end of file
diff --git a/Samples/HelloWorld/HelloWorld.csproj b/Samples/HelloWorld/HelloWorld.csproj
index 253e0eb1..b19bb1c6 100644
--- a/Samples/HelloWorld/HelloWorld.csproj
+++ b/Samples/HelloWorld/HelloWorld.csproj
@@ -1,7 +1,8 @@
-<Project Sdk="Microsoft.NET.Sdk">    
-  <ItemGroup>
-    <EmbeddedResource Include="ui\**\*.*">
-      <LogicalName>HelloWorld.%(Filename)%(Extension)</LogicalName>
-    </EmbeddedResource>                
-  </ItemGroup>
-</Project>
+<?xml version="1.0" encoding="UTF-8"?>
+<Project Sdk="Microsoft.NET.Sdk">
+	<ItemGroup>
+		<EmbeddedResource Include="ui\**\*.*">
+			<LogicalName>HelloWorld.%(Filename)%(Extension)</LogicalName>
+		</EmbeddedResource>
+	</ItemGroup>
+</Project>
\ No newline at end of file
diff --git a/Samples/HelloWorld/main.cs b/Samples/HelloWorld/main.cs
index 743419ee..1aa90bbe 100644
--- a/Samples/HelloWorld/main.cs
+++ b/Samples/HelloWorld/main.cs
@@ -11,6 +11,8 @@ namespace HelloWorld
 			using (Interface app = new Interface ()) {
 				app.Initialized += (sender, e) => (sender as Interface).Load ("#HelloWorld.helloworld.crow");
 				app.Run ();
+
+				DbgLogger.save (app);
 			}
 		}
 	}
diff --git a/Samples/ShowCase/ShowCase.cs b/Samples/ShowCase/ShowCase.cs
index dd0b77c9..f3aba2b5 100644
--- a/Samples/ShowCase/ShowCase.cs
+++ b/Samples/ShowCase/ShowCase.cs
@@ -8,6 +8,7 @@ using System.IO;
 using System.Text;
 using Crow.IML;
 using System.Runtime.CompilerServices;
+using Glfw;
 
 namespace ShowCase
 {
@@ -175,18 +176,17 @@ namespace ShowCase
 
 			reloadFromFile ();
 		}
-
-		static void App_KeyboardKeyDown (object sender, KeyEventArgs e)
+		public override bool OnKeyDown (Key key)
 		{
-#if DEBUG_LOG
-			switch (e.Key) {
+			switch (key) {
 			case Key.F2:
-				DebugLog.save (sender as Interface);
-				break;
+				//DbgLogger.save (this);
+				return true;
 			}
-#endif
+			return base.OnKeyDown (key);
 		}
 
+
 		public void goUpDirClick (object sender, MouseButtonEventArgs e)
 		{
 			string root = Directory.GetDirectoryRoot (CurrentDir);
diff --git a/Samples/common/SampleBase.cs b/Samples/common/SampleBase.cs
index aea139c3..93aec907 100644
--- a/Samples/common/SampleBase.cs
+++ b/Samples/common/SampleBase.cs
@@ -3,6 +3,7 @@ using System.Collections.Generic;
 using System.IO;
 using System.Linq;
 using System.Reflection;
+using System.Runtime.CompilerServices;
 using System.Threading;
 using Crow;
 
@@ -81,6 +82,79 @@ namespace Crow
 				=> $"{Prop1}, {Prop2}";
 
 		}
+		public class TestClassVC : IValueChange
+		{
+			public event EventHandler<ValueChangeEventArgs> ValueChanged;
+			public void NotifyValueChanged (object _value, [CallerMemberName] string caller = null)
+				=> ValueChanged.Raise (this, new ValueChangeEventArgs (caller, _value));
+			string prop1, prop2;
+			public string Prop1 {
+				get => prop1;
+				set {
+					if (prop1 == value)
+						return;
+					prop1 = value;
+					NotifyValueChanged (prop1);
+				}
+			}
+			public string Prop2 {
+				get => prop2;
+				set {
+					if (prop2 == value)
+						return;
+					prop2 = value;
+					NotifyValueChanged (prop2);
+				}
+
+
+
+		}
+
+		public override string ToString ()
+				=> $"{Prop1}, {Prop2}";
+
+		}
+		TestClass tcInstance;// = new TestClass () { Prop1 = "instance 0 prop1 value", Prop2 = "instance 0 prop2 value" };
+		TestClassVC tcVCInstance;// = new TestClassVC () { Prop1 = "instance 0 prop1 value", Prop2 = "instance 0 prop2 value" };
+		TestClass tcInstance1 = new TestClass () { Prop1 = "instance 1 prop1 value", Prop2 = "instance 1 prop2 value" };
+		TestClassVC tcVCInstance1 = new TestClassVC () { Prop1 = "instance 1 prop1 value", Prop2 = "instance 1 prop2 value" };
+		TestClass tcInstance2 = new TestClass () { Prop1 = "instance 2 prop1 value", Prop2 = "instance 2 prop2 value" };
+		TestClassVC tcVCInstance2 = new TestClassVC () { Prop1 = "instance 2 prop1 value", Prop2 = "instance 2 prop2 value" };
+
+		public TestClass TcInstance {
+			get => tcInstance;
+			set {
+				if (tcInstance == value)
+					return;
+				tcInstance = value;
+				NotifyValueChanged (tcInstance);
+			}
+		}
+		public TestClassVC TcVCInstance {
+			get => tcVCInstance;
+			set {
+				if (tcVCInstance == value)
+					return;
+				tcVCInstance = value;
+				NotifyValueChanged (tcVCInstance);
+			}
+		}
+
+		void tcInstance_ChangeProperties_MouseClick (object sender, MouseButtonEventArgs e)
+		{
+		}
+		public void tcInstance_ChangeInstance_MouseClick (object sender, MouseButtonEventArgs e)
+		{
+			if (TcInstance == tcInstance1)
+				TcInstance = tcInstance2;
+			else
+				TcInstance = tcInstance1;
+		}
+		void tcVCInstance_ChangeInstance_MouseClick (object sender, MouseButtonEventArgs e)
+		{
+			TcVCInstance = new TestClassVC () { Prop1 = "prop1 value changed", Prop2 = "prop2 value changed" };
+		}
+
 		public IEnumerable<TestClass> List3 = new List<TestClass> (new TestClass[]
 			{
 				new TestClass { Prop1 = "string1", Prop2="prop2-1" },
diff --git a/Samples/common/samples.style b/Samples/common/samples.style
index 9c382e6a..124cfcf4 100644
--- a/Samples/common/samples.style
+++ b/Samples/common/samples.style
@@ -24,7 +24,7 @@ CheckBox2 {
 	Template= "Interfaces/CheckBox2.imlt";
 	Background = "Jet";
 	Checked="{Background=MediumSeaGreen}";
-	Unchecked = "{Background=Jet}";
+	Unchecked = "{Background=Jet}";	
 }
 CheckBox3 {
 	Template= "Interfaces/CheckBox2.imlt";
@@ -44,7 +44,7 @@ labPerfVal{
 	Width = "50%";
 }
 DbgLogViewer{
-	Background = "Onyx";
+	//Background = "Onyx";
 	Font = "mono, 8";
 	Foreground = "LightGrey";
 	Focusable = "true";
diff --git a/Samples/common/ui/Interfaces/CheckBox2.imlt b/Samples/common/ui/Interfaces/CheckBox2.imlt
index c2bfe8da..84ec22b3 100644
--- a/Samples/common/ui/Interfaces/CheckBox2.imlt
+++ b/Samples/common/ui/Interfaces/CheckBox2.imlt
@@ -1,5 +1,5 @@
-<Label Font="{./Font}" Text="{./Caption}" Height="{./HeightPolicy}" Width="{./WidthPolicy}"
-	Margin="3"
+<Label Font="{./Font}" Text="{./Caption}" Width="Stretched"
+	Margin="5"
 	Background="{./Background}"
 	Foreground="DimGrey"
 	TextAlignment="Center"
diff --git a/Samples/common/ui/Interfaces/Divers/classBindings.crow b/Samples/common/ui/Interfaces/Divers/classBindings.crow
new file mode 100644
index 00000000..72144e8e
--- /dev/null
+++ b/Samples/common/ui/Interfaces/Divers/classBindings.crow
@@ -0,0 +1,9 @@
+<VerticalStack Fit="true">
+	<VerticalStack DataSourceType="Crow.TestClass" DataSource="{TcInstance}" Margin="10" Background="Onyx" Fit="true">
+		<Label Text="{Prop1}"/>
+		<Label Text="{Prop2}"/>
+	</VerticalStack>
+	<HorizontalStack>
+		<Button Caption="Change Instance" MouseClick="tcInstance_ChangeInstance_MouseClick"/>
+	</HorizontalStack>
+</VerticalStack>
\ No newline at end of file
diff --git a/Samples/common/ui/Interfaces/Divers/dbglog.crow b/Samples/common/ui/Interfaces/Divers/dbglog.crow
deleted file mode 100644
index 16f6c35e..00000000
--- a/Samples/common/ui/Interfaces/Divers/dbglog.crow
+++ /dev/null
@@ -1,99 +0,0 @@
-<?xml version="1.0" encoding="UTF-8"?>
-<HorizontalStack>
-	<TreeView Width="20%" Data="{../dbv.Events}" SelectedItemChanged="onSelectedItemChanged"> 
-		<ItemTemplate Data="Events">
-			<Expandable Caption="{type}" MouseDoubleClick="/onClickForExpand" CacheEnabled="true" IsExpanded="{²IsExpanded}">
-				<Template>
-					<VerticalStack>
-						<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
-								Foreground="Transparent"
-								MouseEnter="{Foreground=DimGrey}"
-								MouseLeave="{Foreground=Transparent}">
-							<HorizontalStack Spacing="2" Background="Onyx">
-								<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
-									Path="{./Image}"
-									Visible="{HasChildEvents}"
-									SvgSub="{./IsExpanded}"
-									MouseEnter="{Background=LightGrey}"
-									MouseLeave="{Background=Transparent}"/>
-								<Label Text="{./Caption}" Width="80" Font="mono, 8" />
-								<Label Text="{Duration}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
-								<DbgEventWidget Event="{}" Tooltip="{/HoverEvent}" TicksPerPixel="200" Width="Fit" Height="5"/>
-							</HorizontalStack>
-						</Border>
-						<Container Name="Content" Visible="false"/>
-					</VerticalStack>
-				</Template>
-				<HorizontalStack Height="Fit">
-					<Widget Width="12" Height="10"/>
-					<VerticalStack Height="Fit" Name="ItemsContainer"/>
-				</HorizontalStack>
-			</Expandable>
-		</ItemTemplate>		
-		<ItemTemplate Data="Events" DataType="DbgWidgetEvent">
-			<Expandable Caption="{type}" MouseDoubleClick="/onClickForExpand" CacheEnabled="true" IsExpanded="{²IsExpanded}">
-				<Template>
-					<VerticalStack>
-						<Border CornerRadius="2" Margin="0" Height="Fit" MouseDoubleClick="./onClickForExpand"
-								Foreground="Transparent"
-								MouseEnter="{Foreground=DimGrey}"
-								MouseLeave="{Foreground=Transparent}">
-							<HorizontalStack Spacing="2" Background="Onyx">
-								<Image Margin="1" Width="9" Height="9" Focusable="true" MouseDown="./onClickForExpand"
-									Path="{./Image}"
-									Visible="{HasChildEvents}"
-									SvgSub="{./IsExpanded}"
-									MouseEnter="{Background=LightGrey}"
-									MouseLeave="{Background=Transparent}"/>
-								<Label Text="{./Caption}" Width="80" Font="mono, 8" />
-								<Label Text="{Duration}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
-								<Label Text="{InstanceIndex}" Width="40" Font="mono, 8" TextAlignment="Center" Background="DimGrey"/>
-								<DbgEventWidget Event="{}" Tooltip="{/HoverEvent}" TicksPerPixel="200" Width="Fit" Height="5"/>
-							</HorizontalStack>
-						</Border>
-						<Container Name="Content" Visible="false"/>
-					</VerticalStack>
-				</Template>
-				<HorizontalStack Height="Fit">
-					<Widget Width="12" Height="10"/>
-					<VerticalStack Height="Fit" Name="ItemsContainer"/>
-				</HorizontalStack>
-			</Expandable>
-		</ItemTemplate>		
-	</TreeView>
-	<Splitter/>
-	<VerticalStack>
-		<DbgLogViewer Visible="true" Name="dbv" LogFile="debug.log" MouseWheelSpeed="10" Font="mono, 8"/>
-		<ScrollBar Style="HScrollBar" Maximum="{../dbv.MaxScrollX}" Value="{²../dbv.ScrollX}"/>
-		<HorizontalStack Height="Fit" DataSource="{../../dbv.CurrentWidget}">
-			<Label Text="{name}"/>
-			<Label Text="{listIndex}"/>
-			<Label Text="{instanceNum}"/>
-			<Label Text="{treeIndex}"/>
-			<Label Text="{yIndex}"/>
-			<Label Text="{xLevel}"/>
-		</HorizontalStack>
-		<ListBox Data="{RootEvents}" Height="100" DataSource="{../../dbv.CurrentWidget}">
-			<ItemTemplate>
-				<DbgEventWidget Height="10" Width="Fit" Event="{}" Tooltip="{/HoverEvent}" TicksPerPixel="100"/>
-			</ItemTemplate>
-			<Template>
-				<Wrapper Name="ItemsContainer" Spacing="2" Background="DarkGrey"/>
-			</Template>
-		</ListBox>	
-		<!--<DbgEventWidget Height="20" Width="Stretched" Event="{../../dbv.CurrentEvent}"/>-->
-		<VerticalStack DataSource="{../../dbv.CurrentEvent}">
-			<HorizontalStack>
-				<Label Text="{type}"/>
-				<Label Text="{begin}"/>
-				<Label Text="{end}"/>
-				<Label Text="{Duration}"/>
-			</HorizontalStack>
-			<ListBox Data="{events}" Height="100">
-				<ItemTemplate>
-					<DbgEventWidget Height="20" Width="Stretched" Event="{}"/>
-				</ItemTemplate>
-			</ListBox>
-		</VerticalStack>
-	</VerticalStack>
-</HorizontalStack>
\ No newline at end of file
diff --git a/Samples/common/ui/Interfaces/Divers/splitter0.crow b/Samples/common/ui/Interfaces/Divers/splitter0.crow
new file mode 100644
index 00000000..218ba621
--- /dev/null
+++ b/Samples/common/ui/Interfaces/Divers/splitter0.crow
@@ -0,0 +1,7 @@
+<HorizontalStack Margin="50">
+	<Widget Background="SeaGreen" Width="33%"/>
+	<Splitter/>
+	<Widget Background="SeaGreen" Width="33%"/>
+	<Splitter/>
+	<Widget Background="SeaGreen"/>
+</HorizontalStack>
diff --git a/Samples/common/ui/Interfaces/Splitter/1.crow b/Samples/common/ui/Interfaces/Splitter/1.crow
deleted file mode 100644
index 48c1ea1e..00000000
--- a/Samples/common/ui/Interfaces/Splitter/1.crow
+++ /dev/null
@@ -1,30 +0,0 @@
-<?xml version="1.0"?>
-<HorizontalStack Width="80%" Height="50%">
-	<Border Width="45%" CornerRadius="10" BorderWidth="1">
-		<VerticalStack>
-			<VerticalStack Height="45%">
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 1" Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 2"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="true" Caption="Check 3"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 4" Background="hgradient|0:LimeGreen|1:Transparent"/>
-			</VerticalStack>
-			<Splitter Thickness="3"/>
-			<VerticalStack Height="45%">
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 1" Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 2"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="true" Caption="Check 3"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox Height="25%" IsChecked="false" Caption="Check 4" Background="hgradient|0:LimeGreen|1:Transparent"/>
-			</VerticalStack>
-		</VerticalStack>
-	</Border>
-	<Splitter Thickness="3"/>
-	<Border Width="45%" CornerRadius="10" BorderWidth="1">
-		<VerticalStack Width="50%" Height="50%" Background="DimGrey">
-			<RadioButton IsChecked="false" Caption="Choice 1" Background="hgradient|0:DarkRed|1:Transparent"/>
-			<RadioButton IsChecked="false" Caption="Choice 2"  Background="hgradient|0:DarkRed|1:Transparent"/>
-			<RadioButton IsChecked="true" Caption="Choice 3"  Background="hgradient|0:DarkRed|1:Transparent"/>
-			<RadioButton IsChecked="false" Caption="Choice 4" Background="hgradient|0:DarkRed|1:Transparent"/>
-		</VerticalStack>
-	</Border>
-	<Splitter Thickness="3"/>
-</HorizontalStack>
diff --git a/Samples/common/ui/Interfaces/Splitter/3.crow b/Samples/common/ui/Interfaces/Splitter/3.crow
deleted file mode 100644
index 9a288963..00000000
--- a/Samples/common/ui/Interfaces/Splitter/3.crow
+++ /dev/null
@@ -1,44 +0,0 @@
-<?xml version="1.0"?>
-<VerticalStack Fit="true">
-	<Widget CornerRadius="5" Height="10" Width="600" Background="vgradient|0:Transparent|0.5:White|1:Transparent"/>
-	<HorizontalStack Fit="true" HorizontalAlignment="Left">
-		<Border Fit="true" CornerRadius="10" BorderWidth="1">
-			<VerticalStack Margin="10">
-				<CheckBox IsChecked="false" Caption="Check 1" Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox IsChecked="false" Caption="Check 2"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox IsChecked="true" Caption="Check 3"  Background="hgradient|0:LimeGreen|1:Transparent"/>
-				<CheckBox IsChecked="false" Caption="Check 4" Background="hgradient|0:LimeGreen|1:Transparent"/>
-			</VerticalStack>
-		</Border>
-		<Splitter/>
-		<Border Fit="true" CornerRadius="10" BorderWidth="1">
-			<VerticalStack Margin="10">
-				<RadioButton IsChecked="false" Caption="Choice 1" Background="hgradient|0:DarkRed|1:Transparent"/>
-				<Splitter/>
-				<RadioButton Width="Stretched" IsChecked="false" Caption="Choice 2"  Background="hgradient|0:DarkRed|1:Transparent"/>
-				<RadioButton IsChecked="true" Caption="Choice 3"  Background="hgradient|0:DarkRed|1:Transparent"/>
-				<RadioButton IsChecked="false" Caption="Choice 4" Background="hgradient|0:DarkRed|1:Transparent"/>
-			</VerticalStack>
-		</Border>
-		<Splitter Thickness="3" />
-		<Border Fit="true" CornerRadius="10" BorderWidth="1" MaximumSize="150,150" MinimumSize="50,50">
-			<VerticalStack Margin="10">
-				<Label Text="label 1" Background="hgradient|0:Blue|1:Transparent"/>
-				<Label Text="label 2" Background="hgradient|0:Blue|1:Transparent"/>
-				<Label Text="label 3" Background="hgradient|0:Blue|1:Transparent"/>
-				<Label Text="label 4" Width="Stretched" Background="hgradient|0:Blue|1:Transparent"/>
-			</VerticalStack>
-		</Border>
-		<Splitter/>
-		<Border Fit="true" CornerRadius="10" BorderWidth="1">
-			<VerticalStack Margin="10">
-				<Button Caption="Button 1" Background="hgradient|0:Red|1:DarkRed" CornerRadius="5"/>
-				<Button Caption="Button 2"  Background="hgradient|0:Green|1:Blue" CornerRadius="3"/>
-				<Button Caption="Button 3"  Background="hgradient|0:DarkRed|1:Transparent" CornerRadius="0"/>
-				<Button Caption="Button 4" Background="hgradient|0:DarkRed|1:Transparent" CornerRadius="8"/>
-			</VerticalStack>
-		</Border>
-		<Splitter/>
-	</HorizontalStack>
-	<Widget CornerRadius="5" Height="10" Width="600" Background="vgradient|0:Transparent|0.5:White|1:Transparent"/>
-</VerticalStack>
\ No newline at end of file
diff --git a/Samples/common/ui/Interfaces/TabItem.template b/Samples/common/ui/Interfaces/TabItem.template
deleted file mode 100644
index fd0f310d..00000000
--- a/Samples/common/ui/Interfaces/TabItem.template
+++ /dev/null
@@ -1,24 +0,0 @@
-<?xml version="1.0"?>
-<GenericStack Orientation="Vertical" Spacing="0"
-		Background="{./Background}"
-		MouseEnter="{/caption.Foreground=White}"
-		MouseLeave="{/caption.Foreground=Grey}">
-	<HorizontalStack Left="{./TabOffset}"
-		Name="TabTitle"
-		HorizontalAlignment="Left"
-		Height="{./TabHeight}"
-		Width="{./TabWidth}">
-		<Label Name="caption" Text="{./Caption}" Foreground="Grey" Width="Stretched"/>
-		<Label Text="{./ViewIndex}" Foreground="Green"/>
-		<Label Text="{./TabOffset}" Foreground="Red"/>
-		<Border CornerRadius="5" BorderWidth="1" Foreground="Transparent"  Height="12" Width="12"
-					MouseEnter="{Foreground=White}" MouseLeave="{Foreground=Transparent}">
-			<Image Focusable="true" Name="Image" Margin="0" Width="Stretched" Height="Stretched" Path="#Crow.Icons.exit2.svg"
-				 MouseClick="./butCloseTabClick"/>
-		</Border>
-	</HorizontalStack>
-	<Container Margin="20">
-		<Container Background="DimGrey" Name="Content"/>
-	</Container>
-</GenericStack>
-
diff --git a/Samples/common/ui/Interfaces/colorItem.crow b/Samples/common/ui/Interfaces/colorItem.crow
index 06169f2b..1def3811 100644
--- a/Samples/common/ui/Interfaces/colorItem.crow
+++ b/Samples/common/ui/Interfaces/colorItem.crow
@@ -1,10 +1,10 @@
 <?xml version="1.0"?>
-<Border Foreground="Transparent" Focusable="true" HorizontalAlignment="Left" Height="Fit">
-	<HorizontalStack Margin="1" Spacing="3"
-				MouseEnter="{Background=LightBlue}"
-				MouseLeave="{Background=Transparent}">
+<ListItem HorizontalAlignment="Left" Height="Fit"
+		Selected = "{Background=${ControlHighlight}}"
+		Unselected = "{Background=Transparent}">
+	<HorizontalStack Margin="1" Spacing="3">
 		<Widget Height="12" Width="20" Background="{}" Margin="0" CornerRadius="5"/>
 		<Label  Text="{}" Margin="0" Width="Stretched"/>
 	</HorizontalStack>
-</Border>
+</ListItem>
 
-- 
2.47.3