If _UseAdditionalFlags AndAlso Not SettingDialog.MoreCountApi = 0 Then
_UseAdditionalFlags = False
ret = tw.GetTimelineApiAdditional(read, args.type, args.page = -1, SettingDialog.MoreCountApi)
- ElseIf _FirstRefreshFlags AndAlso SettingDialog.UseChangeGetCount.Checked AndAlso Not SettingDialog.FirstCountApi = 0 Then
+ ElseIf _FirstRefreshFlags AndAlso SettingDialog.UseAdditionalCount AndAlso Not SettingDialog.FirstCountApi = 0 Then
_FirstRefreshFlags = False
ret = tw.GetTimelineApiAdditional(read, args.type, args.page = -1, SettingDialog.FirstCountApi)
Else
bw.ReportProgress(50, MakeStatusMessage(args, False))
If args.tName = "" Then
For Each tb As TabClass In _statuses.GetTabsByType(TabUsageType.Lists)
- If _FirstListsRefreshFlags AndAlso SettingDialog.UseChangeGetCount.Checked AndAlso Not SettingDialog.FirstCountApi = 0 Then
+ If _FirstListsRefreshFlags AndAlso SettingDialog.UseAdditionalCount AndAlso Not SettingDialog.FirstCountApi = 0 Then
_FirstListsRefreshFlags = False
If tb.ListInfo IsNot Nothing AndAlso tb.ListInfo.Id <> 0 Then ret = tw.GetListStatusAdditional(read, tb, False, SettingDialog.FirstCountApi)
Else
e.SuppressKeyPress = True
GoFav(False)
ElseIf e.KeyCode = Keys.R OrElse e.KeyCode = Keys.F5 Then
- If SettingDialog.UseChangeGetCount.Checked Then
+ If SettingDialog.UseAdditionalCount Then
_UseAdditionalFlags = True
End If
e.Handled = True
e.SuppressKeyPress = True
MenuItemSearchPrev_Click(Nothing, Nothing)
ElseIf e.KeyCode = Keys.F5 Then
- If SettingDialog.UseChangeGetCount.Checked Then
+ If SettingDialog.UseAdditionalCount Then
_UseAdditionalFlags = True
End If
e.Handled = True
ToolStripFocusLockMenuItem.IsDisposed = False Then
_cfgCommon.FocusLockToStatusText = Me.ToolStripFocusLockMenuItem.Checked
End If
- _cfgCommon.UseAdditionalCount = SettingDialog.UseChangeGetCount.Checked
+ _cfgCommon.UseAdditionalCount = SettingDialog.UseAdditionalCount
_cfgCommon.MoreCountApi = SettingDialog.MoreCountApi
_cfgCommon.FirstCountApi = SettingDialog.FirstCountApi
MenuItemSearchPrev_Click(Nothing, Nothing)
Case Keys.F5, _
Keys.R
- If SettingDialog.UseChangeGetCount.Checked Then
+ If SettingDialog.UseAdditionalCount Then
_UseAdditionalFlags = True
End If
e.IsInputKey = True
Private Sub RefreshMoreStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RefreshMoreStripMenuItem.Click, RefreshPrevOpMenuItem.Click
'もっと前を取得
- If SettingDialog.UseChangeGetCount.Checked Then
+ If SettingDialog.UseAdditionalCount Then
_UseAdditionalFlags = True
End If
DoRefreshMore()