「板タブ、スレタブそれぞれに背景色を表示する（Tab色のサンプルっぽいもの）」の編集履歴（バックアップ）一覧はこちら
追加された行は緑色になります。
削除された行は赤色になります。
&link(スクリプト一覧表に戻る){スクリプト一覧表}
*板タブ、スレタブそれぞれに背景色を表示する（Tab色のサンプルっぽいもの）
**目次
#contents(page=板タブ、スレタブそれぞれに背景色を表示する（Tab色のサンプルっぽいもの）,option=word)
----
**ファイル名
DrawTabColor.js
----
**ダウンロード
このページ下部の添付ファイルjane_s0366.zipをクリック
----
**概要
以下スクリプトファイルのOUTLINEより抜粋
Tab色のサンプルっぽいもの
Delphiの色検索ツール
http://www.geocities.co.jp/SiliconValley-Sunnyvale/6234/#DelColor
//Outlineここまで
----
//以下レスのコピぺ
//http://jane.s28.xrea.com/test/read.cgi/bbs/1253845280/461-462
http://pc12.2ch.net/test/read.cgi/win/1257524478/750
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
http://pc12.2ch.net/test/read.cgi/win/1257524478/779
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
//レスのコピぺここまで
----
**コメント
#pcomment()
&link(スクリプト一覧表に戻る){スクリプト一覧表}
*板タブ、スレタブそれぞれに背景色を表示する（Tab色のサンプルっぽいもの）
**目次
#contents(page=板タブ、スレタブそれぞれに背景色を表示する（Tab色のサンプルっぽいもの）,option=word)
----
**ファイル名
DrawTabColor.js
----
**ダウンロード
このページ下部の添付ファイルjane_s0366.zipをクリック
----
**概要
以下スクリプトファイルのOUTLINEより抜粋
Tab色のサンプルっぽいもの
Delphiの色検索ツール
http://www.geocities.co.jp/SiliconValley-Sunnyvale/6234/#DelColor
//Outlineここまで
----
//以下レスのコピぺ
//http://jane.s28.xrea.com/test/read.cgi/bbs/1253845280/461-462
http://pc12.2ch.net/test/read.cgi/win/1257524478/750
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
http://pc12.2ch.net/test/read.cgi/win/1257524478/779
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
//レスのコピぺここまで
----
**コメント
#pcomment()
----
