※上記の広告は60日以上更新のないWIKIに表示されています。更新することで広告が下部へ移動します。

板タブ、スレタブそれぞれに背景色を表示する(Tab色のサンプルっぽいもの)

目次



ファイル名

DrawTabColor.js


ダウンロード

このページ下部の添付ファイルjane_s0366.zipをクリック


概要

以下スクリプトファイルのOUTLINEより抜粋
Tab色のサンプルっぽいもの
 
Delphiの色検索ツール
http://www.geocities.co.jp/SiliconValley-Sunnyvale/6234/#DelColor 


750 名前:名無し~3.EXE:2009/12/07(月) 02:55:07 ID:8y309Onz
Scripting.txt

■ function TabActionListDrawTab(Setting: TabDrawingSetting, Item: ThreadItem, Active: Bool,
Index: Integer): Void
↓
Item: Board

■ function TabActionViewDrawTab(Setting: TabDrawingSetting, Item: Board, Active: Bool,
Index: Integer): Void
↓
Item: ViewItem

・Item
  対象のスレタブで表示されるスレッド。検索ビューなどの場合はundefined。
  ↓
  対象のスレタブで表示されるViewItemオブジェクト。

今の実装だとデフォのマーク表示全ては無理。。


>>711
未取得/未読以外は手抜き
http://janekako.hp.infoseek.co.jp/cgi-bin/up2/src/jane_s0364.zip

779 名前:名無し~3.EXE:2009/12/07(月) 23:47:13 ID:6HMAbRl/
>>751
そんなに簡単だったのね...orz

で、
■ function TabActionListDrawTab
・起動後に設定のSheetTab表示して「よろし」しないと機能しない
・tsTabsでも機能してます。。

■ function TabActionViewDrawTab
・tsTabsでも機能してます。。(マークが文字に被るけど)

SystemColorを使う場合にTColorにキャストした状態というか
Integerにして渡さないと機能しないです。。


>>759
↓だけでOKです
function TabActionViewDrawTab(Setting, Item, Active, Index) {
if (Item != undefined) {
if (Setting.FlagColor == 0x0000FF00) { //未取得ありの色
Setting.FlagColor = 0x00010101; //好みの色を指定
};
};
};

他の色も変えられるように、サンプル的な物
http://janekako.hp.infoseek.co.jp/cgi-bin/up2/src/jane_s0366.zip

コメント

  • 元の配布場所が消えていたので転載 - 名無しさん 2011-01-16 17:51:44

添付ファイル