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

델파이 Q&A
Delphi Programming Q&A
[7557] [만해] 퀵리포트 질문요
만해 [greenuri] 698 읽음    2001-11-08 14:03
안녕하세요 만해 입니다.

그동안 빌더만 쓰다가 델파이 쓸려니깐 넘 힘드네요 흑

어제 빌더 질문란에도 올린 내용니데요

세개의 리포트를 한 번에 프리뷰 혹은 출력 시킬려고 하는데

TQRCompositeRepot라는 컴포넌트를 사용해서 할려고 하는데요

이게 자꾸 문제를 일으 키네요

밑의 소스는 출력을 하는 부분이고

Report는 TQRCompositeReport 컴포넌트 입니다.

procedure TfmPer014.bbtnCalClick(Sender: TObject);
begin
    Application.CreateForm(TfmPer014_R1, fmPer014_R1);  //출력폼을 각각 작성한후
    Application.CreateForm(TfmPer014_R2, fmPer014_R2);  //
    Application.CreateForm(TfmPer014_R3, fmPer014_R3);
    if not tblPer001.Active then
      Report.Print
    else begin tblPer001.Open;Report.Print;end;

    fmPer014_R1.Free;
    fmPer014_R1.Free;
    fmPer014_R1.Free;
end;

이거고요

밑의 소스는 애드 시키는 소스 입니다.

procedure TfmPer014.ReportAddReports(Sender: TObject);
begin
try Report.Reports.Add(fmPer014_R1.qr_Per014);
  finally
    fmPer014_R1.Free;
  end;
try Report.Reports.Add(fmPer014_R2.qr_Per014);
  finally
    fmPer014_R2.Free;
  end;
try Report.Reports.Add(fmPer014_R3.qr_Per014);
  finally
    fmPer014_R3.Free;
  end;
end;

문제가 되는 부분은요 Report.preview;이나

Report.Print; 부분이고요

프리뷰에서 제가 잡아낸 에러는

Cann't convert TFont to TFont 란 희한한 에러 메세지 입니다.''

어제 유앤아이님께서 애기한 버그 일지도 모를거서 같네요

저도 이거 해결해 볼려고 델마당, 웹보드 검색엔진 막 뒤졌는데요 도저히 해결의

기미가 안 보이네요

고수님들의 도움 바랍니다.

+ -

관련 글 리스트
7557 [만해] 퀵리포트 질문요 만해 698 2001/11/08
7559     Re:[만해] 퀵리포트 질문요 개박살.U&I 751 2001/11/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.