Posicionar al inicio de un TMemo

[jars]

Hola nuevamente.
Mi consulta ahora es como puedo mostrar un TMemo pero no que se posicione al final sino al principio del mismo.

El codigo que uso para cargar el memo es este:

Código Delphi [-] mScript.Clear; mScript.Lines.Add(QNews.FieldByName('DBN_DATA').AsString);


y sucede que siempre queda el cursor al final del memo.
Alguna idea?

Gracias.

[roman]

Código Delphi [-]
mScript.SelStart := 1

// Saludos

[jars]

Ya lo había probado de esa manera pero no funciona.

[roman]

De hecho es

Código Delphi [-]
mScript.SelStart := 0; // no 1 como había puesto

Y esta es la forma de mover el cursor. Si no funciona será entonces porque hay algún otro código y/o evento que está interfiriendo.

// Saludos

[beginner01]

Empezado por roman

Código Delphi [-]
mScript.SelStart := 0; // no 1 como había puesto





Y esta es la forma de mover el cursor. Si no funciona será entonces porque hay algún otro código y/o evento que está interfiriendo.

saludos.
A mi me funciona de esta manera.

Código Delphi [-]
  mmo1.SelStart:=0;
   mmo1.Perform(EM_SCROLLCARET, 0, 0);