안녕하세요? 지나가다가 ^^;
제가 말씀드린 버그는 아닌거 같군요 전, 레포트가 출력이 되고 원하는데로 출력이 안되는 버그
를 말씀드린거랍니다.
근데 제가 좀 이상타하는 부분은
: 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;
인데요
레포트를 Add시키고 바로 Free하셨는데.. 흠.. Print하시고 Free하시는것이 좋을꺼 같네요
(확실치않음 ^^;) 그럼 참고하세요~
만해 님이 쓰신 글 :
: 안녕하세요 만해 입니다.
:
: 그동안 빌더만 쓰다가 델파이 쓸려니깐 넘 힘드네요 흑
:
: 어제 빌더 질문란에도 올린 내용니데요
:
: 세개의 리포트를 한 번에 프리뷰 혹은 출력 시킬려고 하는데
:
: 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 란 희한한 에러 메세지 입니다.''
:
: 어제 유앤아이님께서 애기한 버그 일지도 모를거서 같네요
:
: 저도 이거 해결해 볼려고 델마당, 웹보드 검색엔진 막 뒤졌는데요 도저히 해결의
:
: 기미가 안 보이네요
:
: 고수님들의 도움 바랍니다.
:
|