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日 10:23 発信者：caramel-box
題名：RE(7):PB7.0: ﾃﾞｰﾀｳｨﾝﾄﾞｳ内の、Background.Colorを行単位で塗り分ける
dedenさん、おはようございます。
＞１行目すべて黄色
＞２行目すべてみどりと設定します。
＞次に
＞２行目の３列目を赤、１行目の６列目を白という具合に色を枠ごとに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)
これでどうでしょう？
付加情報：
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows 2000
DBMS その他
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.