Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Delphi d. letzten 25 Zeilen aus einem Memo in ein anderes schreiben

**mkinzler**

IMHO müßte es aber
For i := Memo1.Lines.Count - 26 to Memo1.Lines.Count-1 do oder besser

Delphi-Quellcode:

			i1 := Memo1.Lines.Count - 26; 

if i1 < 0 then i1 := 0;

For i := i1 to Memo1.Lines.Count-1 do

[Edit: zu langsam]

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#4 Re: d. letzten 25 Zeilen aus einem Memo in ein anderes schre 4. Jul 2006, 05:29 IMHO müßte es aber For i := Memo1.Lines.Count - 26 to Memo1.Lines.Count-1 do oder besser markieren Delphi-Quellcode: i1 := Memo1.Lines.Count - 26; if i1 < 0 then i1 := 0; For i := i1 to Memo1.Lines.Count-1 do [Edit: zu langsam] Markus Kinzler
	Zitat