Novo Campo Piradox

Question

Galera, � o seguinte, estou precisando criar um campo em uma tabela, mas so que o sistema ja esta rodando em varios clientes, gostaria de fazer uma rotina, que verificasse a existencia da tabela e incluisse o campo na tabela paradox, tem como fazer isso?

Joaoshi · Answer

Colega, vc poderia �ler� os fields da tabela e verificar se existe a field que vc deseja incluir, exemplo:

var
achou : boolean;
nX : Integer;
begin
achou := false;
for nX := 0 to [b:498eb8fe95]SuaTabelaParadox.FieldCount [/b:498eb8fe95]-1 do
if SuaTabelaParadox.Fields[nX].FieldName = �NOVOCAMPO� then achou:=true;

if not achou then
Query1.sql.Add(�ALTER TABLE ��SuaTabelaParadox.DB�� ADD NOVOCAMPO CHAR(10)�);

end;

Espero ter ajudado.

F�rum Novo Campo Piradox #329807