
Partial Class uc_TitleBar_big
    Inherits System.Web.UI.UserControl

#Region "********************** プロパティ **********************"

    Private _mode As String = ""
    Public Property Mode() As String
        Get
            Return _mode
        End Get
        Set(ByVal value As String)
            _mode = value
        End Set
    End Property

    Public Property Text() As String
        Get
            Return msp_asp_menutitle.Text
        End Get
        Set(ByVal value As String)
            msp_asp_menutitle.Text = value
        End Set
    End Property

    Private _scrolltop As Boolean = False
    Public Property ScrollTop() As Boolean
        Get
            Return _scrolltop
        End Get
        Set(ByVal value As Boolean)
            _scrolltop = value
        End Set
    End Property

#End Region

#Region "******************** ページイベント ********************"

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If "point".Equals(_mode) Then
            msp_img_title.ImageUrl = "~/img/title_point.png"
        ElseIf "search".Equals(_mode) Then
            msp_img_title.ImageUrl = "~/img/search.png"
        End If

        If _scrolltop Then
            pnl_scrolltop.Visible = True
        Else
            pnl_scrolltop.Visible = False
        End If
    End Sub

#End Region

End Class
