Criar Field em tempo de execução
Gostaria de Saber se tem como criar as field de um BD em tempo de execução..
uso firebird 1.5
Grato
uso firebird 1.5
Grato
Dart
Curtidas 0
Respostas
Edilcimar
07/04/2006
With IBQuery1 do
Begin
Close;
Sql.Clear;
Sql.Add(´ALTER TABLE ´ + MinhaTabela + ´ (´ITEM´ LONGINTEGER, ´NUMERO´ INTEGER,´+ ´´PRODUTO´ VARCHAR (40) CHARACTER SET ISO8859_1 COLLATE ISO8859_1´);
ExecSQL;
Close;
Sql.Clear;
End;
pode usar o charset win1252 e collate pxw_int850
Begin
Close;
Sql.Clear;
Sql.Add(´ALTER TABLE ´ + MinhaTabela + ´ (´ITEM´ LONGINTEGER, ´NUMERO´ INTEGER,´+ ´´PRODUTO´ VARCHAR (40) CHARACTER SET ISO8859_1 COLLATE ISO8859_1´);
ExecSQL;
Close;
Sql.Clear;
End;
pode usar o charset win1252 e collate pxw_int850
GOSTEI 0
Dart
07/04/2006
Isso eu sei... Mas tipo... eu uso query pra acessar a table e para isso eu crio no list field os fields pra acesso. eh isso q eu quero fazer em tempo de execução
GOSTEI 0