Online
Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.291 Beiträge
Delphi 12 Athens
|
Re: Wahre Position des Cursors im Memo
16. Sep 2009, 16:11
Delphi-Quellcode:
S := Copy(Memo1.Text, 1, Memo1.SelStart);
Line := 0;
for i := 1 to Length(S) do
if S[i] = #10 then Inc(Line);
Ein Therapeut entspricht 1024 Gigapeut.
|