[cloayza]

Podrías explicitar los campos que te estan dando problemas...y probar de esta forma...

Código Delphi [-]
QUERY1.SQL.Clear;
QUERY1.SQL.Add('SELECT GMCO, GMOBJ, GMSUB ');
QUERY1.SQL.Add('FROM PRODDTA.F0901 ' );
QUERY1.SQL.Add('WHERE GMCO=''00013'' AND GMOBJ IN (''6250'',''6400'')');
query1.SQL.add(' AND GMSUB=''020201''');
QUERY1.Open;
for i:=0 to Query1.FieldCount-1 do
        memo1.lines.add( Format('Campo %d: %s',[i, Query1.Fields[i].FieldName]));

LINEA:='AUX='+Query1.FieldByName('gmsub').AsString+'#'+
          'NOM='+Query1.FieldByName('gmobj').AsString+'#';

A ver como va la cosa...