Leere Zeilen im SynEdit löschen?

[arbu man]

Nimm doch eine for-Schleife:

Delphi-Quellcode:

var i:integer;
begin
  for i:=0 to synedit1.lines.count-1 do begin
    if synedit1.lines[i]='' then synedit1.lines.delete(i);
  end;
end;