get index of a Label object

rbuser

How I make to get index of a Label object that is in footer?

Fire

--- posted by geoForum on http://delphi.newswhat.com

nicocizik

Hi,

For future reference, please use your real full name when posting to these
newsgroups.

It is possible to obtain a reference to any component in a report using a
report object loop. Take a look at the article below...

----------------------------------------------
Tech Tip: Loop Thru All Objects in a Report
---------------------------------------------

A ReportBuilder report is composed of a set
of components. The basic structure is

Reports.Bands[].Objects[]

The bands and objects within the report can
be accessed directly by object name or
via the Bands and Objects array properties.

Below is an example of using the Bands and
Objects array properties to change the font for
all objects on a report.


uses
ppClass;


procedure AssignFontToReport(aFont: TFont; aReport: TppCustomReport);
var
liBand: Integer;
liObject: Integer;
lObject: TppComponent;

begin

for liBand := 0 to aReport.BandCount-1 do

for liObject := 0 to aReport.Bands[liBand].ObjectCount-1 do
begin
lObject := aReport.Bands[liBand].Objects[liObject];

if lObject.HasFont then
lObject.Font := aFont;

end;

end;


--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

How I use the method FindObject?

Fire

--- posted by geoForum on http://delphi.newswhat.com