Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

FastReport: отчет зеброй [D5, IB6.x]

Denis_Visma © (2004-06-07 09:36:00)
Уважаемые! Как сделать отчет зеброй...:) то есть чтобы была строчка белая,строчка серая....я в примере смотрел,но нигде не нашел как там они это делают...просто я только начал им заниматься...подскажите где надо смотреть...:)

asp (2004-06-07 10:46:00) [1]
procedure TBuyGoodsBillReport.QRSubDetail1BeforePrint(Sender: TQRCustomBand; var PrintBand: Boolean);
var
i: Integer;
begin
inherited;
Sender.Tag:= Sender.Tag + 1;
if Sender.Tag mod 2 = 0 then
Sender.Color:= clWhite
else
Sender.Color:= clGray;
for i:= 0 to Sender.ControlCount - 1 do
if Sender.Controls[i] is TQRDBText then
(Sender.Controls[i] as TQRDBText).Color:= Sender.Color
end;

Это если пользоваться QRDBText.

Silver Alex (2004-06-07 10:33:00) [2]

> как этого добиться?
ну ты сам вообще не хочешь подумать, возьми одно поле ( МЕМО), растяни его на всю строчку сделай с ним все вышеперечисленное, а на него уже ложи чего там тебе надо,если влом к каждому мемо цеплять отдельно

Denis_Visma (2004-06-07 10:04:00) [3]
я сделал так...но это не совсем то что я хотел...просто получаться что только области МЕМО, а мненадо чтобы вся строчка была выделенной..как этого добиться?

Silver Alex (2004-06-07 09:51:00) [4]
есть там кнопочка "условное выделение" такой карандаш над желтой линией, выделяешь нужное тебе поле(Memo) нажимаешь ее появится окно.В поле "условие" набираешь
([LINE#] MOD 2) =0, ну и уже там по смыслу выбираешь нужный тебе цвет или чего там надо

Polevi (2004-06-07 09:47:00) [5]
скритп надо для бенда написать

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »