リソースハッカーでいじる。RCDataのTKATJUSHAMAINFORM がそれ。

  • ゴミ箱の横の×印を このタブ以外全て閉じる に変える
  • ゴミ箱の横の×印を 全て閉じる に変えて、メニューで閉じ方も選べる
  • 既得レス表示数変更ボタン を押したら即全レス表示に
  • スレッド一覧にグリッドつけたりアンダーライン引いたり
  • 重要度を増やす
  • 間違ってログを消さないように
  • スレッド一覧をシングルじゃなくてダブルクリックでスレを開くようにする
  • アクティブなタブのログを今すぐに保存する

    → やってみてダメだったパターン
    ★ゴミ箱の横の×印を このタブ以外全て閉じる に変える 
                                                        
          object TabCloseButton: TToolButton
            Left = 196
            Top = 0
            Hint = 'タブを閉じる'
            ImageIndex = 4
            ParentShowHint = False
            ShowHint = True
            OnClick = TabCloseButtonClick
          end

    
          object TabCloseButton: TToolButton
            Left = 196
            Top = 0
            Hint = 'このタブ以外全て閉じる'
            ImageIndex = 4
            ParentShowHint = False
            ShowHint = True
            OnClick = TabMenuCloseAllecClick
          end

    ★ゴミ箱の横の×印を 全て閉じる に変えて、メニューで閉じ方も選べる 
                                                        
          object TabCloseButton: TToolButton
            Left = 196
            Top = 0
            Hint = 'タブを閉じる'
            ImageIndex = 4
            ParentShowHint = False
            ShowHint = True
            OnClick = TabCloseButtonClick
          end


    
          object TabCloseButton: TToolButton
            Left = 196
            Top = 0
            Hint = '全て閉じる'
            DropdownMenu = DeleteSelectMenu
            ImageIndex = 4
            ParentShowHint = False
            ShowHint = True
            Style = tbsDropDown
            OnClick = TabMenuCloseAllClick
          end

    後ろの方のどこか適当なところに

  object DeleteSelectMenu: TPopupMenu
    AutoHotkeys = maManual
    Left = 0
    Top = 196
    object DelClose: TMenuItem
      Caption = '閉じる'
      OnClick = TabMenuCloseClick
    end
    object DelCloseAll: TMenuItem
      Caption = '全て閉じる'
      OnClick = TabMenuCloseAllClick
    end
    object DelCloseAllec: TMenuItem
      Caption = 'このタブ以外全て閉じる'
      OnClick = TabMenuCloseAllecClick
    end
  end

    ★既得レス表示数変更ボタン を押したら即全レス表示に 
                                                        
          object TempResMaxChange: TToolButton
            Left = 0
            Top = 0
            Hint = '既得レス表示数変更'
            DropdownMenu = ResMaxMenu
            ImageIndex = 6
            ParentShowHint = False
            ShowHint = True
            Style = tbsDropDown
            OnClick = ResMaxChangeClick
          end

    ★スレッド一覧にグリッドつけたりアンダーライン引いたり 
                                                        
    object ThreadListView: TdfsExtListView
[中略]
        item
          Caption = 'メモ'
        end>
      HideSelection = False
      ExtendedStyles = [lvxGridLines, lvxHeaderDragDrop, lvxFullRowSelect, lvxInfoTip]
      VirtualMode = True
      NoColumnResize = False
      SaveSettings.AutoSave = True
      SaveSettings.SaveCurrentSort = False
[後略]

                                                        
      HideSelection = False
      ExtendedStyles = [lvxUnderlineHot, lvxHeaderDragDrop, lvxFullRowSelect, lvxInfoTip]
      VirtualMode = True

    ★重要度を増やす 
                                                        
    object PriorityMenu: TMenuItem
      Caption = '重要度'
      object Priority10: TMenuItem
        Tag = 10
        Caption = '+5'
        RadioItem = True
        OnClick = Priority5Click
      end
      object Priority9: TMenuItem
        Tag = 9
        Caption = '+4'
        RadioItem = True
        OnClick = Priority5Click
      end
      object Priority8: TMenuItem
        Tag = 8
        Caption = '+3'
        RadioItem = True
        OnClick = Priority5Click
      end
      object Priority7: TMenuItem
        Tag = 7
        Caption = '+2'
        RadioItem = True
        OnClick = Priority5Click
      end

[後略] 重要度-4,-5も同様に

    重要度は-5〜250 まで設定可能
    Priority○○の数字から 5 を引いた値が重要度になります。
    [豆知識] ○○は unsigned char にキャストされます。
    [参照] logのidx

    ★間違ってログ消さない対策 
                                                        
          object LogDelete: TToolButton
            Left = 173
            Top = 0
            Hint = 'ログ削除'
            ImageIndex = 3
            ParentShowHint = False
            ShowHint = True
            DropDownMenu = LogDeleteSelectMenu
          end
    		 
    後ろの方のどこか適当なところに

  object LogDeleteSelectMenu: TPopupMenu
    AutoHotkeys = maManual
    Left = 0
    Top = 196
    object LogClose: TMenuItem
      Caption = 'ホントに消す'
      OnClick = LogDeleteClick
    end
  end
    ★スレッド一覧をシングルじゃなくてダブルクリックでスレを開くようにする 
                                                        
    object ThreadListView: TdfsExtListView
(省略)
      Constraints.MinHeight = 1
      Constraints.MinWidth = 1
      OnClick = ThreadListViewClick
      ReadOnly = True
      Font.Charset = SHIFTJIS_CHARSET
(省略)

                                                        
    object ThreadListView: TdfsExtListView
(省略)
      Constraints.MinHeight = 1
      Constraints.MinWidth = 1
      OnDblClick = ThreadListViewClick
      ReadOnly = True
      Font.Charset = SHIFTJIS_CHARSET
(省略)
    ★アクティブなタブのログを今すぐに保存する 
                                                        
  object TabMenu: TPopupMenu
    AutoHotkeys = maManual
    OnPopup = TabMenuPopup
    Left = 260
    Top = 208
    object TabMenuClose: TMenuItem
      Caption = '閉じる'
      OnClick = TabMenuCloseClick
    end
(中略)
    object TabMenuLogSave: TMenuItem
      Caption = 'アクティブタブのログ保存'
      OnClick = DoSavelogClick
    end
  end

    ログ保存モード切替 でログ自動保存モードになっているときは タブを閉じるまでログが保存されません。
    そこで、ログをいつでもすぐに保存する機能を 追加。
    ショートカット資料 
    Ctrl+A 16449 
Ctrl+Z 16474 
Ctrl+F1 16496 
Ctrl+F12 16507 
Ctrl+Alt+A 49217 
Ctrl+Alt+Z 49242 
F1 112 
F12 123 
Shift+F1 8304 
Shift+F12 8315 
Shift+Ctrl+F1 24688 
Shift+Ctrl+F12 24699 
Ins 45 
Del 46 
Shift+Ins 8237 
Ctrl+Ins 16429 
Shift+Del 8238 
Ctrl+Del 16430 
Alt+BkSp 32776 
Shift+Alt+BkSp 40968 

※
0010000000000000 Shiftキー
0100000000000000 Ctrlキー
1000000000000000 Altキー
    戻る / 挑戦してダメだったパターン / 改造前のTKATJUSHAMAINFORM / リソースハッカー 予備 / 2ちゃん専用ブラウザ「かちゅ〜しゃ」Part48 / そのうちこういうのにも挑戦したい /