Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
30. Okt 2007
Von Leerzeichen hattest Du nichts gesagt. Aber wie schon erwähnt, einMemo.Text := trim(Memo.Text);sollte das Problem schon lösen.
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
30. Okt 2007
while Length(GeheimtextMmo.Lines) = 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
Forum: Object-Pascal / Delphi-Language
Delphi
by DeddyH,
30. Okt 2007
if Memo.Lines.Count > 0 then
Memo.Lines.Delete(Pred(Memo.Lines.Count));