Ler uma Tabela inteira

Question

Como fa�o para ler registro por registro de uma tabela, estou usando DBExpressGrato...

Marcio.theis · Answer

tabela.Fisrt;while not tabela.Eof do    begin    -------    -------    tabela.Next;    end;...

Ecarvalhox · Answer

eu preciso fazer isto usando uma QueryPor Ex.Select * from tabelaE da� ler todos os registros deste resultado.Acho que n�o havia explicado direito. DesculpaGrato...

Silviogs · Answer

Ol�,use a mesma forma da outra resposta, apenas usando a query.Query1.Fisrt; while not Query1.Eof do begin ------- ------- Query1.Next; end;Atenciosamente,Silvio Guedes....

Ecarvalhox · Answer

Estou tentando mover os dados de um campo de uma consulta Sql para um componente, o primeiro registro eu consigo,
mas o no segundo da este erro:
Project Teste.exe raised exception class EListError with message �list index out of bounds(1)�. Process Stopped.
O meu c�digo � este:
Q1.Close;
Q1.Open;
Q1.First;
i := 0;
While true do
begin
CheckListbox1.Items.Add(Q1.Fields[0].AsString);
try
Q1.Next;
i := i + 1;
except
break;
end;
Onde o comando SQL � : Select cod from Teste.
Grato

F�rum Ler uma Tabela inteira #188986