怎么实现文本换行

如何实现文本换行
tempstring:= '长度＝ '+edit1.Text+ '       宽度= '+edit2.Text+ '         高度= '+edit3.Text;
我想将生成文档变成
长度＝123
宽度＝123
高度＝123
的形式，但我直接在代码处输入成
tempstring:= '长度＝ '+edit1.Text+ '      
宽度= '+edit2.Text+ '        
高度= '+edit3.Text;
的形式就报错

[解决办法]
楼主是想“所见即所得”？呵呵。

procedure TForm1.Button4Click(Sender: TObject);
var
TempString : string;
begin
tempstring:= '长度= ' + edit1.Text + #10 + '宽度= ' + edit2.Text + #10 + '高度= ' + edit3.Text;
showmessage(TempString);
end;

给你加了换行符
如果还不行，就再加 #13（回车符）