From c47b8fef5b71e5e8c9415aeba762ebc382548df3 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Wies=C5=82aw=20=C5=A0olt=C3=A9s?= <wieslaw.soltes@gmail.com>
Date: Sat, 14 Nov 2015 23:00:03 +0100
Subject: [PATCH 1/2] Added TabStripPlacement property

---
 src/Perspex.Controls/TabControl.cs | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

diff --git a/src/Perspex.Controls/TabControl.cs b/src/Perspex.Controls/TabControl.cs
index 3974fe2533..30f4bac01c 100644
--- a/src/Perspex.Controls/TabControl.cs
+++ b/src/Perspex.Controls/TabControl.cs
@@ -28,6 +28,12 @@ namespace Perspex.Controls
         private static readonly IMemberSelector s_contentSelector =
             new FuncMemberSelector<object, object>(SelectContent);
 
+        /// <summary>
+        /// Defines the <see cref="TabStripPlacement"/> property.
+        /// </summary>
+        public static readonly PerspexProperty<Dock> TabStripPlacementProperty =
+            PerspexProperty.Register<TabControl, Dock>(nameof(TabStripPlacement), defaultValue: Dock.Top);
+
         /// <summary>
         /// Initializes static members of the <see cref="TabControl"/> class.
         /// </summary>
@@ -36,6 +42,7 @@ namespace Perspex.Controls
             SelectionModeProperty.OverrideDefaultValue<TabControl>(SelectionMode.AlwaysSelected);
             FocusableProperty.OverrideDefaultValue<TabControl>(false);
             SelectedItemProperty.Changed.AddClassHandler<TabControl>(x => x.SelectedItemChanged);
+            AffectsMeasure(TabStripPlacementProperty);
         }
 
         /// <summary>
@@ -64,6 +71,15 @@ namespace Perspex.Controls
             set { SetValue(TransitionProperty, value); }
         }
 
+        /// <summary>
+        /// Gets or sets the tabstrip placement of the tabcontrol.
+        /// </summary>
+        public Dock TabStripPlacement
+        {
+            get { return GetValue(TabStripPlacementProperty); }
+            set { SetValue(TabStripPlacementProperty, value); }
+        }
+
         /// <summary>
         /// Asks the control whether it wants to reparent the logical children of the specified
         /// control.

From e7fc9415aed8f5ba9d789d102a93f4d2eee749d7 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Wies=C5=82aw=20=C5=A0olt=C3=A9s?= <wieslaw.soltes@gmail.com>
Date: Sat, 14 Nov 2015 23:00:27 +0100
Subject: [PATCH 2/2] Added TabStripPlacement style selectors

---
 src/Perspex.Themes.Default/TabControl.paml | 96 ++++++++++++++++++----
 1 file changed, 81 insertions(+), 15 deletions(-)

diff --git a/src/Perspex.Themes.Default/TabControl.paml b/src/Perspex.Themes.Default/TabControl.paml
index d5d7ba3c9f..0809be9077 100644
--- a/src/Perspex.Themes.Default/TabControl.paml
+++ b/src/Perspex.Themes.Default/TabControl.paml
@@ -1,15 +1,81 @@
-<Style xmlns="https://github.com/perspex" Selector="TabControl">
-  <Setter Property="Template">
-    <ControlTemplate>
-      <Grid RowDefinitions="Auto,*">
-        <TabStrip Items="{TemplateBinding Items}"
-                  SelectedIndex="{TemplateBinding Path=SelectedIndex, Mode=TwoWay}"/>
-        <Carousel Items="{TemplateBinding Items}"
-                  MemberSelector="Content"
-                  SelectedIndex="{TemplateBinding Path=SelectedIndex}"
-                  Transition="{TemplateBinding Transition}"
-                  Grid.Row="1"/>
-      </Grid>
-    </ControlTemplate>
-  </Setter>
-</Style>
\ No newline at end of file
+<Styles xmlns="https://github.com/perspex">
+  <Style Selector="TabControl[TabStripPlacement=Top]">
+    <Setter Property="Template">
+      <ControlTemplate>
+        <Grid RowDefinitions="Auto,*">
+          <TabStrip Items="{TemplateBinding Items}"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex, Mode=TwoWay}"/>
+          <Carousel Items="{TemplateBinding Items}"
+                    MemberSelector="Content"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex}"
+                    Transition="{TemplateBinding Transition}"
+                    Grid.Row="1"/>
+        </Grid>
+      </ControlTemplate>
+    </Setter>
+  </Style>
+  <Style Selector="TabControl[TabStripPlacement=Bottom]">
+    <Setter Property="Template">
+      <ControlTemplate>
+        <Grid RowDefinitions="*,Auto">
+          <Carousel Items="{TemplateBinding Items}"
+                    MemberSelector="Content"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex}"
+                    Transition="{TemplateBinding Transition}"/>
+          <TabStrip Items="{TemplateBinding Items}"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex, Mode=TwoWay}"
+                    Grid.Row="1"/>
+        </Grid>
+      </ControlTemplate>
+    </Setter>
+  </Style>
+  <Style Selector="TabControl[TabStripPlacement=Left]">
+    <Setter Property="Template">
+      <ControlTemplate>
+        <Grid ColumnDefinitions="Auto,*">
+          <Border>
+            <ScrollViewer>
+              <TabStrip Items="{TemplateBinding Items}"
+                        SelectedIndex="{TemplateBinding Path=SelectedIndex, Mode=TwoWay}">
+                <TabStrip.ItemsPanel>
+                  <ItemsPanelTemplate>
+                    <StackPanel Orientation="Vertical"/>
+                  </ItemsPanelTemplate>
+                </TabStrip.ItemsPanel>
+              </TabStrip>
+            </ScrollViewer>
+          </Border>
+          <Carousel Items="{TemplateBinding Items}"
+                    MemberSelector="Content"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex}"
+                    Transition="{TemplateBinding Transition}"
+                    Grid.Column="1"/>
+        </Grid>
+      </ControlTemplate>
+    </Setter>
+  </Style>
+  <Style Selector="TabControl[TabStripPlacement=Right]">
+    <Setter Property="Template">
+      <ControlTemplate>
+        <Grid ColumnDefinitions="*,Auto">
+          <Carousel Items="{TemplateBinding Items}"
+                    MemberSelector="Content"
+                    SelectedIndex="{TemplateBinding Path=SelectedIndex}"
+                    Transition="{TemplateBinding Transition}"/>
+          <Border Grid.Column="1">
+            <ScrollViewer>
+              <TabStrip Items="{TemplateBinding Items}"
+                        SelectedIndex="{TemplateBinding Path=SelectedIndex, Mode=TwoWay}">
+                <TabStrip.ItemsPanel>
+                  <ItemsPanelTemplate>
+                    <StackPanel Orientation="Vertical"/>
+                  </ItemsPanelTemplate>
+                </TabStrip.ItemsPanel>
+              </TabStrip>
+            </ScrollViewer>
+          </Border>
+        </Grid>
+      </ControlTemplate>
+    </Setter>
+  </Style>
+</Styles>
\ No newline at end of file