[Resolvido] Delphi com access

[DouglasP 1]

Bom dia,

to fazendo um programinha no qual preciso listar todos clientes em um listview,

porel ele so retorna um cliente, meu codigo:

 

With ADOQuery1 do
begin

    Close;
    SQL.Clear;
    SQL.Add('select nome, vencimento from Clientes where Pendente=''Sim''');
    Open;

    ListItem:= ListView1.Items.Add;
    ListItem.Caption := Fields[0].asString;
    ListItem.SubItems.Add(Fields[1].asString

Acredito que tenha que fazer um laço ou algo do genero mais não sei como, se alguem puder me ajudar.

Obrigado.

[hgb7 3]

http://outrolado.com.br/Artigos/conexao_bd_em_access_com_delphi_7__parte_01

 

Espero que dê uma luz :)

[DouglasP 1]

Essa pagina é referente a conexão amigo hehe

ja passei dessa parte, minha duvida é como fazer um select e exibir todos os dados cadastrados.

 

---------------

 

Solucionei quem precisar ta ae:

 

    ADOQuery1.Close;
    ADOQuery1.SQL.Clear;
    ADOQuery1.SQL.Add('select nome, vencimento from Clientes where pendente=''sim''');
    ADOQuery1.Open;

    while not ADOQuery1.Eof do
    begin

    ListItem:= ListView1.Items.Add;
    ListItem.Caption := ADOQuery1.Fields[0].asString;
    ListItem.SubItems.Add(ADOQuery1.Fields[1].asString);

    ADOQuery1.Next;