Posicionar cursor em run-time memo

Pessoal,

estou precisando posicionar o cursor em determinada linha do memo que eu crio em tempo de execução. Tentei usar Memo.SelStart := Perform(EM_LINEINDEX, 9, 0); mas não funcionou. o cursor continua na primeira linha. Se eu tento usar em um memo que não foi criado em tempo de execução ele funciona.
segue abaixo a rotina usada.

agradeço qualquer ajuda.

AlternaTribe,

var Memo : TMemo;
begin
with TTabSheet.Create(Form1.PageControl2) do
begin
PageControl := Form1.PageControl2;
Name := ´ts´ + IntToStr(i+1);
Caption := ´Untitled´ + IntToStr(i+1);
Tag := i+1;
end;
Form1.PageControl2.ActivePageIndex := Form1.PageControl2.PageCount-1;
Memo := TMemo.Create(Form1);
with Memo do
begin
Parent := Form1.PageControl2.Pages[Form1.PageControl2.PageCount-1];
Align := alClient;
Lines.LoadFromFile(´comp1.txt´);
end;
Form1.ActiveControl:= Memo;

{ TODO : Memo.SelStart := Perform(EM_LINEINDEX, 9, 0); }