Zitat von
DeddyH:
Delphi-Quellcode:
while Length(GeheimtextMmo.Lines[GeheimtextMmo.Lines.Count - 1]) = 0 do
GeheimtextMmo.Lines.Delete(GeheimtextMmo.Lines.Count - 1);
Ungetestet, aber ich finde hier eine Kopfschleife angebrachter.
P.S.: Die letzte Zeile hat den Index Lines.Count
- 1
wird bei 'length' ein Leerzeichen nicht auch mitberechnet?