Memofeld in StringList einlesen?

[s-off]

Hallo Achim,

Zitat:

Zitat von marabu

Die Funktion liefert die Anzahl der entfernten Leerzeilen:

Delphi-Quellcode:

function TrimLines(s: TStrings): Integer;
begin  
  Result := s.Count;
  s.BeginUpdate;
  s.Text := Trim(s.Text);
  s.EndUpdate;
  Result := Result - s.Count;
end;

das bringt ihm aber nichts, wenn er am Ende der Zeile nur einen Zeilenumbruch hat. Das,w as danach kommt, wird ja nicht als Zeile angesehen.
Der Umbruch wird zwar entfernt, gezählt werden aber nur tatsächlich entfernte Zeilen.

[marabu]

Hallo Sascha,

Zitat:

Zitat von marabu

... Die Funktion liefert die Anzahl der entfernten Leerzeilen ...

Zitat:

Zitat von s-off

... gezählt werden aber nur tatsächlich entfernte Zeilen. ...

ich habe nie behauptet, dass ich mit TrimLines() die Zahl der entfernten Zeichen bestimme.

Freundliche Grüße

[s-off]

Zitat:

Zitat von marabu

Hallo Sascha,

Zitat:

Zitat von marabu

... Die Funktion liefert die Anzahl der entfernten Leerzeilen ...

Zitat:

Zitat von s-off

... gezählt werden aber nur tatsächlich entfernte Zeilen. ...

ich habe nie behauptet, dass ich mit TrimLines() die Zahl der entfernten Zeichen bestimme.

Freundliche Grüße

Entschuldige, dass ich Dir etwas unterstellt habe, was Du nicht behauptet hast - wollte ich gar nicht.
Sollte nur ein Hinweis darauf sein, dass die Funktion nicht das macht, was Borschti sich wünscht.
Nichts für ungut.

[Borschti]

Also danke euch erstmal für die Hilfreichen Antworten, ich werde mich gegebenenfalls nochmal in dem Thread melden falls noch Fragen aufkommen ;)

mfg
Alex