Algo extraño con TstringList

[Cecilio]

Hola a todos.

He creado un pocedimiento que exporta tablas de Ib a ficheros de texto.

Los nombres de los campos los extraigo usando un TStringList.

pero al liberar el stringlist da un error:

Código Delphi [-]
  gs:=TstringList.Create;
  gs:=ibb.FieldList;
  s:='';
  for v:=0 to gs.Count-1 do
      s:=s+gs[v]+';';
  writeln(t,s);
  gs.free;
...
...
sigue el resto de código sin dar error.
end;

Lo curioso es que el método continua sin problemas y hace la exportación correctamente. Pero al finalizar el procedimiento da el error.

Si quito el gs.free ya no da error.

¿ es porqué pude ser ?