I have a problem with C# and F#.

On Pro WPF in C# 2008, page 90:

<Window x:Class="DockPanelAndStackPanel.Window1"

xmlns="[link:schemas.microsoft.com]

xmlns:x="[link:schemas.microsoft.com]

Title="Window1" Height="300" Width="300">

<DockPanel LastChildFill="True">

<StackPanel DockPanel.Dock="Bottom" HorizontalAlignment="Right"

Orientation="Horizontal">

<Button Margin="10, 10, 2, 10" Padding="3">OK</Button>

<Button Margin="2, 10, 10, 10" Padding="3">Cancel</Button>

</StackPanel>

<TextBox DockPanel.Dock="Top" Margin="10">

This is a test.

</TextBox>

</DockPanel>

</Window>

The TextBox (txt1) is showed at the top of the screen; the Button (OK, Cancel) at the bottom (right-faced) of the screen.

When I coded in F#:

#light

open System

open System.Windows

open System.Windows.Controls

let paddings = new Thickness(3.0)

let dockPanel = DockPanel(LastChildFill=true)

let add control = control |> dockPanel.Children.Add |> ignore

let panel = StackPanel(HorizontalAlignment=HorizontalAlignment.Right,

Orientation=Orientation.Horizontal)

DockPanel.SetDock(panel, Dock.Bottom)

Button(Margin=new Thickness(10.0, 10.0, 2.0, 10.0), Padding=paddings,

Content="OK") |> add

Button(Margin=new Thickness(2.0, 10.0, 10.0, 10.0), Padding=paddings,

Content="Cancel") |> add

panel |> add

let txt1 = TextBox(Margin=new Thickness(10.0), Text="This is a test.")

DockPanel.SetDock(txt1, Dock.Top)

txt1 |> add

[<STAThread>]

do

let makeWindow() =

let window = Window(WindowStartupLocation=

WindowStartupLocation.CenterScreen,

Title="Dock Panel and Stack Panel",

Width=350.0, Height=300.0)

window.Content <- dockPanel

window

makeWindow()

|> (Application()).Run

|> ignore

The mistake is Button (OK, Cancel) is left-faced; txt1 right-faced.