Obtener los valores de un .doc
 

Hola amigos, tengo un archivo .DOC que tiene diferentes filas, cada fila tiene
<Apellido, fecha_nacimiento, edad>separado por caracteres en blanco Ejm:

DIAZ 01/05/2006 33
MENDOZA 05/05/2006 40
GOMEZ 06/05/2006 55


Lo que yo quiero es poder obtener cada campo y cargarlo en un registro en una tabla por ejemplo
Registro 1: DIAZ, 01/05/2006, 33
Registro 2: MENDOZA,05/05/2006,40

Como puedo hacerlo.
Muchisimas gracias por todo.

Hola, la manera mas sencilla de programar, opino yo es usando dos TSTrings.
Con uno lees el archivo y recorres cada linea de el y con el otro vas separando los datos de cada linea y procesandolo.
O sea seria algo asi.

Código Delphi [-]
var
tsTrama, tsArchivo : TStrings;
 :
 :
tsArchivo.loadfromfile('Archivo.txt');
for  i := 0 to tsArchivo.count-1 do
 Begin
   tsTrama.CommaText := tsArchivo[Indice];
 
//Variante 1
       for j:=0 to tsTrama.count-1  do
         Begin
          Campoj := tsTrama[j];  // Asi puedes recorre el segundo TSTring y obtener los valores de cada campo para esa linea para despues insertarlos en la BD.
     
         End; // Fin del for para recorrer los campos
 
//Variante 2, como de seguro conoces la cantidad de campos
      
   Campo0 :=  tsTrama[0]; 
   Campo1 :=  tsTrama[1]; 
   Campo2 :=  tsTrama[2]; 
   
 end; //Fin del for para recorrer todas las lineas

Supuse que los datos vienen en el formato de separados por comas por el ejemplo que pones.

Bueno espero que resuelvas y buena suerte.
Juan Carlos