PB 電子会議室
| 発言No. | 更新日 | 題名（クリックすると発言内容と関連するコメントが表示されます） |
|---|---|---|
| 18428 | 02/11/28 13:58:14 | RE(8):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By deden |
| 18427 | 02/11/28 10:23:59 | RE(7):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By caramel-box |
| 18425 | 02/11/27 18:10:02 | RE(6):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By deden |
| 18424 | 02/11/27 15:41:10 | RE(5):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By caramel-box |
| 18423 | 02/11/27 10:25:26 | RE(4):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By deden |
| 18420 | 02/11/27 14:10:27 | RE(3):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By deden |
| 18416 | 02/11/26 10:51:39 | RE(2):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By caramel-box |
| 18414 | 02/11/25 18:35:22 | RE(1):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By i |
| 18413 | 02/11/25 18:20:12 | PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける By deden |
カテゴリ：PowerBuilderの開発環境
日付：2002年11月28日 13:58 発信者：deden
題名：RE(8):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける
caramel-boxさん、こんにちは。
＞
＞＞１行目すべて黄色
＞＞２行目すべてみどりと設定します。
＞＞次に２行目の３列目を赤、１行目の６列目を白という具合に色を枠ごとにSetする事は無理なのでしょうか？
＞＞
＞例 カラムは１列目からaaa,bbb,ccc,ddd,eee,fffとし背景色は全て薄い灰色で作成します。
＞String ls_Modify
＞String ls_Color[]
＞
＞ls_Color[1] = \"RGB(192,192,192)\" //薄い灰色
＞ls_Color[2] = \"RGB(255,255,0)\" //黄色
＞ls_Color[3] = \"RGB(0,255,0)\" //緑色
＞ls_Color[4] = \"RGB(255,0,0)\" //赤色
＞ls_Color[5] = \"RGB(255,255,255)\" //白色
＞
＞// aaa
＞ls_Modify = \"aaa.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[2]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[3] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞// bbb
＞ls_Modify = \"bbb.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[2]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[3] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞// ccc
＞ls_Modify = \"ccc.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[2]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[4] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞// ddd
＞ls_Modify = \"ddd.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[2]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[3] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞// eee
＞ls_Modify = \"eee.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[2]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[3] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞// fff
＞ls_Modify = \"fff.BackGround.Color=\'12632256~tIf(GetRow() = 1,\" + ls_Color[5]
＞ls_Modify += ,If(GetRow() = 2,\" + ls_Color[3] + \",\" + ls_Color[1] + \"))\'\"
＞dw_1.Modify(ls_Modify)
＞
＞これでどうでしょう？
＞＞caramel-boxさん本当にありがとうございます。
＞＞道がようやく開けました。
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows 2000
DBMS その他
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.