안녕하세요 만해 입니다.
그동안 빌더만 쓰다가 델파이 쓸려니깐 넘 힘드네요 흑
어제 빌더 질문란에도 올린 내용니데요
세개의 리포트를 한 번에 프리뷰 혹은 출력 시킬려고 하는데
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 란 희한한 에러 메세지 입니다.''
어제 유앤아이님께서 애기한 버그 일지도 모를거서 같네요
저도 이거 해결해 볼려고 델마당, 웹보드 검색엔진 막 뒤졌는데요 도저히 해결의
기미가 안 보이네요
고수님들의 도움 바랍니다.
|