Recorrer un string y actuar segun palabras leidas

[[coso]]

Hola de nuevo, se puede acceder a cada linea de un memo mediante un indice:

Código Delphi [-]
 
linea1 := memo1.lines[0];
linea2 := memo1.lines[1];
...
linean := memo1.lines[n-1];
linea1_y_2 := memo1.lines[0] + ' ' + memo1.lines[1];

saludos