Memo Zeichenzähler mit Eingabe

[jaenicke]

Zitat von Amateurprofi:

Da finde ich Luckies Vorschläge, bzw. das was sich daraus ergibt, deutlich eleganter:
StatusBar1.Panels[1].Text:=IntToStr(Length(Memo1.Text)-Memo1.Lines.Count);

Nur dass du festgestellt hättest, dass es so nicht funktioniert, wenn du es ausprobiert oder die Antworten gelesen hättest...

Zitat von DaveRidge:

Zitat von Luckie:

Na dann ziehe die Anzahl der Zeilen wieder ab. Dann müsste es stimmen. Bei zwei Zeilen hast du vier Steuerzeichen minus zwei Zeilen sind ein Steuerzeichen pro Zeile.

Das hab ich jetzt auch mal gemacht, von den Zeichen her passt es, nur beim Eingabe zählt er immernoch 2 Zeichen, aber dann bei der neuen Zeile der erste Buchstabe zählt er nicht mit. Er fängt dann beim 2.ten Zeichen an.

Das lässt sich sicher auch noch korrigieren, aber da hatte ich jetzt keine Lust zu.
// EDIT:
Es sollte reichen bei 0 Zeichen in der letzten Zeile nochmal minus Eins zu rechnen. Kommt noch dazu, dass man die Leerzeile woanders machen kann...