怎么样可以实现自动转行显示？

Question

呵呵，这个回答有意思。正确无误。不过我不想用memo，想用edit相似的东西来得到memo的效果。

Answer 1

edit不会换行的，在程序中也不能做到，不然就不用要Memo了；
你用 Label 不可以吗？

Answer 2

TLabel可以的。
AutoSize属性设为False
WordWrap属性设为True

Answer 3

谢谢各位。我察看过帮助以后觉得taxi的方法是可行的。但是我真正使用这种方法的时候，却不行了：我把label长度设为较短，把caption设为较长，把高度设为较高。但是效果除了把超出长度的caption截去之外，并没有在第二行显示。

Answer 4

你可以这样啊，我已经调试通过了
var
a:string;
b:string;
begin
a:='aaaaaaaaaaa';
b:='bbbbbbbbbbb';
label1.caption:=a+#13+#10+b;
就可以了啊，赶快给分啊

Answer 5

一个label的例子，在窗体文件中；
object Label1: TLabel
    Left = 32
    Top = 32
    Width = 456
    Height = 64
    Caption = 
      '这只是一个小小例子，里我是乱放的，具体就这样的小计要画在和数据在一起的表格里我是用BDE连接的，你用ado只能做到上述就可以了，' +
      '我用一个pagefooter里放小计，它紧跟数据后面，可是不是每页都有小计，只在最后有，所以还是错的，因为做不出来能给你的样子也' +
      '就这样了，'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    WordWrap = True
    OnClick = Label1Click
  end

Answer 6

klaiy,我一定会给你分的。
问题在于：我本来是一个整体的完成的string.假如非用#13的话，就必须处理这个string，而且假如有汉字，难以避免出现乱码。

Answer 7

最后我还是采用了memo的方法。