[Investment]

Suponiendo que los queiras extraer a un fichero y que tuvieses dos columnas en el grid y que el datasource del grid tira de un query:

   AssignFile(flog, 'C:\Fichero.txt');
   rewrite(flog);
 
   Valor:= 'Campo1: ' + query1.fieldByName('Nombre_Campo1').asString +
 		 ' Campo2: ' + query1.fieldByName('Nombre_Campo2').asString;
   write(flog,Valor);
   Close(flog);

Pero es mucho suponer.