查询问题

Question

 ADOQuery1.sql.Clear;
 ADOQuery1.sql.Text:='select top 10 * from table order by id desc';
 ADOQuery1.open;
我这样查询是几条记录
还有这样是执行查询么
查询出来的结果在哪里
要怎么样吧他显示出来

Answer 1

窗体上再放一个TDataSource控件
和DBGrid控件
设置DBGrid控件的DataSource属性为那个TDataSource控件
TDataSource控件的DataSet属性为你那个ADOQuery1控件就可以了！

Answer 2

LZ得找本基本的书了（曾经也有人这么对我说）
1，10条
2，   
     close;
     sql.clear;
     sql.text='';
     open/execsql3,4,一个ADOQUERT,一个DATASOURCE，一个 显示控件（如 DBGRIDEH,DBGRID）

Answer 3

我这样查询是几条记录 //10条记录，前10条
还有这样是执行查询么 //是
查询出来的结果在哪里 //在adoquery中
要怎么样吧他显示出来 //dbgrid+datasource

Answer 4

《Delphi8.0范例入门与提高》这本书我严重鄙视他
我刚开始一点没接触Delphi看这本书就发现很多错的东西了
现在对书都反感了
谁有什么好书介绍来看下

Answer 5

select top 10 * from table order by id desc
这不是倒序排列么
这么会是前10条呢
你是说我的倒序排列的前10条么

Answer 6

typeTMyDataInfo = packed record //定义数据信息
    DataID: Integer;
    DataName: string;
end;
PMyDataInfo = ^TMyDataInfo; ......var
  pData: PMyDataInfo ;
  l:TList;
......
l := TList.Create;
ADOQuery1.sql.Clear;
 ADOQuery1.sql.Text:='select top 10 * from table order by id desc';
 ADOQuery1.open;
while not ADOQuery1.eof do
begin
  New(pData);
  pData.DataName := ADOQuery1.fieldbyname('name').asstring;
  l.Add(pData);
  ADOQuery1.next;
end;for i := 0 to l.count -1 do
  begin
    ShowMessage( PMyDataInfo(l.Items[i]).DataName);
  end;

Answer 7

定义一个二维的数组，为10行的 ，列数是你的字段数。
比方说 数组名为 shuzu 
然后开始赋值 
var i:integer
i:=0
 qry.first;  
while not eof do 
begin
  shuzu[i][0] := fieldbyname('id').asstring;
//其他字段的赋值方法是一样的
  inc(i);
  next;
  end
end;
这是大概的意思，具体的语句自己写吧 我不知道你到底有多少字段