From 44040dd7ab78b18b89a15fa315b876a847df61e4 Mon Sep 17 00:00:00 2001 From: syo68k Date: Thu, 20 May 2010 17:32:18 +0000 Subject: [PATCH] =?utf8?q?=E3=81=9D=E3=81=AE=E4=BB=96=E6=A9=9F=E8=83=BD?= =?utf8?q?=E3=81=AB=E3=80=8C=E3=81=93=E3=81=AE=E7=99=BA=E8=A8=80=E3=81=AER?= =?utf8?q?etweet=E5=9B=9E=E6=95=B0=E3=82=92=E7=A2=BA=E8=AA=8D=E3=80=8D?= =?utf8?q?=E3=82=92=E8=BF=BD=E5=8A=A0=20todo:=20=E3=83=87=E3=83=90?= =?utf8?q?=E3=83=83=E3=82=B0=E3=80=81=E3=82=A8=E3=83=A9=E3=83=BC=E5=87=A6?= =?utf8?q?=E7=90=86=E3=80=81=E8=A1=A8=E7=A4=BA=E5=86=85=E5=AE=B9=E3=81=AE?= =?utf8?q?=E8=A6=8B=E7=9B=B4=E3=81=97?= MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@347 e39ad16e-3079-482e-bb30-4b4d378143b6 --- Tween/Connection/HttpTwitter.vb | 15 ++ Tween/Resources/ChangeLog.txt | 4 + Tween/Tween.Designer.vb | 446 ++++++++++++++++++++-------------------- Tween/Tween.resx | 425 +++++++++++++++++++------------------- Tween/Tween.vb | 41 ++-- Tween/Twitter.vb | 48 +++++ 6 files changed, 530 insertions(+), 449 deletions(-) diff --git a/Tween/Connection/HttpTwitter.vb b/Tween/Connection/HttpTwitter.vb index eaccaaf9..f28e91f8 100644 --- a/Tween/Connection/HttpTwitter.vb +++ b/Tween/Connection/HttpTwitter.vb @@ -424,6 +424,21 @@ Public Class HttpTwitter _remainCountApi) End Function + Public Function Statusid_retweeted_by_ids(ByVal statusid As Long, ByVal count As Integer, ByVal page As Integer, ByRef content As String) As HttpStatusCode + Dim param As New Dictionary(Of String, String) + If count > 0 Then + param.Add("count", count.ToString()) + End If + If page > 0 Then + param.Add("page", page.ToString()) + End If + + Return httpCon.GetContent(GetMethod, _ + CreateTwitterUri("/1/statuses/" + statusid.ToString + "/retweeted_by/ids.xml"), _ + param, _ + content, _ + _remainCountApi) + End Function #Region "Proxy API" Private Shared _twitterUrl As String = "api.twitter.com" diff --git a/Tween/Resources/ChangeLog.txt b/Tween/Resources/ChangeLog.txt index 31f66c4f..081e8cc6 100644 --- a/Tween/Resources/ChangeLog.txt +++ b/Tween/Resources/ChangeLog.txt @@ -5,6 +5,10 @@ * 通信時のメッセージログで時間も参照できるように * 設定ファイル読み込み時のエラーチェックを見直し * ソート順表示の方向が逆だったのを修正 + * その他機能に「この発言のRetweet回数を確認」を追加。Webでは見えなかった100人以上のRTでも確認できます。100人ごとにAPIを1消費します。（例：550人がRTしていれば6消費） + * ニコ動の短縮パターンに漏れがあり、誤動作していたバグ修正 + * 発言履歴への追加・更新タイミング変更 + * 表示中の画像プレビューが閉じてしまう場合がある不具合修正 ==== Ver 0.9.1.0(2010/05/19) * リスト部のソート順表示が2カラムの場合に対応できていなかった問題を修正 ==== Ver 0.9.0.0(2010/05/19) diff --git a/Tween/Tween.Designer.vb b/Tween/Tween.Designer.vb index 0ff45212..36ca80c4 100644 --- a/Tween/Tween.Designer.vb +++ b/Tween/Tween.Designer.vb @@ -23,226 +23,226 @@ Partial Class TweenMain 'コード エディタを使って変更しないでください。 _ Private Sub InitializeComponent() - Me.components = New System.ComponentModel.Container + Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(TweenMain)) - Me.ToolStripContainer1 = New System.Windows.Forms.ToolStripContainer - Me.StatusStrip1 = New System.Windows.Forms.StatusStrip - Me.StatusLabelUrl = New System.Windows.Forms.ToolStripStatusLabel - Me.StatusLabel = New Tween.TweenCustomControl.ToolStripLabelHistory - Me.HashStripSplitButton = New System.Windows.Forms.ToolStripSplitButton + Me.ToolStripContainer1 = New System.Windows.Forms.ToolStripContainer() + Me.StatusStrip1 = New System.Windows.Forms.StatusStrip() + Me.StatusLabelUrl = New System.Windows.Forms.ToolStripStatusLabel() + Me.HashStripSplitButton = New System.Windows.Forms.ToolStripSplitButton() Me.ContextMenuStripPostMode = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.ToolStripMenuItemUrlMultibyteSplit = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItemApiCommandEvasion = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItemUrlAutoShorten = New System.Windows.Forms.ToolStripMenuItem - Me.IdeographicSpaceToSpaceToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MultiLineMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator - Me.HashToggleMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.HashManageMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SplitContainer1 = New System.Windows.Forms.SplitContainer - Me.ListTab = New System.Windows.Forms.TabControl + Me.ToolStripMenuItemUrlMultibyteSplit = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItemApiCommandEvasion = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItemUrlAutoShorten = New System.Windows.Forms.ToolStripMenuItem() + Me.IdeographicSpaceToSpaceToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MultiLineMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator8 = New System.Windows.Forms.ToolStripSeparator() + Me.HashToggleMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.HashManageMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() + Me.ListTab = New System.Windows.Forms.TabControl() Me.ContextMenuTabProperty = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.AddTabMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.TabRenameMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator20 = New System.Windows.Forms.ToolStripSeparator - Me.UreadManageMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.NotifyDispMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SoundFileComboBox = New System.Windows.Forms.ToolStripComboBox - Me.ToolStripSeparator18 = New System.Windows.Forms.ToolStripSeparator - Me.FilterEditMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator19 = New System.Windows.Forms.ToolStripSeparator - Me.ClearTabMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator11 = New System.Windows.Forms.ToolStripSeparator - Me.DeleteTabMenuItem = New System.Windows.Forms.ToolStripMenuItem + Me.AddTabMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TabRenameMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator20 = New System.Windows.Forms.ToolStripSeparator() + Me.UreadManageMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.NotifyDispMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SoundFileComboBox = New System.Windows.Forms.ToolStripComboBox() + Me.ToolStripSeparator18 = New System.Windows.Forms.ToolStripSeparator() + Me.FilterEditMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator19 = New System.Windows.Forms.ToolStripSeparator() + Me.ClearTabMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator11 = New System.Windows.Forms.ToolStripSeparator() + Me.DeleteTabMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TabImage = New System.Windows.Forms.ImageList(Me.components) - Me.SplitContainer3 = New System.Windows.Forms.SplitContainer - Me.SplitContainer2 = New System.Windows.Forms.SplitContainer - Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel - Me.UserPicture = New System.Windows.Forms.PictureBox + Me.SplitContainer3 = New System.Windows.Forms.SplitContainer() + Me.SplitContainer2 = New System.Windows.Forms.SplitContainer() + Me.TableLayoutPanel1 = New System.Windows.Forms.TableLayoutPanel() + Me.UserPicture = New System.Windows.Forms.PictureBox() Me.ContextMenuStrip3 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.IconNameToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator - Me.SaveIconPictureToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DateTimeLabel = New System.Windows.Forms.Label - Me.NameLabel = New System.Windows.Forms.Label + Me.IconNameToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem1 = New System.Windows.Forms.ToolStripSeparator() + Me.SaveIconPictureToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DateTimeLabel = New System.Windows.Forms.Label() + Me.NameLabel = New System.Windows.Forms.Label() Me.ContextMenuStripDetailName = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.FollowToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UnFollowToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ShowFriendShipToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ShowUserStatusToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.PostBrowser = New System.Windows.Forms.WebBrowser + Me.FollowToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UnFollowToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShowFriendShipToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShowUserStatusToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.PostBrowser = New System.Windows.Forms.WebBrowser() Me.ContextMenuStrip4 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem - Me.SearchItem2ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SearchItem1ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SearchItem3ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SearchItem4ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.CurrentTabToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator13 = New System.Windows.Forms.ToolStripSeparator - Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator - Me.FollowContextMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RemoveContextMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.FriendshipContextMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ShowUserStatusContextMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator32 = New System.Windows.Forms.ToolStripSeparator - Me.IdFilterAddMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator33 = New System.Windows.Forms.ToolStripSeparator - Me.UseHashtagMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.StatusText = New System.Windows.Forms.TextBox - Me.lblLen = New System.Windows.Forms.Label - Me.PostButton = New System.Windows.Forms.Button - Me.PreviewPicture = New System.Windows.Forms.PictureBox - Me.PreviewScrollBar = New System.Windows.Forms.VScrollBar - Me.MenuStrip1 = New System.Windows.Forms.MenuStrip - Me.MenuItemFile = New System.Windows.Forms.ToolStripMenuItem - Me.SettingFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator21 = New System.Windows.Forms.ToolStripSeparator - Me.SaveFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator23 = New System.Windows.Forms.ToolStripSeparator - Me.NotifyFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.PlaySoundFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.LockListFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator24 = New System.Windows.Forms.ToolStripSeparator - Me.EndFileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemEdit = New System.Windows.Forms.ToolStripMenuItem - Me.UndoRemoveTabMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator12 = New System.Windows.Forms.ToolStripSeparator - Me.CopySTOTMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.CopyURLMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator - Me.MenuItemSubSearch = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemSearchNext = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemSearchPrev = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator22 = New System.Windows.Forms.ToolStripSeparator - Me.PublicSearchQueryMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemOperate = New System.Windows.Forms.ToolStripMenuItem - Me.ReplyOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ReplyAllOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DmOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RtOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RtUnOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.QtOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator25 = New System.Windows.Forms.ToolStripSeparator - Me.FavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UnFavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ShowProfMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenHomeOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenFavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenStatusOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenRepSourceOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenFavotterOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenUrlOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenRterHomeMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.CreateRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.CreateTabRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.CreateIdRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator26 = New System.Windows.Forms.ToolStripSeparator - Me.ChangeReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UnreadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.JumpReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator27 = New System.Windows.Forms.ToolStripSeparator - Me.SelAllOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DelOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RefreshOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RefreshPrevOpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemTab = New System.Windows.Forms.ToolStripMenuItem - Me.CreateTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RenameTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator28 = New System.Windows.Forms.ToolStripSeparator - Me.UnreadMngTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.NotifyTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.SoundFileTbComboBox = New System.Windows.Forms.ToolStripComboBox - Me.ToolStripSeparator29 = New System.Windows.Forms.ToolStripSeparator - Me.EditRuleTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator30 = New System.Windows.Forms.ToolStripSeparator - Me.ClearTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator31 = New System.Windows.Forms.ToolStripSeparator - Me.DeleteTbMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemCommand = New System.Windows.Forms.ToolStripMenuItem - Me.TinyUrlConvertToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UrlConvertAutoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UrlUndoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.TinyURLToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.IsgdToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.TwurlnlToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UnuToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.BitlyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.JmpStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UpdateFollowersMenuItem1 = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator - Me.FollowCommandMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RemoveCommandMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.FriendshipMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator - Me.OwnStatusMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator34 = New System.Windows.Forms.ToolStripSeparator - Me.HashToggleToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.HashManageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MenuItemHelp = New System.Windows.Forms.ToolStripMenuItem - Me.MatomeMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator16 = New System.Windows.Forms.ToolStripSeparator - Me.VerUpMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator14 = New System.Windows.Forms.ToolStripSeparator - Me.ApiInfoMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.InfoTwitterMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator - Me.AboutMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DebugModeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DumpPostClassToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.TraceOutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem + Me.ToolStripMenuItem2 = New System.Windows.Forms.ToolStripMenuItem() + Me.SearchItem2ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SearchItem1ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SearchItem3ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SearchItem4ToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CurrentTabToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator13 = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripMenuItem3 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem4 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem5 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator5 = New System.Windows.Forms.ToolStripSeparator() + Me.FollowContextMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RemoveContextMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FriendshipContextMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShowUserStatusContextMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator32 = New System.Windows.Forms.ToolStripSeparator() + Me.IdFilterAddMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator33 = New System.Windows.Forms.ToolStripSeparator() + Me.UseHashtagMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.StatusText = New System.Windows.Forms.TextBox() + Me.lblLen = New System.Windows.Forms.Label() + Me.PostButton = New System.Windows.Forms.Button() + Me.PreviewPicture = New System.Windows.Forms.PictureBox() + Me.PreviewScrollBar = New System.Windows.Forms.VScrollBar() + Me.MenuStrip1 = New System.Windows.Forms.MenuStrip() + Me.MenuItemFile = New System.Windows.Forms.ToolStripMenuItem() + Me.SettingFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator21 = New System.Windows.Forms.ToolStripSeparator() + Me.SaveFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator23 = New System.Windows.Forms.ToolStripSeparator() + Me.NotifyFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.PlaySoundFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.LockListFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator24 = New System.Windows.Forms.ToolStripSeparator() + Me.EndFileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemEdit = New System.Windows.Forms.ToolStripMenuItem() + Me.UndoRemoveTabMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator12 = New System.Windows.Forms.ToolStripSeparator() + Me.CopySTOTMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CopyURLMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator6 = New System.Windows.Forms.ToolStripSeparator() + Me.MenuItemSubSearch = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemSearchNext = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemSearchPrev = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator22 = New System.Windows.Forms.ToolStripSeparator() + Me.PublicSearchQueryMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemOperate = New System.Windows.Forms.ToolStripMenuItem() + Me.ReplyOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ReplyAllOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DmOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RtOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RtUnOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.QtOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator25 = New System.Windows.Forms.ToolStripSeparator() + Me.FavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UnFavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShowProfMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenHomeOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenFavOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenStatusOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenRepSourceOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenFavotterOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenUrlOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenRterHomeMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CreateRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CreateTabRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.CreateIdRuleOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator26 = New System.Windows.Forms.ToolStripSeparator() + Me.ChangeReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UnreadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.JumpReadOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator27 = New System.Windows.Forms.ToolStripSeparator() + Me.SelAllOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DelOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RefreshOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RefreshPrevOpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemTab = New System.Windows.Forms.ToolStripMenuItem() + Me.CreateTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RenameTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator28 = New System.Windows.Forms.ToolStripSeparator() + Me.UnreadMngTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.NotifyTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.SoundFileTbComboBox = New System.Windows.Forms.ToolStripComboBox() + Me.ToolStripSeparator29 = New System.Windows.Forms.ToolStripSeparator() + Me.EditRuleTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator30 = New System.Windows.Forms.ToolStripSeparator() + Me.ClearTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator31 = New System.Windows.Forms.ToolStripSeparator() + Me.DeleteTbMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemCommand = New System.Windows.Forms.ToolStripMenuItem() + Me.TinyUrlConvertToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UrlConvertAutoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UrlUndoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TinyURLToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.IsgdToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TwurlnlToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UnuToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.BitlyToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.JmpStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UpdateFollowersMenuItem1 = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator() + Me.FollowCommandMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RemoveCommandMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FriendshipMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator3 = New System.Windows.Forms.ToolStripSeparator() + Me.OwnStatusMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator34 = New System.Windows.Forms.ToolStripSeparator() + Me.HashToggleToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.HashManageToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MenuItemHelp = New System.Windows.Forms.ToolStripMenuItem() + Me.MatomeMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator16 = New System.Windows.Forms.ToolStripSeparator() + Me.VerUpMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator14 = New System.Windows.Forms.ToolStripSeparator() + Me.ApiInfoMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator7 = New System.Windows.Forms.ToolStripSeparator() + Me.AboutMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DebugModeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DumpPostClassToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.TraceOutToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ContextMenuStrip2 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.ReplyStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ReplyAllStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DMStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ReTweetOriginalStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ReTweetStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.QuoteStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator - Me.FavAddToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.FavRemoveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ShowProfileMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem - Me.MoveToHomeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MoveToFavToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.StatusOpenMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RepliedStatusOpenMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.FavorareMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.OpenURLMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.MoveToRTHomeMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripMenuItem7 = New System.Windows.Forms.ToolStripMenuItem - Me.TabMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.IDRuleMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator - Me.ToolStripMenuItem11 = New System.Windows.Forms.ToolStripMenuItem - Me.ReadedStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.UnreadStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.JumpUnreadMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator10 = New System.Windows.Forms.ToolStripSeparator - Me.SelectAllMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.DeleteStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RefreshStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.RefreshMoreStripMenuItem = New System.Windows.Forms.ToolStripMenuItem + Me.ReplyStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ReplyAllStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DMStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ReTweetOriginalStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ReTweetStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.QuoteStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator2 = New System.Windows.Forms.ToolStripSeparator() + Me.FavAddToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FavRemoveToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ShowProfileMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem6 = New System.Windows.Forms.ToolStripMenuItem() + Me.MoveToHomeToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MoveToFavToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.StatusOpenMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RepliedStatusOpenMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.FavorareMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.OpenURLMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.MoveToRTHomeMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripMenuItem7 = New System.Windows.Forms.ToolStripMenuItem() + Me.TabMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.IDRuleMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator4 = New System.Windows.Forms.ToolStripSeparator() + Me.ToolStripMenuItem11 = New System.Windows.Forms.ToolStripMenuItem() + Me.ReadedStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.UnreadStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.JumpUnreadMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator10 = New System.Windows.Forms.ToolStripSeparator() + Me.SelectAllMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.DeleteStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RefreshStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.RefreshMoreStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.ContextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components) - Me.SettingStripMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator9 = New System.Windows.Forms.ToolStripSeparator - Me.SaveLogMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator17 = New System.Windows.Forms.ToolStripSeparator - Me.NewPostPopMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.PlaySoundMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ListLockMenuItem = New System.Windows.Forms.ToolStripMenuItem - Me.ToolStripSeparator15 = New System.Windows.Forms.ToolStripSeparator - Me.EndToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem + Me.SettingStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator9 = New System.Windows.Forms.ToolStripSeparator() + Me.SaveLogMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator17 = New System.Windows.Forms.ToolStripSeparator() + Me.NewPostPopMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.PlaySoundMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ListLockMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.ToolStripSeparator15 = New System.Windows.Forms.ToolStripSeparator() + Me.EndToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem() Me.TimerTimeline = New System.Windows.Forms.Timer(Me.components) Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components) - Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog + Me.SaveFileDialog1 = New System.Windows.Forms.SaveFileDialog() Me.TimerRefreshIcon = New System.Windows.Forms.Timer(Me.components) - Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog + Me.OpenFileDialog1 = New System.Windows.Forms.OpenFileDialog() Me.ToolTip1 = New System.Windows.Forms.ToolTip(Me.components) + Me.RtCountMenuItem = New System.Windows.Forms.ToolStripMenuItem() + Me.StatusLabel = New Tween.TweenCustomControl.ToolStripLabelHistory() Me.ToolStripContainer1.BottomToolStripPanel.SuspendLayout() Me.ToolStripContainer1.ContentPanel.SuspendLayout() Me.ToolStripContainer1.TopToolStripPanel.SuspendLayout() @@ -306,14 +306,6 @@ Partial Class TweenMain resources.ApplyResources(Me.StatusLabelUrl, "StatusLabelUrl") Me.StatusLabelUrl.Spring = True ' - 'StatusLabel - ' - Me.StatusLabel.BorderSides = System.Windows.Forms.ToolStripStatusLabelBorderSides.Right - Me.StatusLabel.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text - Me.StatusLabel.DoubleClickEnabled = True - Me.StatusLabel.Name = "StatusLabel" - resources.ApplyResources(Me.StatusLabel, "StatusLabel") - ' 'HashStripSplitButton ' Me.HashStripSplitButton.AutoToolTip = False @@ -1091,7 +1083,7 @@ Partial Class TweenMain ' 'MenuItemCommand ' - Me.MenuItemCommand.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TinyUrlConvertToolStripMenuItem, Me.UpdateFollowersMenuItem1, Me.ToolStripSeparator1, Me.FollowCommandMenuItem, Me.RemoveCommandMenuItem, Me.FriendshipMenuItem, Me.ToolStripSeparator3, Me.OwnStatusMenuItem, Me.ToolStripSeparator34, Me.HashToggleToolStripMenuItem, Me.HashManageToolStripMenuItem}) + Me.MenuItemCommand.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.TinyUrlConvertToolStripMenuItem, Me.UpdateFollowersMenuItem1, Me.ToolStripSeparator1, Me.FollowCommandMenuItem, Me.RemoveCommandMenuItem, Me.FriendshipMenuItem, Me.ToolStripSeparator3, Me.OwnStatusMenuItem, Me.ToolStripSeparator34, Me.HashToggleToolStripMenuItem, Me.HashManageToolStripMenuItem, Me.RtCountMenuItem}) Me.MenuItemCommand.Name = "MenuItemCommand" resources.ApplyResources(Me.MenuItemCommand, "MenuItemCommand") ' @@ -1193,7 +1185,7 @@ Partial Class TweenMain ' 'MenuItemHelp ' - Me.MenuItemHelp.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MatomeMenuItem, Me.ToolStripSeparator16, Me.VerUpMenuItem, Me.ToolStripSeparator14, Me.ApiInfoMenuItem, Me.InfoTwitterMenuItem, Me.ToolStripSeparator7, Me.AboutMenuItem, Me.DebugModeToolStripMenuItem}) + Me.MenuItemHelp.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.MatomeMenuItem, Me.ToolStripSeparator16, Me.VerUpMenuItem, Me.ToolStripSeparator14, Me.ApiInfoMenuItem, Me.ToolStripSeparator7, Me.AboutMenuItem, Me.DebugModeToolStripMenuItem}) Me.MenuItemHelp.Name = "MenuItemHelp" resources.ApplyResources(Me.MenuItemHelp, "MenuItemHelp") ' @@ -1222,11 +1214,6 @@ Partial Class TweenMain Me.ApiInfoMenuItem.Name = "ApiInfoMenuItem" resources.ApplyResources(Me.ApiInfoMenuItem, "ApiInfoMenuItem") ' - 'InfoTwitterMenuItem - ' - resources.ApplyResources(Me.InfoTwitterMenuItem, "InfoTwitterMenuItem") - Me.InfoTwitterMenuItem.Name = "InfoTwitterMenuItem" - ' 'ToolStripSeparator7 ' Me.ToolStripSeparator7.Name = "ToolStripSeparator7" @@ -1495,6 +1482,19 @@ Partial Class TweenMain ' Me.OpenFileDialog1.FileName = "OpenFileDialog1" ' + 'RtCountMenuItem + ' + Me.RtCountMenuItem.Name = "RtCountMenuItem" + resources.ApplyResources(Me.RtCountMenuItem, "RtCountMenuItem") + ' + 'StatusLabel + ' + Me.StatusLabel.BorderSides = System.Windows.Forms.ToolStripStatusLabelBorderSides.Right + Me.StatusLabel.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text + Me.StatusLabel.DoubleClickEnabled = True + Me.StatusLabel.Name = "StatusLabel" + resources.ApplyResources(Me.StatusLabel, "StatusLabel") + ' 'TweenMain ' Me.AllowDrop = True @@ -1601,7 +1601,6 @@ Partial Class TweenMain Friend WithEvents ToolStripSeparator16 As System.Windows.Forms.ToolStripSeparator Friend WithEvents VerUpMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripSeparator14 As System.Windows.Forms.ToolStripSeparator - Friend WithEvents InfoTwitterMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents ToolStripSeparator7 As System.Windows.Forms.ToolStripSeparator Friend WithEvents AboutMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents SplitContainer2 As System.Windows.Forms.SplitContainer @@ -1756,5 +1755,6 @@ Partial Class TweenMain Friend WithEvents ToolStripSeparator34 As System.Windows.Forms.ToolStripSeparator Friend WithEvents HashToggleToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem Friend WithEvents HashManageToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem + Friend WithEvents RtCountMenuItem As System.Windows.Forms.ToolStripMenuItem End Class diff --git a/Tween/Tween.resx b/Tween/Tween.resx index 85f95045..bb0c441c 100644 --- a/Tween/Tween.resx +++ b/Tween/Tween.resx @@ -126,7 +126,7 @@ - 348, 17 + 356, 17 ToolStripStatusLabel1 @@ -135,7 +135,7 @@ MiddleLeft - 61, 17 + 55, 17 Starting... @@ -147,25 +147,25 @@ 237, 17 - 242, 22 + 237, 22 URLからの全角文字列の切り離し - 242, 22 + 237, 22 APIコマンドを回避する - 242, 22 + 237, 22 自動的にURLを短縮する - 242, 22 + 237, 22 全角スペースを半角スペースにする @@ -174,19 +174,19 @@ Ctrl+Y - 242, 22 + 237, 22 発言欄複数行入力(&M) - 239, 6 + 234, 6 Ctrl+Shift+T - 242, 22 + 237, 22 ハッシュタグ自動付加 @@ -195,13 +195,13 @@ Ctrl+T - 242, 22 + 237, 22 ハッシュタグ設定 - 243, 164 + 238, 164 ContextMenuStripPostMode @@ -210,7 +210,7 @@ System.Windows.Forms.ContextMenuStrip, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - 45, 20 + 43, 20 #[-] @@ -268,67 +268,67 @@ 411, 54 - 196, 22 + 188, 22 タブ作成(&N)... - 196, 22 + 188, 22 タブ名の変更(&R) - 193, 6 + 185, 6 - 196, 22 + 188, 22 未読管理(&U) - 196, 22 + 188, 22 新着通知表示(&Q) - 121, 21 + 121, 20 再生するwavファイルを指定してください - 193, 6 + 185, 6 - 196, 22 + 188, 22 振り分けルール編集(&F)... - 193, 6 + 185, 6 - 196, 22 + 188, 22 このタブの発言をクリア(&C) - 193, 6 + 185, 6 - 196, 22 + 188, 22 タブ削除(&D) - 197, 207 + 189, 206 ContextMenuTabProperty @@ -406,22 +406,22 @@ 498, 91 - 122, 22 + 120, 22 IconName - 119, 6 + 117, 6 - 122, 22 + 120, 22 保存(&I)... - 123, 54 + 121, 54 ContextMenuStrip3 @@ -499,31 +499,31 @@ 17, 91 - 181, 22 + 177, 22 フォローする - 181, 22 + 177, 22 フォロー解除 - 181, 22 + 177, 22 相互フォロー状態表示 - 181, 22 + 177, 22 プロフィール表示 - 182, 92 + 178, 92 ContextMenuStripDetailName @@ -574,46 +574,46 @@ 434, 17 - 158, 22 + 160, 22 Google(&G) - 158, 22 + 160, 22 Wikipedia(&W) - 158, 22 + 160, 22 Twitter検索(&Y) - 158, 22 + 160, 22 Twitter Search(&S) - 158, 22 + 160, 22 現在のタブ(&L) - 196, 22 + 193, 22 選択文字列で検索(&S) - 193, 6 + 190, 6 - 196, 22 + 193, 22 選択文字列をコピー(&C) @@ -622,64 +622,64 @@ False - 196, 22 + 193, 22 URLをコピー(&U) - 196, 22 + 193, 22 すべて選択(&A) - 193, 6 + 190, 6 - 196, 22 + 193, 22 フォローする(&F) - 196, 22 + 193, 22 フォロー解除(&N) - 196, 22 + 193, 22 相互フォロー状態表示(&R) - 196, 22 + 193, 22 プロフィール表示 - 193, 6 + 190, 6 - 196, 22 + 193, 22 ID振分ルール作成(&I) - 193, 6 + 190, 6 - 196, 22 + 193, 22 ハッシュタグを固定(&H) - 197, 248 + 194, 248 ContextMenuStrip4 @@ -1084,85 +1084,85 @@ None - 171, 22 + 168, 22 設定(&O) - 168, 6 + 165, 6 - 171, 22 + 168, 22 ファイル保存(&S) - 168, 6 + 165, 6 - 171, 22 + 168, 22 新着通知(&Q) - 171, 22 + 168, 22 サウンド再生(&P) - 171, 22 + 168, 22 新着時リスト固定(&L) - 168, 6 + 165, 6 - 171, 22 + 168, 22 終了(&X) - 67, 20 + 66, 20 ファイル(&F) - 230, 22 + 225, 22 タブ削除の取消 - 227, 6 + 222, 6 - 230, 22 + 225, 22 コピー（STOT形式テキスト）(&C) - 230, 22 + 225, 22 コピー（ステータスURL）(&S) - 227, 6 + 222, 6 Ctrl+F - 230, 22 + 225, 22 検索(&F)... @@ -1171,7 +1171,7 @@ F3 - 230, 22 + 225, 22 次を検索(&X) @@ -1180,25 +1180,25 @@ Shift+F3 - 230, 22 + 225, 22 前を検索(&P) - 227, 6 + 222, 6 Ctrl+Shift+F - 230, 22 + 225, 22 抽出条件入力(&Q) - 57, 20 + 56, 20 編集(&E) @@ -1207,7 +1207,7 @@ Ctrl+R - 232, 22 + 233, 22 ＠返信(&R) @@ -1216,7 +1216,7 @@ Ctrl+Shift+R - 232, 22 + 233, 22 ＠返信ALL(&E) @@ -1225,7 +1225,7 @@ Ctrl+M - 232, 22 + 233, 22 DM送信(&M) @@ -1234,7 +1234,7 @@ Alt+R - 232, 22 + 233, 22 Re&tweet @@ -1243,7 +1243,7 @@ Alt+Shift+R - 232, 22 + 233, 22 Retweet(U&nofficial) @@ -1252,19 +1252,19 @@ Ctrl+Q - 232, 22 + 233, 22 &Quote - 229, 6 + 230, 6 Ctrl+S - 232, 22 + 233, 22 Fav追加(&F) @@ -1273,7 +1273,7 @@ Ctrl+Shift+S - 232, 22 + 233, 22 Fav削除(&V) @@ -1285,7 +1285,7 @@ Alt+P - 232, 22 + 233, 22 プロフィール表示 @@ -1294,7 +1294,7 @@ Ctrl+H - 268, 22 + 266, 22 ホームを開く(&H) @@ -1303,7 +1303,7 @@ Ctrl+G - 268, 22 + 266, 22 Favを開く(&G) @@ -1312,7 +1312,7 @@ Ctrl+O - 268, 22 + 266, 22 ステータスを開く(&O) @@ -1321,7 +1321,7 @@ Ctrl+I - 268, 22 + 266, 22 返信元ステータスを開く(&I) @@ -1330,7 +1330,7 @@ Ctrl+Shift+O - 268, 22 + 266, 22 ふぁぼられを開く(&P) @@ -1339,7 +1339,7 @@ Ctrl+E - 268, 22 + 266, 22 発言内URLを開く(&U) @@ -1348,43 +1348,43 @@ Ctrl+Shift+H - 268, 22 + 266, 22 RTした人のホームを開く(&R) - 232, 22 + 233, 22 開く(&O) - 202, 22 + 199, 22 タブ振り分けルール作成(&N) - 202, 22 + 199, 22 ID振り分けルール作成(&I) - 232, 22 + 233, 22 振り分けルール作成(&C) - 229, 6 + 230, 6 Ctrl+B - 209, 22 + 206, 22 既読にする(&B) @@ -1393,31 +1393,31 @@ Ctrl+Shift+B - 209, 22 + 206, 22 未読にする(&U) - 232, 22 + 233, 22 未読状態変更(&H) - 232, 22 + 233, 22 未読へジャンプ(&J) - 229, 6 + 230, 6 Ctrl+A - 232, 22 + 233, 22 全て選択(&A) @@ -1426,7 +1426,7 @@ Ctrl+D - 232, 22 + 233, 22 削除(&D) @@ -1435,7 +1435,7 @@ F5 - 232, 22 + 233, 22 更新(&U) @@ -1444,79 +1444,79 @@ Shift+F5 - 232, 22 + 233, 22 前データを取得(&I) - 59, 20 + 57, 20 操作(&O) - 196, 22 + 188, 22 タブ作成(&N)... - 196, 22 + 188, 22 タブ名変更(&R) - 193, 6 + 185, 6 - 196, 22 + 188, 22 未読管理(&U) - 196, 22 + 188, 22 新着通知表示(&Q) - 121, 21 + 121, 20 - 193, 6 + 185, 6 - 196, 22 + 188, 22 振り分けルール編集(&F)... - 193, 6 + 185, 6 - 196, 22 + 188, 22 このタブの発言をクリア(&C) - 193, 6 + 185, 6 Ctrl+W - 196, 22 + 188, 22 タブ削除(&D) - 50, 20 + 49, 20 タブ(&T) @@ -1525,7 +1525,7 @@ Ctrl+L - 220, 22 + 215, 22 短縮サービス自動選択 @@ -1534,97 +1534,97 @@ False - 220, 22 + 215, 22 元に戻す - 220, 22 + 215, 22 TinyURL - 220, 22 + 215, 22 is.gd - 220, 22 + 215, 22 twurl.nl - 220, 22 + 215, 22 u.nu - 220, 22 + 215, 22 bit.ly - 220, 22 + 215, 22 j.mp - 242, 22 + 237, 22 入力欄のURLを短縮変換 - 242, 22 + 237, 22 片思いユーザーリスト取得 - 239, 6 + 234, 6 - 242, 22 + 237, 22 フォローする(&F) - 242, 22 + 237, 22 フォロー解除(&N) - 242, 22 + 237, 22 相互フォロー状態表示(&H) - 239, 6 + 234, 6 - 242, 22 + 237, 22 自プロフィール簡易表示 - 239, 6 + 234, 6 Ctrl+Shift+T - 242, 22 + 237, 22 ハッシュタグ自動付加 @@ -1633,13 +1633,19 @@ Ctrl+T - 242, 22 + 237, 22 ハッシュタグ設定 + + 237, 22 + + + この発言のRetweet回数を確認 + - 89, 20 + 88, 20 その他機能(&C) @@ -1648,61 +1654,52 @@ F1 - 194, 22 + 191, 22 Tweenまとめサイト(&H) - 191, 6 + 188, 6 - 194, 22 + 191, 22 最新版の取得(&G) - 191, 6 + 188, 6 - 194, 22 + 191, 22 API情報 - - False - - - 194, 22 - - - Twitterからのお知らせ(&I) - - 191, 6 + 188, 6 - 194, 22 + 191, 22 Tweenについて(&A)... - 157, 22 + 159, 22 PostClassのダンプ - 157, 22 + 159, 22 TraceOut出力 - 194, 22 + 191, 22 デバッグモード @@ -1711,7 +1708,7 @@ False - 63, 20 + 62, 20 ヘルプ(&H) @@ -1768,184 +1765,184 @@ 163, 54 - 185, 22 + 182, 22 @返信(&R) - 185, 22 + 182, 22 @返信ALL(&E) - 185, 22 + 182, 22 DM送信(&M) - 185, 22 + 182, 22 Re&tweet - 185, 22 + 182, 22 Retweet(U&nofficial) - 185, 22 + 182, 22 &Quote - 182, 6 + 179, 6 - 185, 22 + 182, 22 Fav追加(&F) - 185, 22 + 182, 22 Fav削除(&V) - 185, 22 + 182, 22 プロフィール表示 - 199, 22 + 198, 22 ホームを開く(&H) - 199, 22 + 198, 22 Favを開く(&G) - 199, 22 + 198, 22 ステータスを開く(&O) - 199, 22 + 198, 22 返信元ステータスを開く(&I) - 199, 22 + 198, 22 ふぁぼられを開く(&P) - 199, 22 + 198, 22 発言内URLを開く(&U) - 199, 22 + 198, 22 RTした人のホームを開く(&R) - 185, 22 + 182, 22 開く(&O) - 214, 22 + 205, 22 タブ振り分けルール作成(&N)... - 214, 22 + 205, 22 ID振り分けルール作成... - 185, 22 + 182, 22 振り分けルール作成(&C) - 182, 6 + 179, 6 - 140, 22 + 138, 22 既読にする(&B) - 140, 22 + 138, 22 未読にする - 185, 22 + 182, 22 未読状態変更(&H) - 185, 22 + 182, 22 未読へジャンプ(&J) - 182, 6 + 179, 6 - 185, 22 + 182, 22 全て選択(&A) - 185, 22 + 182, 22 削除(&D) - 185, 22 + 182, 22 更新(&U) - 185, 22 + 182, 22 前データを取得(&I) - 186, 396 + 183, 396 ContextMenuStrip2 @@ -1957,55 +1954,55 @@ 17, 54 - 171, 22 + 168, 22 設定(&O)... - 168, 6 + 165, 6 - 171, 22 + 168, 22 ファイル保存(&S)... - 168, 6 + 165, 6 - 171, 22 + 168, 22 新着通知(&Q) - 171, 22 + 168, 22 サウンド再生(&P) - 171, 22 + 168, 22 新着時リスト固定(&L) - 168, 6 + 165, 6 False - 171, 22 + 168, 22 終了(&X) - 172, 154 + 169, 154 ContextMenuStrip1 @@ -2064,12 +2061,6 @@ System.Windows.Forms.ToolStripStatusLabel, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - StatusLabel - - - Tween.TweenCustomControl.ToolStripLabelHistory, Tween, Version=0.1.0.0, Culture=neutral, PublicKeyToken=null - HashStripSplitButton @@ -2910,12 +2901,6 @@ System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - - InfoTwitterMenuItem - - - System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 - ToolStripSeparator7 @@ -3222,6 +3207,18 @@ System.Windows.Forms.ToolTip, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + RtCountMenuItem + + + System.Windows.Forms.ToolStripMenuItem, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 + + + StatusLabel + + + Tween.TweenCustomControl.ToolStripLabelHistory, Tween, Version=0.1.0.0, Culture=neutral, PublicKeyToken=null + TweenMain diff --git a/Tween/Tween.vb b/Tween/Tween.vb index 4f90aea6..fe204ca8 100644 --- a/Tween/Tween.vb +++ b/Tween/Tween.vb @@ -6044,18 +6044,6 @@ RETRY: Return MyBase.ProcessDialogKey(keyData) End Function - Private Sub InfoTwitterMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles InfoTwitterMenuItem.Click - If tw.InfoTwitter.Trim() = "" Then - MessageBox.Show(My.Resources.InfoTwitterMenuItem_ClickText1, My.Resources.InfoTwitterMenuItem_ClickText2, MessageBoxButtons.OK, MessageBoxIcon.Information) - Else - Dim inf As String = tw.InfoTwitter.Trim() - inf = "" + inf + "" - PostBrowser.Visible = False - PostBrowser.DocumentText = inf - PostBrowser.Visible = True - End If - End Sub - Private Sub ReplyAllStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ReplyAllStripMenuItem.Click, ReplyAllOpMenuItem.Click MakeReplyOrDirectStatus(False, True, True) End Sub @@ -8484,4 +8472,33 @@ RETRY: ShowUserStatus(_curPost.Name, False) End If End Sub + + Private Delegate Function GetRetweetCountDelegate(ByVal statusid As Long) As Integer + + Private Function doGetRetweetCount(ByVal statusid As Long) As Integer + Dim counter As Integer = 0 + tw.GetStatus_Retweeted_Count(statusid, counter) + Return counter + End Function + + Private Sub GetRetweetCallback(ByVal ar As IAsyncResult) + Dim retweet_count As Integer + Dim dlgt As GetRetweetCountDelegate = DirectCast(ar.AsyncState, GetRetweetCountDelegate) + retweet_count = dlgt.EndInvoke(ar) + + MessageBox.Show("Retweet_count = " + retweet_count.ToString) + End Sub + + Private Sub RtCountMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RtCountMenuItem.Click + If _curPost IsNot Nothing Then + Dim statusid As Long + Dim dlgRtCount As New GetRetweetCountDelegate(AddressOf doGetRetweetCount) + If _curPost.RetweetedId > 0 Then + statusid = _curPost.RetweetedId + Else + statusid = _curPost.Id + End If + Dim ar As IAsyncResult = dlgRtCount.BeginInvoke(statusid, New AsyncCallback(AddressOf GetRetweetCallback), dlgRtCount) + End If + End Sub End Class diff --git a/Tween/Twitter.vb b/Tween/Twitter.vb index ce30e44b..30692e70 100644 --- a/Tween/Twitter.vb +++ b/Tween/Twitter.vb @@ -852,6 +852,54 @@ Public Class Twitter Return "Err:" + res.ToString End Select End Function + + Public Function GetStatus_Retweeted_Count(ByVal StatusId As Long, ByRef retweeted_count As Integer) As String + + If _endingFlag Then Return "" + + If Twitter.AccountState <> ACCOUNT_STATE.Valid Then Return "" + + Dim res As HttpStatusCode + Dim content As String = "" + Dim xmlBuf As String = "" + + retweeted_count = 0 + + ' 注：dev.twitter.comに記述されているcountパラメータは間違い。100が正しい + For i As Integer = 1 To 20 + + Try + res = twCon.Statusid_retweeted_by_ids(StatusId, 100, i, content) + Catch ex As Exception + Return "Err:" + ex.Message + End Try + + Select Case res + Case HttpStatusCode.OK + Dim xdoc As New XmlDocument + Dim xnode As XmlNodeList + Dim result As String = "" + Try + xdoc.LoadXml(content) + xnode = xdoc.GetElementsByTagName("ids") + retweeted_count += xnode.ItemOf(0).ChildNodes.Count + If xnode.ItemOf(0).ChildNodes.Count < 100 Then Exit For + Catch ex As Exception + result = "Err:Invalid XML." + xmlBuf = Nothing + End Try + Case HttpStatusCode.BadRequest + Return "Err:API Limits?" + Case HttpStatusCode.Unauthorized + Twitter.AccountState = ACCOUNT_STATE.Invalid + Return "Check your Username/Password." + Case Else + Return "Err:" + res.ToString + End Select + Next + Return "" + End Function + Public Function PostFavAdd(ByVal id As Long) As String If _endingFlag Then Return "" -- 2.11.0