-----------------------------------------------------------
New Message on BDOTNET
-----------------------------------------------------------
From: arabinda79
Message 2 in Discussion
Hi sara
Try It I hope it will work.
Public Sub setReportStyle(ByVal objReport As
Object)
Dim intObjectCount As
Integer
Try
intObjectCount =
0
'Checking whether report object is nothing or
not
If
Not Nothing Is objReport
Then
'get all report sections into ReportSections
variable
ReportSections =
objReport.ReportDefinition.Sections
End If
If Not Nothing Is ReportSections
Then
'Iterate through all
sections
For Each Reportsection In
ReportSections
'Iterate throw all fields in each
section
For intObjectCount = 0 To Reportsection.ReportObjects.Count -
1
' for field type
objects
If Reportsection.ReportObjects.Item(intObjectCount).Kind =
ReportObjectKind.FieldObject
Then
fldObject =
Reportsection.ReportObjects.Item(intObjectCount)
Dim strName As
String
If Not Nothing Is fldObject
Then
strName =
fldObject.Name.ToLower
fldObject.ApplyFont(New Font("Arial", 12,
FontStyle.Underline))
fldObject.Color =
Color.Maroon
End
if
Next
Next
End
if
Catch ex as
Exception
End Try
End sub
Regards.
Arabinda
----- Original Message -----
From:
Sara
To: BDOTNET
Sent: Wednesday, July 21, 2004 7:46
AM
Subject: Changing the Font Name or Color
of Font during Run Time in a Crystal Report.NET
New Message on BDOTNET
Changing
the Font Name or Color of Font during Run Time in a Crystal
Report.NET
Reply
Reply to Sender Recommend
Message 1 in
Discussion
From: Sara
Can Any body tell me how to change the Font Name or
Font Color in a crystal report.net during run
time.
Thanks in
advance
View other groups in this
category.
-----------------------------------------------------------
To stop getting this e-mail, or change how often it arrives, go to your E-mail
Settings.
http://groups.msn.com/BDotNet/_emailsettings.msnw
Need help? If you've forgotten your password, please go to Passport Member Services.
http://groups.msn.com/_passportredir.msnw?ppmprop=help
For other questions or feedback, go to our Contact Us page.
http://groups.msn.com/contact
If you do not want to receive future e-mail from this MSN group, or if you received
this message by mistake, please click the "Remove" link below. On the pre-addressed
e-mail message that opens, simply click "Send". Your e-mail address will be deleted
from this group's mailing list.
mailto:[EMAIL PROTECTED]
