Delphi中字串长度超过255,如何解决？
如下程序:
procedure TForm1.Button1Click(Sender: TObject);
var
s1,s2,s:String;
begin s1:='dfsaaaafffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffffff';
s2:=s1;
s:=s1+s2;
Edit1.Text:=s;
memo1.Lines.Add(s);
end;
我想用一个超过255长度的字符,这样就不会出错,s长度就可以超过255.
但是如果我把s1的值复制两遍给s,就会出现编译错误,我这样写也不行.
var
{$H+}
s:AnsiString;
当s的长度超过255后还是会出现编译错误.
请教各位,当我想给变量赋值超过255时,怎么样才可解决?
谢谢了!
[解决办法]
Delphi中的String最大只能是255,如果你有多于255个字符的需要，你可以用TSstringList或定义一个动态字符数组，例如：
var
StrList: TStringList
Chr: Array of char;
[解决办法]
编译器默认情况下，视string=AnsiString
