Nome dos campos de uma tabela para ComboBox

Firebird

17/05/2004

Como faço para colocar em um combobox os nomes de todos os campos de uma tabela. Para criar depois uma consulta

Veja bem não é o conteudo dos campos, mas sim os nomes dos campos.

NIlson


Nilson Junior

Nilson Junior

Curtidas 0

Respostas

Maicongabriel

Maicongabriel

17/05/2004

SELECT CAMPOS.RDB$FIELD_NAME
  FROM RDB$RELATION_FIELDS CAMPOS
    WHERE CAMPOS.RDB$RELATION_NAME = ´NOME_DA_TABELA´


[i:79255dd55a]Onde ´NOME_DA_TABELA´, logicamente, igual ao nome da tabela da qual deseja obter os nomes dos campos e entre as aspas simples (´).[/i:79255dd55a] :wink:


GOSTEI 0
Nilson Junior

Nilson Junior

17/05/2004

Me desculpe a burrice, mas onde entraria este código ?

Teria de usar o que ?


Nilson


GOSTEI 0
Afarias

Afarias

17/05/2004

Algo como::


  Combobox.Itens.Clear;
  with IBQuery1 do // o SQL postado pelo maicongabriel
  begin
    Open;
    try
      First;
      while not Eof do
      begin
         Combobox.Itens.Add(Fields[0].AsString);
         Next;
      end;
    finally
       Transaction.Commit;
    end;
  end;




T+


GOSTEI 0
Maicongabriel

Maicongabriel

17/05/2004

Algo como:: 
  Combobox.Itens.Clear;
  with IBQuery1 do // o SQL postado pelo maicongabriel
  begin
    Open;
    try
      First;
      while not Eof do
      begin
         Combobox.Itens.Add(Fields[0].AsString);
         Next;
      end;
    finally
       Transaction.Commit;
    end;
  end;
T+


Obrigado [b:f1e0a55278]AFarias[/b:f1e0a55278].
A parte relacionada ao Banco(que é a parte dessa sessão do Forum) eu te passei [b:f1e0a55278]Nilson Carvalho A. Junior[/b:f1e0a55278] :wink:
O resto deveria ser com você! Ou com a sessão [b:f1e0a55278]Delphi[/b:f1e0a55278] do Forum...


GOSTEI 0
POSTAR