大俠門，進來看看!!!!!!!!關於報表打印的問題!!!!各位大俠幫幫忙!!!!!急急!!! ( 积分: 100 )

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-19

• #1

小弟是個delphi初學者，我用的制作報表的工具是quickreport，我想將一條擁有多條記錄的表打印出來，本來用qrdbtext就可以的，不巧表中用個字段的記錄太多，打印時要換行，各位大俠請賜教，用什麼怎麼解決打印時自動換行，同時又可以像qrdbtext那樣能打印多條記錄，謝謝了!!!!!

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-19

• #2

小弟是個delphi初學者，我用的制作報表的工具是quickreport，我想將一條擁有多條記錄的表打印出來，本來用qrdbtext就可以的，不巧表中用個字段的記錄太多，打印時要換行，各位大俠請賜教，用什麼怎麼解決打印時自動換行，同時又可以像qrdbtext那樣能打印多條記錄，謝謝了!!!!!

 

H

hongxing_dl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-19

• #3

看看下面几个帖子吧，就是你要的，只是看哪一个更适合你：
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2347981
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2482356
http://www.delphibbs.com/delphibbs/dispq.asp?lid=2310137
http://www.delphibbs.com/delphibbs/dispq.asp?lid=429094

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-24

• #4

在上面網址的帖子裡Cardinal說qrdbtext可以自動換行，可是它沒說怎麼做呀!!郁悶!!!!!

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-24

• #5

哪位大俠告訴我怎麼讓qrdbtext自動換行呀!!!!先謝謝了!!!!

 

J

Johnny_du

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-27

• #6

你把QRDBText的AutoStretch属性设置成True试试看

 

H

hongxing_dl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-27

• #7

倒数第二个帖子就解决的啊~~~~再仔细看看呢，难道不是你要的吗？

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-29

• #8

還是不行呀!!暈了!!hongxing_dl能給你做的示例發給我麼？？？謝謝了

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-29

• #9

我的郵箱是：tianxi82@163.com

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-09-29

• #10

哪位大哥，幫幫我呀!!我被這個問題困撓了好久了!幫幫我呀!!

 

J

Johnny_du

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-02

• #11

怎么会不行呢！？

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-03

• #12

to：Johnny_du
我试了，你的那种方法不行呀！！
你用过qrdbrichtext吗？？
怎么浏览报表的时候qrdbrichtext是空白呀？？

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-03

• #13

哪位大哥用过qrdbrichtext吗？？
教教我如何让qrdbrichtext显示出数据来？？

 

Y

yanluomeng

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-03

• #14

路过问下如何将tchart中显示的饼图打印出来啊

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-10-03

• #15

procedure Tfm_form.QRDBText1Print(sender: TObject; var Value: String);
var
iLen : integer;
strSource, strTemp : string;

begin
if Length(Value) <= QRDBText12.Width/7 then
exit;
strSource := Value;
Value := '';
while true do
begin
iLen := 1;
while iLen < QRDBText12.Width/7 do
begin
if ord(strSource[iLen]) > 334 then
inc(iLen, 2)
else
inc(iLen);
end;
dec(iLen);
strTemp := Copy(strSource, 1, iLen);

if Value = '' then
Value := strTemp
else
Value := Value + #13 + strTemp;
strSource := Copy(strSource, iLen + 1, Length(strSource) - iLen);
if Length(strSource) <= QRDBText12.Width/7 then
begin
Value := Value + #13 + strSource;
exit;
end;
end;

end;
這段程序怎麼只能將表中的第一條記錄自動換行，暈!怎麼將表中該字段的所有記錄都自動換行呀？？賜教!!!

 

W

wtx047

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-12-17

• #16

多人接受答案了。