From 41d2cf4139cb64b8364d3b3a3528a25a7bf6741b Mon Sep 17 00:00:00 2001 From: kiri_feather Date: Wed, 30 Jun 2010 02:30:28 +0000 Subject: [PATCH] =?utf8?q?Fav,DM,Search=E3=81=AE=E5=8F=96=E5=BE=97?= =?utf8?q?=E4=BB=B6=E6=95=B0=E3=83=91=E3=83=A9=E3=83=A1=E3=83=BC=E3=82=BF?= =?utf8?q?=E3=82=92=E7=84=A1=E8=A6=96=E3=81=97=E3=81=9F=E4=BB=B6=E6=95=B0?= =?utf8?q?=E3=82=92API=E3=81=8C=E8=BF=94=E3=81=99=E3=81=93=E3=81=A8?= =?utf8?q?=E3=81=8C=E3=81=82=E3=82=8B=E3=81=AE=E3=81=A7=E5=AF=BE=E5=87=A6?= =?utf8?q?=20=E3=82=AC=E3=83=99=E3=83=BC=E3=82=B8=E3=82=B3=E3=83=AC?= =?utf8?q?=E3=82=AF=E3=82=BF=E5=8B=95=E3=81=8B=E3=81=95=E3=81=AA=E3=81=84?= =?utf8?q?=E3=82=88=E3=81=86=E3=81=AB=E6=88=BB=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@553 e39ad16e-3079-482e-bb30-4b4d378143b6 --- Tween/Tween.vb | 12 ++++++------ Tween/Twitter.vb | 12 ++++++------ 2 files changed, 12 insertions(+), 12 deletions(-) diff --git a/Tween/Tween.vb b/Tween/Tween.vb index 7b9ff03f..cfac10b5 100644 --- a/Tween/Tween.vb +++ b/Tween/Tween.vb @@ -7458,12 +7458,12 @@ RETRY: bw.RunWorkerAsync(args) - Static cnt As Integer = 0 - cnt += 1 - If cnt > 100 Then - GC.Collect() - cnt = 0 - End If + 'Static cnt As Integer = 0 + 'cnt += 1 + 'If cnt > 100 Then + ' GC.Collect() + ' cnt = 0 + 'End If End Sub Private Sub TweenMain_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown diff --git a/Tween/Twitter.vb b/Tween/Twitter.vb index 28e76e91..eafd0739 100644 --- a/Tween/Twitter.vb +++ b/Tween/Twitter.vb @@ -1864,8 +1864,8 @@ Public Class Twitter If Not TabInformations.GetInstance.ContainsTab(tab) Then Return "" Dim arIdx As Integer = -1 - Dim dlgt(40) As GetIconImageDelegate 'countQueryに合わせる - Dim ar(40) As IAsyncResult 'countQueryに合わせる + Dim dlgt(300) As GetIconImageDelegate 'countQueryに合わせる + Dim ar(300) As IAsyncResult 'countQueryに合わせる Dim xdoc As New XmlDocument Try xdoc.LoadXml(content) @@ -1993,8 +1993,8 @@ Public Class Twitter End Select Dim arIdx As Integer = -1 - Dim dlgt(20) As GetIconImageDelegate 'countQueryに合わせる - Dim ar(20) As IAsyncResult 'countQueryに合わせる + Dim dlgt(300) As GetIconImageDelegate 'countQueryに合わせる + Dim ar(300) As IAsyncResult 'countQueryに合わせる Dim xdoc As New XmlDocument Try xdoc.LoadXml(content) @@ -2107,8 +2107,8 @@ Public Class Twitter End Select Dim arIdx As Integer = -1 - Dim dlgt(_countApi) As GetIconImageDelegate 'countQueryに合わせる - Dim ar(_countApi) As IAsyncResult 'countQueryに合わせる + Dim dlgt(300) As GetIconImageDelegate 'countQueryに合わせる + Dim ar(300) As IAsyncResult 'countQueryに合わせる Dim xdoc As New XmlDocument Try xdoc.LoadXml(content) -- 2.11.0