diff --git a/designer/utslsynmemo.tsf b/designer/utslsynmemo.tsf index ca0742f..ff4d442 100644 --- a/designer/utslsynmemo.tsf +++ b/designer/utslsynmemo.tsf @@ -82,6 +82,10 @@ type thighlitcolor = class(tcomponent) end end end + function transblk(c); + begin + return (c=0)?1:c; + end function setcolors(cls); begin cgd := false; @@ -91,7 +95,7 @@ type thighlitcolor = class(tcomponent) begin v.changed := false; bc := cls["字体"]["back"]; - v.color := (bc=0)?1:bc; + v.color := transblk(bc); if v.changed then begin cgd .|= 2; @@ -101,9 +105,9 @@ type thighlitcolor = class(tcomponent) v.changed := false; if i in array("选中背景","当前行背景") then begin - v.color := cls[i]["back"]; + v.color := transblk(cls[i]["back"]); end else - v.color := cls[i]["font"]; + v.color := transblk(cls[i]["font"]); if v.changed then begin if i="字体" then