Private _MyUnreadStyle As Boolean
Private _MyDateTimeFormat As String
Private _MyDefaultTimeOut As Integer
- Private _MyProtectNotInclude As Boolean
+ 'Private _MyProtectNotInclude As Boolean
Private _MyLimitBalloon As Boolean
Private _MyPostAndGet As Boolean
Private _MyReplyPeriod As Integer
_MyUnreadStyle = chkUnreadStyle.Checked
_MyDateTimeFormat = CmbDateTimeFormat.Text
_MyDefaultTimeOut = CType(ConnectionTimeOut.Text, Integer)
- _MyProtectNotInclude = CheckProtectNotInclude.Checked
+ '_MyProtectNotInclude = CheckProtectNotInclude.Checked
_MyLimitBalloon = CheckBalloonLimit.Checked
_MyAutoShortUrlFirst = CType(ComboBoxAutoShortUrlFirst.SelectedIndex, UrlConverter)
_MyTabIconDisp = chkTabIconDisp.Checked
chkUnreadStyle.Checked = _MyUnreadStyle
CmbDateTimeFormat.Text = _MyDateTimeFormat
ConnectionTimeOut.Text = _MyDefaultTimeOut.ToString
- CheckProtectNotInclude.Checked = _MyProtectNotInclude
+ 'CheckProtectNotInclude.Checked = _MyProtectNotInclude
CheckBalloonLimit.Checked = _MyLimitBalloon
ComboBoxAutoShortUrlFirst.SelectedIndex = _MyAutoShortUrlFirst
chkTabIconDisp.Checked = _MyTabIconDisp
End Set
End Property
- Public Property ProtectNotInclude() As Boolean
- Get
- Return _MyProtectNotInclude
- End Get
- Set(ByVal value As Boolean)
- _MyProtectNotInclude = value
- End Set
- End Property
+ 'Public Property ProtectNotInclude() As Boolean
+ ' Get
+ ' Return _MyProtectNotInclude
+ ' End Get
+ ' Set(ByVal value As Boolean)
+ ' _MyProtectNotInclude = value
+ ' End Set
+ 'End Property
Public Property TabIconDisp() As Boolean
Get
Public UseUnreadStyle As Boolean = True
Public DateTimeFormat As String = "yyyy/MM/dd H:mm:ss"
Public DefaultTimeOut As Integer = 20
- Public ProtectNotInclude As Boolean = True
+ 'Public ProtectNotInclude As Boolean = True
Public LimitBalloon As Boolean = False
Public TabIconDisp As Boolean = True
Public ReplyIconState As REPLY_ICONSTATE = REPLY_ICONSTATE.StaticIcon
SettingDialog.UseUnreadStyle = _cfgCommon.UseUnreadStyle
SettingDialog.DefaultTimeOut = _cfgCommon.DefaultTimeOut
- SettingDialog.ProtectNotInclude = _cfgCommon.ProtectNotInclude
+ 'SettingDialog.ProtectNotInclude = _cfgCommon.ProtectNotInclude
SettingDialog.PlaySound = _cfgCommon.PlaySound
SettingDialog.DateTimeFormat = _cfgCommon.DateTimeFormat
SettingDialog.LimitBalloon = _cfgCommon.LimitBalloon
_cfgCommon.UseUnreadStyle = SettingDialog.UseUnreadStyle
_cfgCommon.DateTimeFormat = SettingDialog.DateTimeFormat
_cfgCommon.DefaultTimeOut = SettingDialog.DefaultTimeOut
- _cfgCommon.ProtectNotInclude = SettingDialog.ProtectNotInclude
+ '_cfgCommon.ProtectNotInclude = SettingDialog.ProtectNotInclude
_cfgCommon.LimitBalloon = SettingDialog.LimitBalloon
_cfgCommon.AutoShortUrlFirst = SettingDialog.AutoShortUrlFirst
_cfgCommon.TabIconDisp = SettingDialog.TabIconDisp
Me.RtOpMenuItem.Enabled = False
Me.RtUnOpMenuItem.Enabled = False
Me.QtOpMenuItem.Enabled = False
- Me.QuoteStripMenuItem.Enabled = False
If _curPost.IsMe Then
Me.DelOpMenuItem.Enabled = True
Else
Me.RtOpMenuItem.Enabled = True
Me.RtUnOpMenuItem.Enabled = True
Me.QtOpMenuItem.Enabled = True
- Me.QuoteStripMenuItem.Enabled = True
If _curPost.IsMe Then
Me.RtOpMenuItem.Enabled = False
Me.DelOpMenuItem.Enabled = True