fastreport瀏覽顯示顏色,換頁(100分)

Z

zhouyou155

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #1

NND...fastreport這個東西沒用過..還鬱悶..搞了我半天都搞不明白!
這是瀏覽的結果:
page1
name memo1 memo2 memo3 ....
me date1 1 1
.. ... ... ..
me daten 1 1
page2
..
要求 daten 如果是 星期六或者星期日的話..daten那一行設定顏色為紅色..可以用dayofweek(),就是不知道如何寫代碼.
按名字分頁顯示..每頁31條紀錄..不夠31條的加空行..
請大家幫幫忙...沒用過這個東西...
不夠分再加..

 

Z

zhouyou155

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #2

怎麼沒人阿.....自己先頂下

 

Z

zhouyou155

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #3

有人知道嗎? 請回答....再頂

 

Z

zywcd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #4

1、如果你是3.0以上的版本,你可以为memo1下脚本.按照下面的代码你修改条件就好.
procedure Memo1OnBeforePrint(Sender:TfrxComponent);
begin
if <frxDBDataset1.&quot;销售实收&quot;> <10 then
memo12.font.color:=clred
else
memo12.font.color:=clblack;
end;
2、
在Masterfooter后拉一个Childband，再在上面相应放几个空memo，跟MasterData band上的memo上下对齐。
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
while engine.FreeSpace > 20 do／／20你自己根据情况调整。
engine.ShowBand(Child1)
end;

 

Z

zhouyou155

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #5

這樣寫沒用阿..顯示的都是一樣的顏色..
if dayofweek(dbset1.&quot;date1&quot = 6 then
memo1.font.color := clred;
好像沒用哦..... 我感覺dayofweek不是取得日期..而已取得行數..如果=4那麼前面4行沒顏色...

 

Z

zywcd

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-12

• #6

if dayofweek(<dbset1.&quot;date1&quot;>) = 6 then
memo1.font.color := clred;

 

Z

zhouyou155

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-10-13

• #7

好的...謝謝阿..