[tarco35]

Hola compañeros. Tengo el siguiente código:

Código Delphi [-]
  TablaTextos.Close;
  with SQLReestructuraTabla do begin
    SQL.Text:= 'SELECT * FROM \BIA_TEST\DataBase\Textos';
    ExecSQL;
    If FindField('Texto')= NIL then Existe := false
    else Existe := true;
    Close;
  end;
  If Not Existe then begin
    SQLReestructuraTabla.SQL.Clear;
    with SQLReestructuraTabla do begin
      SQL.Text:= 'ALTER TABLE \BIA_Test\DataBase\Textos ADD Texto VARCHAR(10)';
      ExecSQL;
      Close;
    end;
  end;
  TablaTextos.Open;

Con el cual pretendo verificar si existe el campo "Texto" en la tabla "TEXTOS", la primera vez que pasa, funciona correctamente y crea el campo, pero a la siguiente ejecución sigue diciendo que dicho campo no existe... ¿por que me falla??? (delphi 6 , paradox 7)