新手提问,大侠们帮一下忙了,郁闷了好几天了。

恶鱼 2004-03-25 05:13:27
在QReport中,用QRLabel 怎么样能让他按表格格子大小显示数据?如果数据过多,我试过用回车,但是表格不会自动变大,数据在格子的外面,不用回车就把后面格子的数据盖住了,郁闷,大家帮一下我怎么做好,我先谢谢了!
var
i:integer;
atop:integer;
aLabel:TQRLabel;
aLine:TQRShape;
d1,d2,d3:Tdate;
dw1:string;
begin
aLine:= TQRShape.Create(qrpt_quanbu);
aLine.Parent := TitleBand1;
with aLine do
begin
aLine.Left:=196;
aLine.Top:=atop;
aLine.Width:=1;
aLine.Height:=16;
aLine.Frame.Color:=clBlack;
end;

aLabel:= TQRLabel.Create(qrpt_quanbu);
aLabel.Parent := TitleBand1;
with aLabel do
begin
AutoSize:=true;
AutoStretch:=True;
Font.Size:=8;
Left :=200;
Top := atop+2;
Alignment:=taLeftJustify;
Caption :=qmingxi.Fields[2].Value;
end;
...全文
24 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
恶鱼 2004-03-26
  • 打赏
  • 举报
回复
能不能再说的详细一点
恶鱼 2004-03-25
  • 打赏
  • 举报
回复
UP
konhon 2004-03-25
  • 打赏
  • 举报
回复
控制比较麻烦,主要利用下面两个函数:

QuickRep1.TextHeight()
QuickRep1.TextWidth()

2,497

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧