Posicionando o cursor numa linha de um memo ou richedit

{Para posicionar o cursor em uma linha de um Memo ou RichEdit, deve-se utilizar o seguinte: }
With Memo1 do
SelStart := Perform(EM_LINEINDEX, Linha, 0);