챠트를 퀵리포트를 사용해서 인쇄하려고 하는데여.

이미지 생성해서 그 위에 보여주려구 합니다.

그런데 안보이더라구여.

챠트대신에 버튼으로 해봤더니 버튼은 나오는데 챠트는 왜 안되는지 가르쳐 주세요..





procedure TForm_Print.chart_Create; // 챠트정보 보여주기

var

DC : HDC;

Chart_Image : TQRImage;

begin

Chart_Image := TQRImage.Create(self);

Chart_Image.Parent := QRBand2;

Chart_Image.Height := FormMain.Chart1.Height;

Chart_Image.Width := FormMain.Chart1.Width;

Chart_Image.Left := 20;

Chart_Image.Top := 20;



DC := GetDC(FormMain.Chart1.Canvas.Handle);

BitBlt(Chart_Image.Canvas.Handle, 0, 0, FormMain.Chart1.Width, FormMain.Chart1.Height, DC, 0,0, SRCCOPY);

ReleaseDC(FormMain.Chart1.Handle,DC);

end;