一个很长的字符串，如何分两行书写？例如...

Question

在其中加入换行符#13
e:
str:='abcdef'+#13+'dffff';

Answer 1

var
 str: String;
begin
  str := 'line1'+
          'line2';

Answer 2

str := 'abcdef..'+
'bgdf...';

Answer 3

str := 'ddd' + 
       'sss' +
       'aaa';

Answer 4

如果在编辑器中书写时太长了需要换行：
  str = 'dksfjs'+
         'kdfjskdf';
如果想在显示时换行：
str:= 'ksdf' +  #13 + 'ksdfj';       

Answer 5

Function MitiLine (Str:String;N:Integer):String;
var
L,I:Integer;
 Strs:String;
Begin
     L:=Length(Str);
     L:=Round(L/N+0.5);
     If L=0 Then
     begin
          Result:=Str;
          Exit;
     End;
     For I:=1 To L Do Strs:=Strs+Copy(Str,N*(I-1)+1,N)+#13;
     Result:=Strs;
 End;
***************************************************
比如MitiLine(str,10),隔10个换行，应该可以？？

Answer 6

我基本上同意 hegum(大概) 的写法。
只不过他没有考虑到一个问题，
如果这一串字符中有“汉字”，这个方法还需要
改进（例如字符串“123中国890”，你要执行
MitiLine (“123中国890”，5)的话，第一行出来的结果
没问题，第二、三、四行出来的结果就有问题了）

Answer 7

Delphi的续行是不用任何标识的,以";"为行的终止符，“;”前的都算是一行。但字符串例外应该写成：
Str:='asdfasdfasdfasd'
   +'asdfasdfasdf'
   +'中文也没关系'
   +'都一样';

Answer 8

好象汉字的ASCII值 比 其他一般字符的ASCII值
要大，至于分界线是多少，我忘了，我给你查查...