当前位置:主页>销售管理软件> 列表

TLabel为什么不折行 找金碟财务软件

财务软件版1楼: 各位老大:今天将一TLabel的autosize:=false; wordwrap:=true;
运行时将其caption:=足够长的字符串;
但此label并不折行。
如如何解决?请赐教。

2楼: 中间加入#13回车可以折行.. 如免费电子记账软件

3楼: 你在要折行的为止加入#10看看
这好像是TLabel的Bug。

4楼: ???
有这回事?
不过,在网页里,连续的英文字母不会折行,除非有空格出现

5楼: wordwrap:=true;时,如果长度不够,遇到空格才换行--中文。
英文的没这问题!

6楼: 嘿嘿!中英文都有问题的!
要么自己判断换行 或者 把TMemo去了边框用吧!!

财务软件版7楼: 控件的问题,嘻嘻....,顶一下子

8楼: 问题已解决,是TLabel的bug
需要自己调用SetBounds(left,top,width,height)

9楼: 有这种事吗,是不是Height不够高呢?

10楼: 呵可。。都AutoSize了能折行吗?

11楼: 运行时将字符串#13回车可以折行,
设计时autosize:=false; wordwrap:=true;
但你要注意label的Height的够高,最好用鼠标将其设计到合理的空间

12楼: 可以换行的啊
procedure TForm1.FormCreate(Sender: TObject);


begin
Label1.Caption := ''qqqqq''+#13+''bbbbbb'';
end; 如金碟财务软件

13楼: procedure TForm1.FormCreate(Sender: TObject);
begin

Label1.AutoSize:=false;
//#10,#13有其中一个也可以
Label1.Caption:=''换行吧''+#10+#13+''好'';//注意Height要足够(至少要为字高的两倍),有必要拉高一点

end;

end.

财务软件版14楼: 可以自己不调用SetBounds(left,top,width,height)

15楼: 我这两天也刚刚才发现wordwrap的用处(七年了啊,寒自己),以前一直以为这个属性是聋子的耳朵,呵呵。
好像中文的没问题吧,英文的遇到空格它就换行了。

16楼: procedure TForm1.FormCreate(Sender: TObject);
begin
button1.Caption := ''关闭(&F)'';
label1.Caption := ''你好''+#13+''哈哈'';
label1.Height := 200;
label1.Width := 200;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
close;
end;