Mini Kabibi Habibi

Current Path : C:/Users/Public/Documents/DXperience 13.1 Demos/ASP.NET/VB/TouchBoard/Widgets/
Upload File :
Current File : C:/Users/Public/Documents/DXperience 13.1 Demos/ASP.NET/VB/TouchBoard/Widgets/Market.ascx.vb

Imports Microsoft.VisualBasic
Imports System
Imports System.Collections.Generic
Imports System.Linq
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls

Partial Public Class Widgets_Market
	Inherits System.Web.UI.UserControl
	Private Const ChartImageFolder As String = "~/Widgets/Images/Market/Charts/"

	Private privateOwnerZoneID As String
	Public Property OwnerZoneID() As String
		Get
			Return privateOwnerZoneID
		End Get
		Set(ByVal value As String)
			privateOwnerZoneID = value
		End Set
	End Property

	Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
		DockPanel.OwnerZoneUID = OwnerZoneID

		If (Not IsPostBack) Then
			For Each quote In MarketWidget.SelectQuotes()
				MarketWidget.Chart.CreateChart(MapPath(ChartImageFolder), quote.Symbol)
				marketChartsContainer.Controls.Add(New Image() With {.ClientIDMode = System.Web.UI.ClientIDMode.Static, .ID = "Chart_" & quote.Symbol, .ImageUrl = ChartImageFolder & quote.Symbol & ".png"})
			Next quote
		End If
	End Sub
End Class