Changeset 18693

Show
Ignore:
Timestamp:
09/03/08 02:02:50 (6 years ago)
Author:
kiri_feather
Message:

URLを開く際のハンドルリーク対策(暫定)
コンパイルエラー対応

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • lang/vb2005/Tween/Tween/Tween.vb

    r18356 r18693  
    35073507        Try 
    35083508            If SettingDialog.BrowserPath <> "" Then 
    3509                 System.Diagnostics.Process.Start(SettingDialog.BrowserPath, myPath) 
     3509                'System.Diagnostics.Process.Start(SettingDialog.BrowserPath, myPath) 
     3510                Shell(SettingDialog.BrowserPath & " " & myPath) 
    35103511            Else 
    35113512                System.Diagnostics.Process.Start(myPath) 
     
    60336034            lItem.Protect = itm.SubItems(0).Text.Contains("Ю") 
    60346035            lItem.Reply = CBool(itm.SubItems(11).Text) 
    6035             lItem.Unread = IIf(itm.SubItems(8).Text = "True", "False", "True") 
     6036            lItem.Readed = IIf(itm.SubItems(8).Text = "True", True, False) 
    60366037            itm.SubItems(0).Text = itm.SubItems(0).Text.Replace("♪", "") 
    60376038