sobre FIBDataBase e query

Firebird

05/11/2007

Opa galera!

Bem, estou usando a paleta de componentes FIB (FIBDataBase, FIBDataSet, FIBTransaction) para me conectar a um banco de dados do Firebird.

Acontece, que eu quero fazer o seguinte, quero que conecte ao banco de dados, tire o nome da tabela, o nome do campo da tabela, e o tipo do campo, e jogar tudo isso num TXT.

Bem, a unica coisa que eu tenho sobre isso e isso aqui:

procedure TFPrincipal.LerTabelasANTIGO();
var test : TStringList;
begin
 //Esta procedure tem como objetivo criar um arquivo de texto em aonde o migrador esta sendo executado e, em seguida,
 //escrever o nome dos campos da tabela antiga e o nome da tabela, tal como tipo do campo, etc.
 filecreate(application.Name + ´DB.txt´);
 DataSetANTIGO.GetFieldNames(test)


Bem, alguem pode me ajudar por favor?

E toda vez que eu mando compilar, ele me diz que a minha query ta vazia e para.

Grato!


Icarus

Icarus

Curtidas 0
POSTAR