Im Notfall ab Memo1.SelStart rückwärts die Zeilenumbrüche zählen:
- entweder direkt in Memo1.Text nach #13 und #10 ausschauhalten und diese entsprechend bis Position SelStart zählen
- oder
Delphi-Quellcode:
i2 := Memo1.SelStart;
i := 0;
While (i < Memo1.Lines.Count) and (i2 >= Length(Memo1.Lines[i]) + Length(sLineBreak)) do
Inc(i);
falls ich jetzt gut geraten hab, dürfte nun in
i die Zeile stehen
[edit]
achso, daß ist auch in .Lines so drinnen
ist mir noch nie aufgefallen
also dann bleibt ja nur noch die erste Möglichkeit