//變量定義
string ls_mod ,ls_err
long ll_color1,ll_color2,ll_color3,ll_default_color
//把SALARY列設置成非透明模式
ls_err=dw_salary.Modify("salary.Background.Mode=0")
if ls_err<>"" then
messagebox("狀態","改變背景模式失敗，出錯位置："+ls_err)
return
end if
//把SALARY列內容分顏色顯示
/*
如果SALSRY<2000，背景是紅色
如果SALSRY>2000,但是小于3000，背景是藍色
如果SALSRY>3000,但是小于4000，背景是綠色
其他是白色
*/
ll_color1=255//紅色
ll_color2=16711680//藍色
ll_color3=65280//綠色
ll_default_color=16777215//白色
ls_mod="Salary.Background.color='" &
+String(ll_default_color) &
+"~tIf(Salary<2000," &
+String(ll_color1)&
+",If(Salary<3000," &
+String(ll_color2) &
+",If(Salary<4000," &
+String(ll_color3) &
+"," &
+String(ll_default_color) &
+")))'"
ls_err=dw_salary.Modify(ls_mod)
if ls_err<>"" then
messagebox("狀態","改變背景顏色失敗，出錯位置："+ls_err)
return
end if
不知道哪里錯了 一直提示我顏色失敗！！
uj5u.com熱心網友回復：
先給你要設定顏色的欄位設定一個默認的背景色比如白色不然Salary.Background.color是沒有的
modify只是修改已有的，不能自動創建沒有的
uj5u.com熱心網友回復：
1 分貼不回！uj5u.com熱心網友回復：
路過，lz也太小氣了uj5u.com熱心網友回復：
ls_err=dw_salary.Modify("salary.Background.Mode=0")
ls_mod="Salary.Background.color='" &
+String(ll_default_color) &
+"~tIf(Salary <2000," &
+String(ll_color1)&
+",If(Salary <3000," &
+String(ll_color2) &
+",If(Salary <4000," &
+String(ll_color3) &
+"," &
+String(ll_default_color) &
+")))'"
這兩個放在一起。試下。
給你一個成功的例子：
ls_modify+= ls_objectname+".Color=~""+String(ll_font)+"~" "+ls_objectname+".background.mode=~"0~" "+ls_objectname+".background.color=~"0~~tif ( mod(getrow() ,2)=1,rgb(255,255,255),"+String(ll_back)+")~""
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/107733.html
標籤：控件與界面