TLabel是不能做到的,你可以用第三方RxLable
解决方案 »
- delphi内存泄露,请帮忙,提示为out of memory
- 如何处理WINXPSP3开发的程序在VISTA,WIN7,WIN2008都能使用
- 怎么用Delphi设置excel表格的第一行字体大小,只要第一行。
- 如何得到SQL执行后的Recordcount的条数并把这个数加入到另一个数据库?
- 结婚散分咯~(之三)
- 如何用Select语句求出时间差?
- 找会员系统资料,有的请介绍一下,谢谢。还有高分等着你。
- 用OBJECT PASCAL实现VECTOR,谁有比较好的代码?
- 请教如何在StringGrid中加入列标题呢?
- 如何建立一个像“开始”菜单那样左边显示一个图片条的pop菜单呢?
- 帮帮我!
- 请问谁有可以处理中文的文字处理控件提供?
procedure TForm1.FormCreate(Sender: TObject)
begin
label1.caption:='1'+#13+'2'+#13+'3';
end;
不能在设计期改CAPTION,
你可以用第三方控件:rzlable可以做出三维,旋转等效果
使用Form的右键弹出菜单中的View as Text
找到
object Label1: TLabel
Left = 135
Top = 309
Width = 6
Height = 39
Caption = 'Label1' //将此句改为 Caption = '1'#13'2'#13'3'
endOK!Perfect
我教你吧:
新建一工程,在form1上放入一label1,然后在form1上右击选取view as text,
出现form1的txt文本构,找到label1的项,会见到
object Label1: TLabel
Left = 136
Top = 136
Width = 18
Height = 26
Caption = 'Label1' //改此句
end改成
Caption = 'Lab'#13'el1'
最后view form (shift+F12)打开form1,看一下吧