안녕하세요..며칠전에도 질문을 올렸는데 잘못 올려 다시 올립니다..
물론 답은 없었지만요..- -;;
한심스럽게도 제가 이걸로 며칠째 고생하고 있으니..아시는 분 꼬옥좀 도와주세요..

그리드에 있는 것들을 퀵레포트에 찍어 주려고 아래와 같이
했는데..
프린트를 찍으면 레포트 한장에 한껀식 출력됩니다.
그리드에 5건의 데이타가 있으면 5장이 찍힌다는 거죠..
물론 밴드는 디테일 밴드구요..
모가 문제인지 아무리 들여다 봐도 모르겠어요..
제발 꼬옥 좀 도와주세요..ㅠ.ㅠ...


procedure TForm.QuickRep1NeedData(Sender: TObject;
  var MoreData: Boolean);
begin
  with Firstform.AdvGrid1 do
  begin
    inc(gs_Row);
    if RowCount < gs_Row then  Exit;

      QLbl_no.Caption    := IntToStr(gs_Row);
      QLbl_item.Caption  := Cells[2,gs_Row];
      QLbl_uprice.Caption:= Cells[10,gs_Row];
      QLbl_price.Caption := Cells[11,gs_Row];
      {
      if gs_Row mod 15 then
      begin
       QuickRep1.NewPage;
      end;
      }
      if gs_Row < RowCount then                          
        MoreData := True
      else
        MoreData := False
  end;

end;

procedure TForm.QuickRep1BeforePrint(Sender: TCustomQuickRep;
  var PrintReport: Boolean);
begin
  gs_Row := 0;
end;