Einzelnen Beitrag anzeigen

Benutzerbild von MyRealName
MyRealName

Registriert seit: 19. Okt 2003
Ort: Heilbronn
675 Beiträge
 
Delphi 10.4 Sydney
 
#25

Re: » Letzte Zeile eines Memofeldes löschen

  Alt 3. Dez 2003, 16:59
Das Problem ist das Senden der Nachricht. Wenn ReadOnly = true, dann werden die Editor-Nachrichten ignoriert :p
Vielleicht einfach ganz hinten das CRLF wegnehmen :

var S, S1 : String;
begin
S := Memo1.Lines[Memo1.Lines.Count - 1];
S1 := #13#10;
Delete(S1, S, 2);
end;

so sollte das gehen, denn wenn kein Carriage Return+LineFeed, dann keine neue Zeile :p

MRN
  Mit Zitat antworten Zitat