Zusammenfassend gesagt ist was er will:
-Den Absatz am Ende entfernen
-Leere Zeilen entfernen
das wars denke ich schon... xD
Ich würds so probieren:
Delphi-Quellcode:
for i2:=0 to Richedit1.Lines.Count do
if Richedit1.Lines[i2]= ''
then Richedit1.Lines.Delete(i2);