[Delphi] Leerzeichen in StringList einfügen?

[faux]

Zitat von Loki77:

Oh, hatte noch vergessen zu sagen dass ich mailText.Text als PChar ausgebe....
Jetzt was Fehlerhaft?

Nein.

Vielleicht habe ich dich missverstanden, aber ich habe das so probiert:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  mailText : TStringList;
  i : integer;
  a: PChar;
begin
  for i  := 0 to Memo1.Lines.Count -1  do
    a := PChar(Memo1.Lines.Strings[i] + ' ' + Memo1.Lines.Strings[i]);
  Label1.Caption := string(a);
end;

Und im Label1 steht dann, wenn im Memo1 'Memo1' und im Memo2 'Memo2' steht, 'Memo1 Memo2'. Also mit Leerezciehn und allem drum und dran.

Grüße
Faux