遍历ADODATASET中的数据 begin ADODataSet.First; Whlie not ADODataSet.Eof do begin // 执行代码 ADODataSet.Next; end; end;