Edit : Zeilen beachten.

[turboPASCAL]

Nimm an Stelle eines TEdit 's ein TMemo.

[HerrErdnuss]

Vielen Dank hätte ich auch drauf kommen könne
weißte zufällig wie die "Zeilensprünge gewertet werde" (in der Position)
oder sind sie im Programm dann gar nicht da.. also wenn man den String in die Variable schreibt.

[DeddyH]

Ein "Zeilensprung" (Zeilenumbruch) besteht unter Windows aus 2 Zeichen (#13 und #10). Die werden auch mitgezählt.

[HerrErdnuss]

#13 sind allein schon 3 Zeichen oder meinst du Chr(#13)

hmmm wieso sind es den 2 zeichen ich brauch ja auch nur die enter taste ...

[DeddyH]

Nochmal: unter Windows besteht ein Zeilenumbruch aus der 13 (Carriage Return) und der 10 (Line Feed).

[p80286]

'ich bin neu'#13#10'aber ich lerne' sind 27 Zeichen.
und Wenn Du diesen Text in ein TMemo steckst, kannst Du zwei Zeilen zurück bekommen.

Gruß
K-H

[himitsu]

Chr(13) = #13 = 1 Zeichen

Die Enter-Taste hat den Zeichencode 13,
aber im Memo wird der Standardzeilenumbruch vom Windows verwendet ... #10 (Linux), #13 (Mac) wird dabei nach #13#10 aka sLineBreak umgewandelt.

Der Windowszeilenumbruch kommt aus der Ansteuerung von Druckern und Text-Monitoren.
Steuerbefehle für nächste Zeile im Drucker:
> 13 / CR / Carriage Return = Motor 1: fahre zum Zeilenanfang
> 10 / LF / Line Feed = Motor 2: schiebe das Blatt eine Zeile weiter

[Luckie]

#13 bezeichnet ein Steuerzeichen. Dein Name besteht ja auch aus mehreren Buchstaben bezeichnet aber auch nur eine Person.

[implementation]

Die Entertaste als Taste an sich hat #13. In der Eigenschaft 'Text' (und auch in Dateien) steht der Zeilenumbruch aber als Abfolge #13#10 drin.
#13 = Carriage Return (CR) = Wagenrücklauf -> bewirkt, dass der Cursor wieder am Anfang der Zeile steht
#10 = Line Feed (LF) = Zeilenvorschub -> versetzt den Cursor eine Zeile weiter nach unten

Die Abfolge #13#10 kommt nur in Windows und DOS vor, in Linux schreibt man nur #10 und in Mac OS nur #13. Das aber nur so als Nebeninformation, ist jetzt für dich eher unwichtig.

Für dich wird es vermutlich einfacher, die Eigenschaft 'Lines' zu nehmen:

Delphi-Quellcode:

Memo1.Lines[0] // erste Zeile
Memo1.Lines[1] // zweite Zeile usw.

Memo1.Text // ganzer Text
Memo1.Lines.Text // auch ganzer Text


// macht etwas mit jeder Zeile einzeln
for i := 0 to Memo1.Lines.Count-1 do
begin
  TuWasMit( Memo1.Lines[i] );
end;

[Edit1]
Ups, ich hätte die andern Seiten noch lesen sollen

[Edit2]
Danke, DeddyH!

[DeddyH]

Aber bitte nur bis Count - 1, die Zeilen sind 0-indiziert, d.h. die letzte Zeile hat den Index Count - 1.