Newline Inside a String To Be Shown At a TMemoBox

Question

I'm building a String called FullMemo, that would be displayed at a TMemoBox, but the problem is that I'm trying to make newlines like this:

FullMemo := txtFistMemo.Text + '\n' + txtDetails.Text

What I got is the content of txtFirstMemo the character \n, not a newline, and the content of txtDetails. What I should do to make the newline work?

duplicated ... http://stackoverflow.com/questions/254407/how-do-i-include-a-newline-character-in-a-string-in-delphi — PA., Dec 22 '10 at 18:33
If it's duplicated, so why the answers are totally different? — Nathan Campos, Dec 26 '10 at 12:38

score 26 · Accepted Answer · 2011-08-05T11:34:28.780

26

The solution is to use #13#10 or better as Sertac suggested sLineBreak.

FullMemo := txtFistMemo.Text + #13#10 + txtDetails.Text;
FullMemo := txtFistMemo.Text + sLineBreak + txtDetails.Text;

edited Aug 05 '11 at 11:34

answered Dec 22 '10 at 15:35

12

Can also use `sLineBreak`. – Sertac Akyuz Dec 22 '10 at 15:41
1

using sLineBreak is the best approach!! – Dec 22 '10 at 16:46
1

@Sertac Akyuz - +1 great tip, I haven't noticed something like this – Dec 22 '10 at 17:48

score 4 · Answer 2 · answered Dec 22 '10 at 15:39

A more platform independent solution would be TStringList.

var
  Strings: TStrings;
begin
  Strings := TStringList.Create;
  try
    Strings.Assign(txtFirstMemo.Lines); // Assuming you use a TMemo
    Strings.AddStrings(txtDetails.Lines);
    FullMemo := Strings.Text;
  finally
    Strings.Free;
  end;
end;

To Add an empty newline you can use:

Strings.Add('');

score 3 · Answer 3 · answered Dec 22 '10 at 15:36

3

Use

FullMemo := txtFistMemo.Text + #13#10 + txtDetails.Text

answered Dec 22 '10 at 15:36

Bharat

6,828
5
35
56

Gabriel · Answer 4 · 2021-02-19T09:27:09.437

You can declare something like this:

const 
 CRLF = #13#10; //or name it 'Enter' if you want
 LBRK = CRLF+ CRLF;

in a common unit and use it in all your programs. It will be really handy. Now, after 20 years, I have CRLF used in thousands of places!

FullMemo := txtFistMemo.Text + CRLF + txtDetails.Text

IMPORTANT
In Windows, the correct format for enters is CRLF not just CR or just LF as others sugges there. For example Delphi IDe (which is a Windows app) will be really mad at you if your files do not have proper enters (CRLF): Delphi XE - All blue dots are shifted with one line up

score 0 · Answer 5 · answered Dec 22 '10 at 15:35

0

You don't make newlines like this, you use symbol #13:

FullMemo := txtFistMemo.Text + #13 + txtDetails.Text
    + Chr(13) + 'some more text'#13.

#13 is CR, #10 is LF, sometimes it's enough to use just CR, sometimes (when writing text files for instance) use #13#10.

answered Dec 22 '10 at 15:35

himself

4,806
2
27
43

1

Line break on Windows is always #13#10 (or better sLineBreak as Sertac suggests). – Jens Mühlenhoff Dec 22 '10 at 17:29
It's not "always" #13#10. There's no rule saying you cannot parse #13 for linebreak, even on Windows. For instance, MessageBox accepts it just fine. – himself Dec 22 '10 at 18:06
@himself - "it just works" is not equivalent to "it is correct". If Delphi editor chateches you with such "half-enters" it will be really mad at you during debugging. – Gabriel Feb 19 '21 at 09:26

Newline Inside a String To Be Shown At a TMemoBox

5 Answers5