读书人

怎么通色值控制水晶表中

发布时间: 2012-01-02 22:40:04 作者: rapoo

如何通色值控制水晶表中文本字段的色?
二小:
第一小:
如何通色值控制水晶表中文本字段的色?
明:水晶表中有一文本字段,我一值(如#ffffff)那么行程序
文本的色就成了#ffffff,我另一值(如#000000)那么行程序文本的色就成了#000000

第二小:
我想一程序。打印能打印彩色的,那么水晶表中的文本字段都成色并打印出。如果打印不能打印彩色的,那么水晶表中的文本字段都成黑色。并打印。

[解决办法]
繁体的...
看起来好累,,帮顶.. 顺便抢个沙发
[解决办法]
传值肯定是不行了,不过应该可以通过写代码来控制。
不过还有一个前提是每条数据的该字段颜色都是一样的,如果各有各的颜色那你就放弃吧,因为每条数据去分别改变的话十几条数据就可能要用半分钟。
下面是以前同事写的控制矩形框是否显示的代码,应该对你有借鉴作用(VB.NET)。
==========
For i As Integer = 0 To Report.ReportDefinition.ReportObjects.Count - 1

'をフィドンする
Dim obj As Object = Report.ReportDefinition.ReportObjects.Item(i)
If TypeOf obj Is BoxObject Then
Dim ob As BoxObject = CType(obj, BoxObject)
If "Box1 ".Equals(ob.Name) Or "Box2 ".Equals(ob.Name) _
Or "Box3 ".Equals(ob.Name) Or "Box4 ".Equals(ob.Name) Then
ob.LineStyle = CrystalDecisions.Shared.LineStyle.NoLine
End If
End If

'ランをフィドンする
If TypeOf obj Is LineObject Then
Dim ob As LineObject = CType(obj, LineObject)
If "Line13 ".Equals(ob.Name) Or "Line7 ".Equals(ob.Name) Or _
"Line12 ".Equals(ob.Name) Or "Line14 ".Equals(ob.Name) Or _
"Line15 ".Equals(ob.Name) Or "Line16 ".Equals(ob.Name) Or _
"Line17 ".Equals(ob.Name) Or "Line18 ".Equals(ob.Name) Or _
"Line19 ".Equals(ob.Name) Or "Line20 ".Equals(ob.Name) Or _
"Line21 ".Equals(ob.Name) Or "Line22 ".Equals(ob.Name) Or _
"Line23 ".Equals(ob.Name) Or "Line24 ".Equals(ob.Name) Or _
"Line25 ".Equals(ob.Name) Or "Line26 ".Equals(ob.Name) _
Or "Line27 ".Equals(ob.Name) Then
ob.LineStyle = CrystalDecisions.Shared.LineStyle.NoLine
End If
End If
Next
==========
[解决办法]
报表3 abc=new 报表3();
TextObject myText =(TextObject)abc.ReportDefinition.ReportObjects[ "MyTextBox "];
myText.Color=System.Drawing.Color.Red;

读书人网 >asp.net

热点推荐