Delphi Leerzeilen in Tstringlist

Leerzeilen in Tstringlist

Ein Thema von gangs-taas · begonnen am 29. Jul 2009 · letzter Beitrag vom 30. Jul 2009

BUG

Registriert seit: 4. Dez 2003
Ort: Cottbus
2.094 Beiträge

29. Jul 2009, 23:49

Erster Eindruck:

benutze i statt zeilenzaehler in den Schleifen (dann musst du dich nicht mehr um das zurücksetzen kümmern)
die Schleifen dürfen nur bis Memo.Lines.Count-1 gehen
in deinen if-then-Anweisungen brichst du du bei beiden Bedingungen die Schleife komplett ab (break, bei der Leerzeile wäre continue von Nöten (oder du kannst dann auch einfach Garnichts tuen))
nach break oder continue werden keine weiteren Anweisungen in dem Schleifendurchlauf durchgeführt (zeilenzaehler wird nie zurückgesetzt)
bei einer Leerzeile ist [i]Memo.Lines = ''