Positioning the caret in a line in a memo or RichEdit

To position the caret in a line in a Memo or RichEdit you must use this:







With Memo1 do

  SelStart := Perform(EM_LINEINDEX, Line, 0);