弱弱的提问:怎样在adodataset中提取某条记录后所有记录

Question

我在adodataset中想知道某一条记录下面是否还有记录,如果有,则把该记录下面的所有记录显示到MEMO中,不知该怎样做...因是新手,所以最好能有代码...谢谢

Answer 1

var
  i,j: Integer;
  ADODataset1: TADODataset;
begin
  ADODataset1.Fields[i].Value;             //假设这是第i条记录的值
  if ADODataset1.Fields[i+1].Value then;   //判断i+1条记录是否存在
  begin
    for j := i to ADODataset1.RecordCount - 1 do     //从j(i后面的第一条记录)开始到最后一条
      Memo1.Lines.Add(ADODataset1.Fields[j].Value);  //Memo1显示记录
  end;不知道我这个思路对不对？呵呵 

Answer 2

  用指针也可以完成
  只是指针我不太会.
  
form1.ADODataset1.first;             //记录的第1条
while not form1.ADODataset1.eof do   //最后一条
Begin
....... 
form1.ADODataset1.next;              //下一条
End;

Answer 3

ADODataset1.MoveFrist;
while not ADODataset1.Eof then
begin
  //Show Data
  ADODataset1.MoveNext;
end;

Answer 4

首先 locate 到你所说的记录然后
 next;
 while not eof do
begin
  输出;
  next; 
end