Q&A

  • 퀵레포트 두장연결하는거 다시 질문드려요..ㅠ.ㅠ
procedure Tsepd0920Form.QRCompositeReport1AddReports(Sender: TObject);
begin
  inherited;
   With QRCompositeReport1.Reports Do
   Begin
       add(sepd0920q01Form.QuickRep1);
       add(sepd0920q02Form.QuickRep1);
   End;
end;


procedure Tsepd0920Form.N1Click(Sender: TObject);
begin
  inherited;
    Application.CreateForm(TSepd0920q01Form, Sepd0920q01Form);
    sepd0920q01Form.QRLabel9.Caption := DateToStr(f01.Date);
    Application.CreateForm(TSepd0920q02Form, Sepd0920q02Form);
    sepd0920q02Form.QRLabel9.Caption := DateToStr(f01.Date);
    QRCompositeReport1.Preview;
end;


이러케 했거든요...근데 첫장만 보여지구 두번째장은 보여지지가 않아요..
글구...출력두 한장밖에 안되구여..
저거 말구..또 바꿔줘야 하는 부분이 잇는건가요?
웅..왜 안되는지..ㅠ.ㅠ
며칠째..계속 하구있는데..도저히 몰게떠염..ㅠ.ㅠ
이 게시물을
2  COMMENTS
  • Profile
    최성준 • 2004.03.09 23:24

    각 form에 하나식 올려놓앗네여... 그렇게 하지마시고
    form 에 QuickRep 를 두개 올려놓고 사용하세요.

    procedure Tsepd0920Form.QRCompositeReport1AddReports(Sender: TObject);
    begin
      inherited;
       With QRCompositeReport1.Reports Do
       Begin
           add(sepd0920q01Form.QuickRep1);
           add(sepd0920q01Form.QuickRep2);
       End;
    end;

    procedure Tsepd0920Form.N1Click(Sender: TObject);
    begin
        Sepd0920q01Form:= TSepd0920q01Form.Create(Self);
        QRCompositeReport1.Preview;
        Sepd0920q01Form.Free ;

    end;

    그럼... 즐프하세요


  • Profile
    호홋 • 2004.03.09 23:13
    방금전에 우연치않게 안사실인데여^^:;;;

    용지방향을 poPortrait로 하면...두장이 연결이 되는데..

    poLandscape로하면...다음페이지가 안되는거였어여 ㅡㅡ;;

    이런경우는 우째해야 하나여?ㅠ.ㅠ
←First Page
479 480 481 482 483 484 485 486 487 488
Last Page→
한델 로그인 하기