Question

delphi怎样将空格替换为回车

delphi怎样将空格替换为回车

Answer 1

你要的文本 :=StringReplace(原文本,' ',#13#10,[rfReplaceAll]);

会把每一个空格都替换成一个回车

Answer 2

if Astring[i]=#32 then Astring[i]=#13

Answer 3

#13#10

Answer 4

使用StringReplace函数
例如：
procedure TForm1.BitBtn1Click(Sender: TObject);
var
OldStr,NewStr:String;
begin
OldStr:=' ';//具体字符串内容
NewStr:=StringReplace(OldStr,' ',#13#10,[rfReplaceAll,rfIgnoreCase]);
end;