Hola, como te dice el amigo Coso, para acceder a las líneas debes hacerlo con la propiedad Lines y su respectivo indice.
Tu codigo en un memo mas o menos sería así (para marcar varias líneas), le das valores a LineaIni y LineaFin, que serían las líneas que quieres marcar:
Código Delphi
[-]
var
i, LineaIni, LineaFin, aLength, aStart : Integer;
begin
aLength := 0;
aStart := 0;
for i:=0 To LineaIni-1 do
aStart := aStart + Length(Memo1.Lines[i])+2;
for i:=LineaIni To LineaFin do
aLength := aLength +Length(Memo1.Lines[i])+2;
Memo1.SelStart := aStart;
Memo1.SelLength := aLength;
Memo1.SetFocus;
Showmessage(Memo1.SelText);
Pero no entiendo porque lo haces así, si quieres obtener una parte de un texto en una cadena puedes utilizar la función Copy.
Saluditos