C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[52823] quick report 에서 dbgrid의 다수의 레코드 프린트하는법?
rrr [] 1157 읽음    2008-03-21 11:29
ms access mdb파일을 쿼리로 연결한다음 dbgrid에 뿌렸습니다.

그런다음 quick report로 프린트를 하려는데요

간략하게 프린트하기까지 과정을 보면..

ADOQuery1->ConnectionString =
        "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
        + ExpandFileName("C:\\CS_DB\\THW_CS.mdb");

ADOQuery1->SQL->Text = "select * from SEC_S_LSI_Logic_Power_CSR";
                        ADOQuery1->SQL->Add("order By 순번");

ADOQuery1->Open();

        DataSource1->DataSet = ADOQuery1;
        DBGrid1->DataSource = DataSource1;

        Form4->QuickRep1->DataSet = ADOQuery1;
        Form4->QRDBText1->DataSet = ADOQuery1;
        Form4->QRDBText2->DataSet = ADOQuery1;
        Form4->QRDBText3->DataSet = ADOQuery1;
        Form4->QRDBText4->DataSet = ADOQuery1;
        Form4->QRDBText5->DataSet = ADOQuery1;
        Form4->QRDBText6->DataSet = ADOQuery1;
        Form4->QRDBText7->DataSet = ADOQuery1;
        Form4->QRDBText8->DataSet = ADOQuery1;
        Form4->QRDBText9->DataSet = ADOQuery1;
        Form4->QRDBText10->DataSet = ADOQuery1;
        Form4->QRDBText11->DataSet = ADOQuery1;
        Form4->QRDBText12->DataSet = ADOQuery1;
        Form4->QRDBText13->DataSet = ADOQuery1;
        Form4->QRDBText14->DataSet = ADOQuery1;
        Form4->QRDBText15->DataSet = ADOQuery1;
        Form4->QRDBText16->DataSet = ADOQuery1;
        Form4->QRDBText17->DataSet = ADOQuery1;
        Form4->QRDBText18->DataSet = ADOQuery1;

QuickRep1->Print;

이렇게 작성했습니다.

이렇게 하고 프린트를 하니까 dbgrid의 맨 위 데이터만 출력되더군요.

혹시나 해서

int a =2;
.
.
.

while(a)
         {
    //     QuickRep1->Print();
    //     MessageBox(Handle,
    //                    "고객사 이름이 잘못되었습니다.","Warning", MB_OK);
         Form1->ADOQuery1->Next();
         Form1->ADOQuery1->Open();
         QuickRep1->DataSet = Form1->ADOQuery1;
         QRDBText1->DataSet = Form1->ADOQuery1;
         QRDBText2->DataSet = Form1->ADOQuery1;
         QRDBText3->DataSet = Form1->ADOQuery1;
         QRDBText4->DataSet = Form1->ADOQuery1;
         QRDBText5->DataSet = Form1->ADOQuery1;
         QRDBText6->DataSet = Form1->ADOQuery1;
         QRDBText7->DataSet = Form1->ADOQuery1;
         QRDBText8->DataSet = Form1->ADOQuery1;
         QRDBText9->DataSet = Form1->ADOQuery1;
         QRDBText10->DataSet = Form1->ADOQuery1;
         QRDBText11->DataSet = Form1->ADOQuery1;
         QRDBText12->DataSet = Form1->ADOQuery1;
         QRDBText13->DataSet = Form1->ADOQuery1;
         QRDBText14->DataSet = Form1->ADOQuery1;
         QRDBText15->DataSet = Form1->ADOQuery1;
         QRDBText16->DataSet = Form1->ADOQuery1;
         QRDBText17->DataSet = Form1->ADOQuery1;
         QRDBText18->DataSet = Form1->ADOQuery1;
         a--;
         }

이렇게 해보니까 2장이 출력되긴 하는데 첫번째 데이터만 2장이 출력되더군요.

출력버튼을 누르면 dbgrid의 모든 데이터를 출력하는게 목표인데요.

뭐가 잘못된걸까요?

+ -

관련 글 리스트
52823 quick report 에서 dbgrid의 다수의 레코드 프린트하는법? rrr 1157 2008/03/21
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.