[Neftali [Germán.Estévez]]

Primero puedes obtener en un Striung la línea concreta.

Código Delphi [-]
  Str := Memo1.Lines.Strings[5];

Una vez que tengas la línea puedes utilizar la función Copy para "cortar trozos" de esa línea.

Código Delphi [-]
  StrFecha := Copy(Str, 12, 5);