delphi怎么逐行读取select取得的结果

delphi如何逐行读取select取得的结果
我的思路是先在数据库中随即产生10条内容
然后在逐行读取到listbox1中
请问该如何操作

我的随即条目的SQL语句如下
Select * From 表名 order By Rand() Limit 10 


请问逐行读取的语句应该如何写呢 


[解决办法]
用TAdoQuery 中的Next就可以了。

//用个样式，看得舒服点。

with TAdoQuery.Create(nil) do
begin
   //设置连接属性
    ConnectionString := '';
  
  try
    //初始化SQL语句，并打开记录集
    Close;
    SQL.Clear;
    SQL.Add(strSQL);
    Open;
  
    //读取记录
    First;
    while not eof do
     begin
      //......codes.
      Next;
    end;
  
  finally
    Free;
  end;
end;