Sub CoverFlow_OnMouseClicked(Position As Int, Value As Object)
If MainForm.RootPane.NumberOfNodes > 2 Then
MainForm.RootPane.RemoveNodeAt(2)
End If
Dim x As Int = (MainForm.WindowWidth /2)-250
MainForm.RootPane.AddNode(img,x,0,500,300)
img2.Initialize("",Value)
img.SetImage(img2)
Log("Position = " & Position)
Log("Value = " & Value)
End Sub