Crystal 报告 - 当拆分数组的值与给定的字符串值相同时选中复选框
Crystal Report - Check the check box when the value of split array is the same with the given string value
我正在对 crystal 报告进行多项 select。在数据库中,selected 复选框的值用这样的逗号分隔(Blanking / Piercing, Bending, Dowelling)。现在,我正在尝试使用 Font(Wingdings) 在 crystal 报告中显示它。这是 crystal 报告中公式字段中的代码:
Stringvar array splitArr:= split({Press.Process}, ","); //Press.Process value are (Blanking / Piercing, Bending, Dowelling)
Numbervar i;
For i:=1 to UBound(splitArr) Step 1 do(
if Trim(splitArr[i]) = "Blanking / Piercing" then
Chr(254) //Display checkbox w/ check
else
Chr(111) //Display checkbox w/ uncheck
);
但是这段代码在 crystal 报告预览中总是这样:
Checkbox List
它显示的是雪花字符而不是复选框。请帮我解决这个问题。谢谢。
您忘记了 Split 函数中的第二个参数,所以您最终在 space 上进行了拆分。
将代码更改为:
local stringvar InputString := "Blanking / Piercing, Bending, Dowelling";
Stringvar array splitArr := split(InputString, ",");
Stringvar result := Chr(111);
Numbervar i;
For i:=1 to UBound(splitArr) Step 1 do
(
if Trim(splitArr[i]) = "Blanking / Piercing" then
(
result := Chr(254); //Display checkbox w/ check
exit for
);
);
result;
我正在对 crystal 报告进行多项 select。在数据库中,selected 复选框的值用这样的逗号分隔(Blanking / Piercing, Bending, Dowelling)。现在,我正在尝试使用 Font(Wingdings) 在 crystal 报告中显示它。这是 crystal 报告中公式字段中的代码:
Stringvar array splitArr:= split({Press.Process}, ","); //Press.Process value are (Blanking / Piercing, Bending, Dowelling)
Numbervar i;
For i:=1 to UBound(splitArr) Step 1 do(
if Trim(splitArr[i]) = "Blanking / Piercing" then
Chr(254) //Display checkbox w/ check
else
Chr(111) //Display checkbox w/ uncheck
);
但是这段代码在 crystal 报告预览中总是这样:
Checkbox List
它显示的是雪花字符而不是复选框。请帮我解决这个问题。谢谢。
您忘记了 Split 函数中的第二个参数,所以您最终在 space 上进行了拆分。 将代码更改为:
local stringvar InputString := "Blanking / Piercing, Bending, Dowelling";
Stringvar array splitArr := split(InputString, ",");
Stringvar result := Chr(111);
Numbervar i;
For i:=1 to UBound(splitArr) Step 1 do
(
if Trim(splitArr[i]) = "Blanking / Piercing" then
(
result := Chr(254); //Display checkbox w/ check
exit for
);
);
result;