report builder ppDbText1.Font.Style

[muttalip]

report builder da aşağıdaki ifadeyi detail bandın before print olayına koydum. ppDbText1,ppDbText2,....,ppDbText32 şeklinde 32 tane var.
Aşağıdaki ifadenin benzeri 32 adet yazarsam işlem tamam fakat bu uzun bir iş. Bu işlem daha kısa bir şekilde yapılabilirmi.

ppDbText1.Font.Style:= ppDbText1.Font.Style - [fsBold]

[rsimsek]

Ortak BeforePrint koyabilirsin ya da ComponentCount ile for .. do döngüsü ile tüm ppDBText leri arayıp gerekli işlemi yapabilirsin. Ortak BeforePrint şöyle olabilir;

Kod: Tümünü seç

(Sender as ppDbText).Font.Style - [fsBold]