Sepuede Hacer Esto????????

[ddd_ddd]

lo que hice es:

Código Delphi [-]
  
query1.active:=false;
 query1.active:=true;
 
 while not query1.eof do
 begin
   label1.caption:=label1.caption+' '+query1.text;
 end;

eso fue lo que hice, pero se cicla.

algo hice mal?

saludos....