如何在FastReport预览和打印时动态改变字体颜色？？？(50分)

jjstrong · 2004-04-26

我想在FastReport预览和打印时改变字体颜色，（例如：在打印和预览时，“数量”这一列
＞＝500用红色显示，＜500用绿色显示）但是显示的颜色不是一直不变的，是根据用户设定的字体颜色来显示；用户设置什么颜色就显示什么颜色，打印出来就什么颜色。

gyh75 · 2004-04-26

在主项数据Band的 OnBeforPrint事件中写入：
if [数量] >= 500 then
memo9.font.color := clRed ;
memo9为字段数量所在单元格

jjstrong · 2004-04-26

这样写还不是写死了吗？？？？
如果下次用户要设＞＝500的数为蓝色，怎么办呢？？？是不是要改报表呀中的事件呀？？？，我想要灵活一点的，用户设置什么颜色就显示什么颜色。报表中的数据来自stringgrid。

gyh75 · 2004-04-26

clRed 换成变量

jjstrong · 2004-04-26

如果现在我界面上有一个colorcomboobx1,现在我要把colorcombobox1.colorvalue赋值给它，应该怎么赋值呢？？

gyh75 · 2004-04-26

frVariables['aa'] := colorcombobox1.colorvalue
memo9.font.color := [aa]

jjstrong · 2004-04-26

谢谢gyh75