■6940 / ) |
Re[3]: カーソル置いた明細行の色(背景でも前景でも)を変えたい
|
□投稿者/ くおんたむ -(2012/03/17(Sat) 21:17:28)
| どうも、まさやんさん
以下の方法でどうでしょう?
○○:オブジェクト名
Proc ○○::マウスインアウト ( 〜〜 If ( &フラグ = 1 ) ジャンプ 行番号 = &明細番号 /* 指定した行番号を指定するため */ &On = &明細番号 Else &On = 0 End End
なお、&On は予め、宣言しておきます。局所でも固有なり。
次に、使用するフォームに以下の部分を入れてください。
オブジェクト属性の中に編集属性式があります。そこを次のコードを入れる。
例としてテキストボックス → オブジェクトの属性 → 編集属性式
入れるコード
#Cond( &On = #行番号 , "背景色'青" ) ↑に希望する色を指定
そうすれば、[処理対象行背景色]を指定しなくても、同じように背景が変わります。
ただ、問題として、ジャンプ 行番号 = &明細番号 としているので、たまに見た目と いうか、目が見にくい感じがするかも知れません。 特に、外から入るときに、下から入るとやはり、最終行になってしまう点。 ここは、#Eofとかで対処してみるとしよう。
|
|