http://www.united-coding.de/j0.jpg
moin,
wie man sieht ist die letzte zeile links immer leer, egal wieviele zeilen man schreibt. Wie kann ihr die letzte löschen?
hatte das schon so versucht:
Delphi-Quellcode:
procedure TForm1.Memo1Click(Sender: TObject);
var bla: integer;
begin
for bla := 0 to memo1.Lines.Count do
begin
if memo1.Lines.Text = '' then
begin
memo1.Lines.Delete(bla);
end;
end;
end;
(Memo1click hab ich zum testen genommen)
Es wird keine Zeile gelöscht...
kann mir jemand helfen?
gruss silent