第一次用QUICKREPORT， 为何只显示最后一条记录？没分了.(0分)

没有DATASET，只想用NEEDDATA，
procedure TFrmAlReport.QuickRep1NeedData(Sender: TObject;
var MoreData: Boolean);
begin

while not DM.AQOutReport2.Eof do begin
moredata:=true;
qrlabel11.Caption :=DM.AQOutReport2.FieldValues['lNName'];
qrrichtext1.Lines.Text:=DM.AQOutReport2.FieldValues['lN'];
MoreData:=false;
DM.AQOutReport2.Next;
end;
不知错在哪？

另，如用DATASET，是否只能报表的FORM的QUERY，而不能引用其它FORM的，如DATAMODAL？

看一下Demos/Quickrpt/Qr2下的系统给的例子，照着他的模式写，没有问题的。

1.QuickRep1的Dataset屬性有沒有設數據集DM.AQOutReport2。
2.可以引用其它Form上，或Datamodal上的query.
在uses 后加上引用單元。

奇怪，我已在USES引用了DM， 但还是不行，也就是在DATASET的下拉列表中不出现。