como verificar se campo da tabela existe ?

Delphi

06/04/2004

Tenho uma tabela que usa 10 campos, mas na nova versão do programa a tabela ganhou 1 campo a mais, por isso eu tenho que verificar se ele já existe, e se não existir eu crio. Mas como eu faço pra verificar se o campo já existe ?

Obrigado.


Kurama

Kurama

Curtidas 0

Respostas

Pedro Bugim

Pedro Bugim

06/04/2004

Você pode fazer um select na sua tabela, buscando este novo campo. Caso ele não exista, ocorrerá uma excessão. Portanto, crie um bloco Try-Except do tipo:

Try
   With Query do
   Begin
       Close;
       Sql.Clear;
       Sql.Add(´Select CAMPO from TABELA´);
       Open;
    End;
Except
   {Seu código para criar o campo na tabela};
End;


Assim, quando a excessão ocorre, fica evidenciada a inexistencia do campo, entrando assim na rotina de criação do mesmo, na tabela em questão. Ok?!
Espero que funcione!
Abraços,


GOSTEI 0
Kurama

Kurama

06/04/2004

Ae, valeu pela dica! funcionou direitinho, valeu mesmo !


GOSTEI 0
Pedro Bugim

Pedro Bugim

06/04/2004

Falô Colega! Boa sorte!
Abraços,


GOSTEI 0
POSTAR