var
Lines, Classic: string;
begin
//Delphi 12 multiline literal: the
//closing quote sets the left margin
Lines := '''
1. First line
2. Second line
3. Third line
4. Fourth "line"
''';
WriteLn(Lines);
//before Delphi 12: concatenation
Classic := '1. First line' + sLineBreak +
'2. Second line';
WriteLn(Classic);
end.