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;