ADOQuery1.sql.Clear;
ADOQuery1.sql.Text:='select top 10 * from table order by id desc';
ADOQuery1.open;
我这样查询是几条记录
还有这样是执行查询么
查询出来的结果在哪里
要怎么样吧他显示出来
ADOQuery1.sql.Text:='select top 10 * from table order by id desc';
ADOQuery1.open;
我这样查询是几条记录
还有这样是执行查询么
查询出来的结果在哪里
要怎么样吧他显示出来
和DBGrid控件
设置DBGrid控件的DataSource属性为那个TDataSource控件
TDataSource控件的DataSet属性为你那个ADOQuery1控件就可以了!
1,10条
2,
close;
sql.clear;
sql.text='';
open/execsql3,4,一个ADOQUERT,一个DATASOURCE,一个 显示控件(如 DBGRIDEH,DBGRID)
还有这样是执行查询么 //是
查询出来的结果在哪里 //在adoquery中
要怎么样吧他显示出来 //dbgrid+datasource
《Delphi8.0范例入门与提高》这本书我严重鄙视他
我刚开始一点没接触Delphi看这本书就发现很多错的东西了
现在对书都反感了
谁有什么好书介绍来看下
select top 10 * from table order by id desc
这不是倒序排列么
这么会是前10条呢
你是说我的倒序排列的前10条么
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;
比方说 数组名为 shuzu
然后开始赋值
var i:integer
i:=0
qry.first;
while not eof do
begin
shuzu[i][0] := fieldbyname('id').asstring;
//其他字段的赋值方法是一样的
inc(i);
next;
end
end;
这是大概的意思,具体的语句自己写吧 我不知道你到底有多少字段