Ajuda com Banco de Dados

Delphi

22/08/2008

Boa tarde pessoal..
Estou com uma duvida e queria ver se alguem sabe como me ajudar..
Uso Firebird com Interbase.

Ex.: Tenho um tabela CONTATOS nessa tabela tem os campos nome, telefone, email.

O que estou querendo é pegar todos os telefones desta tabela CONTATOS e jogar em um memo por exemplo.
só por exemplo.. dai para frente eu faço o que eu quero..

alguem saberia me ajudar??


Betofrasson

Betofrasson

Curtidas 0

Respostas

Pestana_

Pestana_

22/08/2008

é +/- isso que você quer:

memo1.Clear;
with query do
begin
   while not eof do
    begin
       memo1.Lines.Append(FieldByName(´telefone´).AsString);
       next;
    end;
end;



espero ter ajudado!


GOSTEI 0
Paulo

Paulo

22/08/2008

While not Contatos.eof do
begin
Memo1.Lines.Add(Contatos.FieldByName(´Nome´).AsString + ´ - ´ Contatos.FieldByName(´Telefone´).AsString );
Contatos.Next;
end;


GOSTEI 0
Betofrasson

Betofrasson

22/08/2008

Pestana e Paulo..
obrigado mesmo.. era bem isso.
fico devendo uma.


GOSTEI 0
POSTAR