在QUICKREPORT中，如何自动换行(155分)

S

sanhippo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-13

• #1

需要跟据字段换行，如最后两个字母为00的前面需空三行。
我把积分全给能回答的人。

 

J

Jams

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-14

• #2

>>

 

P

Pipi.

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-14

• #3

quick report 功能强大，可以满足各种古怪的需要
quick report 可以不需要 dataset 数据源
TQuickRep 不要设置数据源（就是不要设置DataSet属性），也不要用TDBText 控件
在 detail band 放 QRLabel 控件
写 TQuickRep 的 OnNeedData 事件，当还有数据时，在该事件设置 MoreData:=true
当数据输出完成时 MoreData:=false
在这个事件中同时设置 detail band 中的每个 QRLabel 控件的 Caption 属性
当你检查到符合你的条件时，可以连续清空3次detail band 中的
每个 QRLabel 控件的 Caption 属性， 在继续输出数据

 

S

sanhippo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-18

• #4

别不起，我不太明白。
因为要输出记录，怎么能用QRLABEL？
如果我问得太弱，请多包含。

 

L

liuly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-19

• #5

>>因为要输出记录，怎么能用QRLABEL？
procedure TForm2.QRBand2BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
...
QRLabel.Caption:=MyTable.FieldByName('').Asstring;
QRLabe2.Caption:=MyTable.FieldByName('').Asstring;
...
end;
其他的Pipi.已经说的较清楚了

 

L

liuly

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-19

• #6

sorry,
QRLabel.Caption:=MyTable.FieldByName('field1').Asstring;
QRLabe2.Caption:=MyTable.FieldByName('field2').Asstring;

 

S

sanhippo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-03-19

• #7

多人接受答案了。