Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.153 Beiträge
Delphi 12 Athens
|
Re: Wahre Position des Cursors im Memo
16. Sep 2009, 15: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);
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
|