Schwierigkeit mit dem TMemo

[Identitätsstörung]

Guten Morgen liebe Damen und Herren.
Und zwar sitze ich grade an einem kleinen Problem mit dem guten
alten TMemo.
Es geht darum, das ich Buchstaben in dem besagten Memo untereinander (mit Memo1.Lines.Append)
eingefügt habe, diese aber gerne zu einem Wort haben würde und zwar für normale
Menschen lesbar (von links nach rechts).
Meine Idee wäre nun

Zitat:

Memo2.Text:=Memo1.Lines[0]+Memo1.Lines[1]

, aber wie bekomme
ich das in einer schleife hin z.B. mit einer Variable bis die länge des Wortes erreicht ist?

Ich hoffe das ich zu dieser Uhrzeit mein Anliegen noch deutlich genug ausdrücken konnte und hoffe,d
das mir jemand weiterhelfen kann.

MfG Christian

[turboPASCAL]

Moin,

wann bzw. woran erkennst du denn wann ein Wort zu ende ist ?

An sonsten einfach:

Delphi-Quellcode:

procedure TFormX.CatMemoLines;
var
  i:integer;
  s: string;
begin 
  s := '';

  for i := 0 to Memo.Lines.Count - 1 do
    s:= s + Memo.Lines.Strings[i];

  Memo.Lines.Add(s);
end;

...und ein Willkommen in der DP.

[DeddyH]

Delphi-Quellcode:

var 
  s: string;
begin
  Memo.Lines.BeginUpdate;
  try
    s := StringReplace(Memo.Text, sLineBreak, '', [rfReplaceAll]);
    Memo.Text := s;
  finally
    Memo.Lines.EndUpdate;
  end;
end;

Das dürfte das einfachste sein.

[Identitätsstörung]

Erstmals danke für eure Hilfe.
Ich bin noch ein "Neuling" in diesem Gebiet und habe
daher ein wenig gemogelt. Ich habe in meine Repeat Schleife eine Variable
eingebaut, die sich jedesmal um eines erhöht, wenn ein Zeichen vertikal
in das Memo geschrieben wird. Das ganze läuft dann solange, bis diese
Variable die "Länge des wortes/textes" erreicht hat.
Das ganze soll der Einstieg in die Kryptographie werden.
Ich habe nun den Code von DeddyH an meine Memos angepasst und es hat funktioniert,
vielen dank.

p.s. ich war schonmal hier registriert, aber ich habe meinen Accountnamen vergessen.

MfG Christian

[himitsu]

Zitat:

Zitat von Identitätsstörung (Beitrag 1102163)

p.s. ich war schonmal hier registriert, aber ich habe meinen Accountnamen vergessen.

Wenn du deine eMail kennst, über welche du dich registriert hattest, dann könnte man da bestimmt was machen.