Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
7. Mär 2008
Hallo Sascha,
ich habe nie behauptet, dass ich mit TrimLines() die Zahl der entfernten Zeichen bestimme.
Freundliche Grüße
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
7. Mär 2008
Die Funktion liefert die Anzahl der entfernten Leerzeilen:
function TrimLines(s: TStrings): Integer;
begin
Result := s.Count;
s.BeginUpdate;
s.Text := Trim(s.Text);
s.EndUpdate;
Result := Result - s.Count;
Forum: Sonstige Fragen zu Delphi
Delphi
by marabu,
7. Mär 2008
Hallo Alex,
wenn keine harten Zeilenumbrüche im Memo erlaubt sind, dann kann man WantReturns abschalten. Wenn nur versehentlich am Ende angehängte Leerzeilen entfernt werden sollen, dann gibt es mehrere Möglichkeiten - hier eine:
with Memo do Lines.Text := Trim(Text);
Grüße vom marabu