S sinahappy Unregistered / Unconfirmed GUEST, unregistred user! 2003-02-12 #1 QRDBTEXT数据过长时无法实现自动换行,只能敲回车,请问如何设置才能实现QRDBTEXT自动 换行,用编程吗,谢谢!
D delphiland Unregistered / Unconfirmed GUEST, unregistred user! 2003-02-12 #2 首先确认你的QuickReport版本为3.06 设置QRDBTEXT的 AutoSize:=False; AutoStrech:=False; Wordwarp:=True; 再调整高度为两行或三行高度 还是不行的话,你可以在计算字符宽度后,根据 QRDBTEXT的宽度加空格或“-”
首先确认你的QuickReport版本为3.06 设置QRDBTEXT的 AutoSize:=False; AutoStrech:=False; Wordwarp:=True; 再调整高度为两行或三行高度 还是不行的话,你可以在计算字符宽度后,根据 QRDBTEXT的宽度加空格或“-”
H hfghfghfg Unregistered / Unconfirmed GUEST, unregistred user! 2003-02-14 #3 procedure TForm1.QRDBText1Print(sender: TObject; var Value: String); begin if length(Value)>50 then Value:=copy(Value,1,50)+#13+copy(Value,51,maxint) end;
procedure TForm1.QRDBText1Print(sender: TObject; var Value: String); begin if length(Value)>50 then Value:=copy(Value,1,50)+#13+copy(Value,51,maxint) end;