TMemoBox'ta Gösterilecek Dizenin İçinde Yeni Çizgi

Question

FullMemo adında bir FullMemo adında bir TMemoBox görüntüleniyor, ancak sorun şu şekilde yeni satırlar yapmaya çalışıyorum:

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

Elimde ne var txtFirstMemo karakterinin içeriği \n, bir satırsonu ve txtDetails içeriği. Yeni hat çalışması yapmak için ne yapmalıyım?

Answer 1

Çözüm, # 13 # 10 veya daha iyi Sertac önerilen sLineBreak kullanmanızdır.

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

Answer 2

Sen sembol # 13 kullanın böyle yeni satır yapmazlar:

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

# 13 CR, 10. LF ise, bazen bazen sadece CR (kullanmak için yeterli örneğin metin dosyaları yazma) # 13 # 10 kullanın.

Answer 3

Kullanım

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

Answer 4

Daha platform bağımsız çözüm TStringList olurdu. ortak bir birimde

const 
CRLF = #13#10; 
LBRK = CRLF+ CRLF; 

ve tüm programlarında kullanmak: Böyle bir şey ilan edebilir

Strings.Add(''); 

Answer 5

:

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; 

kullanabileceğiniz boş bir yeni satır ekleme için. Gerçekten kullanışlı olacak.