高手帮帮忙..求教:memo读取数据库问题..

Question

SELECT TOP 4 bt FROM tzggb ORDER BY bt DESC 
以上是查询语句..
求教:如何在memo中显示出来查询bt字段的最后四条记录呢?谢谢....

Answer 1

最后四条还是只有4条？如果只有4条的话：
Adoquery1.First;
Memo1.clear;
while not Adoquey1.Eof do
begin
  Memo1.Lines.add(Adoquery1.FieldByName('bt').AsStrng);
  Adoquery1.Next;
end;如果还有很多条的话：Adoquery1.Last;
Adoquery1.Prior;
Adoquery1.Prior;
Adoquery1.Prior;
Memo1.clear;
while not Adoquey1.Eof do
begin
  Memo1.Lines.add(Adoquery1.FieldByName('bt').AsStrng);
  Adoquery1.Next;
end;

Answer 2

是最后四条,以后会有很多条,所以我只要在memo中显示最后四条记录.我现在去试试,一会给分,谢谢你..

Answer 3

mastersky(浪) 提示这个错误.. 
ADOQuery1: Cannot perform this operation ona closed dateset

Answer 4

ADODataSet1.Close;
  ADODataSet1.CommandText:='SELECT TOP 4 bt FROM tzggb ORDER BY bt DESC ';
  ADODataSet1.Open;
  ADODataSet1.Sort:='bt ASC';
  ADODataSet1.First;
  While not ADODataSet1.Eof do
    begin
    Memo1.Lines.Add(ADODataSet1.FieldByName('bt').AsString);
    ADODataSet1.Next;
    end;