Fórum Como exibir os nomes de CAMPOS numa ComboBox? #347096
07/10/2007
0
Tenho uma tabela Employee com os seguintes campos: Numero, Nome, Sobrenome e Salario. Estou tentando carregar o nome dos campos na combobox, mas não estou consegguindo. Alguem poderia me ajudar?
Tentei o código abaixo, mas não deu certo:
Tentei o código abaixo, mas não deu certo:
while not (dstEmployee.Eof) do begin cbxNome.Items.Add(dstEmployee.FieldList[i].AsString); dstEmployee.Next; end;
Soueusei26
Curtir tópico
+ 0
Responder
Posts
07/10/2007
Ruysalles
while not (dstEmployee.Eof) do
begin
cbxNome.Items.Add(dstEmployee.FieldByName(´Numero´).AsString + dstEmployee.FieldByName(´Nome´).AsString +dstEmployee.FieldByName(´Sobrenome´).AsString + dstEmployee.FieldByName(´Salario´).AsString)) ;
dstEmployee.Next;
end;
begin
cbxNome.Items.Add(dstEmployee.FieldByName(´Numero´).AsString + dstEmployee.FieldByName(´Nome´).AsString +dstEmployee.FieldByName(´Sobrenome´).AsString + dstEmployee.FieldByName(´Salario´).AsString)) ;
dstEmployee.Next;
end;
Responder
Gostei + 0
07/10/2007
Joaoshi
Colega, se entendi direito.
For nX := 0 to SuaTabela.FieldCount -1 do
Memo1.Lines.add(UpperCase(SuaTabela.Fields[nX].FieldName));
Espero ter ajudado.
For nX := 0 to SuaTabela.FieldCount -1 do
Memo1.Lines.add(UpperCase(SuaTabela.Fields[nX].FieldName));
Espero ter ajudado.
Responder
Gostei + 0
07/10/2007
Soueusei26
Obrigado João, funcionou assim:
for i := 0 to dstEmployee.FieldCount -1 do
begin
cbxNome.Items.Add(UpperCase(dstEmployee.FieldDefs[i].Name));
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)