Eliminar una Linea Memo especificada

[maxzama]

Hola a todos.

Programa:

Delphi XE2

A utilizar:

-Memo

-Boton

Problema:

Necesito eliminar la primera linea o fila del memo en una de las funciones y en otra de las funciones la segunda linea o fila del memo.

Codigo:

E puesto lo siguiente, y claro no a funcionado.

Código Delphi [-]
var 

TT:String;
begin
            TT:=Memo1.Lines[1];
            Memo1.Lines.Delete(TT);
end;

Espero su respuesta por favor y gracias...