TLabel是不能做到的,你可以用第三方RxLable

解决方案 »

  1.   

    netlib(河外孤星) 的方法只能在程序运行的时候加,比如这样
    procedure TForm1.FormCreate(Sender: TObject)
    begin
      label1.caption:='1'+#13+'2'+#13+'3';
    end;
    不能在设计期改CAPTION,
    你可以用第三方控件:rzlable可以做出三维,旋转等效果
      

  2.   

    把AutoSize设为False;label1.WordWarp:=True;
      

  3.   

    设计期是可以的
    使用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
      

  4.   

    谁说不可以在设计期改CAPTION为竖直显示的,胡说,可以的。
    我教你吧:
    新建一工程,在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,看一下吧
      

  5.   

    用#13在运行时是可行的,johnsonrao得方法很不错,只要Label社的够窄,设计时就可变成纵向显示。
      

  6.   

    大家的方法都可以,不过johnsonrao(johnson)的方法好像最简单啊,多谢诸位捧场了!!!小弟谢过!
      

  7.   

    大家的方法都可以,不过johnsonrao(johnson)的方法好像最简单啊,多谢诸位捧场了!!!小弟谢过!