Posicionar en una fila de un richedit
 

Hola, tengo una duda: en un richedit con muchas líneas de texto, quiero poner un tedit donde el usuario escriba un número de línea y que al pulsar un botón, el richedit se muestre en pantalla con el cursor posicionado en la línea que tecleó el usuario.
He buscado varias alternativas por los foros y he encontrado cómo hacerlo, pero siempre hacia adelante, por ejemplo, ir a la línea 1000, a la 2000, etc. pero si estando en la 2000 le digo que vaya a la línea 10 no hace caso.
Gracias.

Hola,

Mira a ver si te funciona este "tip":

Código Delphi [-]
procedure SetLine(RichEdit: TRichedit; const LineNum, CharPos: Integer);
Begin
  RichEdit.SelStart := RichEdit.Perform(EM_LINEINDEX, LineNum, 0) + CharPos;
  RichEdit.Perform(EM_SCROLLCARET, 0, 0);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  SetLine(RichEdit1, StrToInt(Edit1.Text), 5);
  RichEdit1.SetFocus();
end;

Funciona perfecto, gracias, desconocía ese sitio. : )