delphi 字符串中加入换行符sLineBreak

procedure TForm1.Button3Click(Sender: TObject);
begin
   ShowMessage('Jack'+#10+'Marry'+sLineBreak+'Tom');
end;

显示