안녕하세요...
일단 동적으로 Bitmap을 생성하고 폼의 특정부분을 캡쳐후 Bitmap으로 파일을 저장하고요.. 그다음에 QuickRep의 QRImage에 Bitmap 파일을 로드하고요. QuickRep 미리보기후 인쇄하면 인쇄가 되질않습니다....
캡쳐소스는 아래와 같이 했습니다.
---------------------------------------------------------------------
procedure TFrmUT011F.SetPictureSave(Preview: Boolean);
var
  X,Y: Integer;
  DC: HDC;
  WinScr: TBitmap;
  ImageSavePath, Filename: String;
begin
  X := TabSheet1.Left+PanelBox.Left+Panel.Left;
  Y := (FrmUt011F.ClientHeight-Panel.Height)+PanelHeader1.Height-2;
  ImageSavePath := ExtractFilePath(Application.ExeName);
  Filename := 'shape.bmp';
  WinScr := TBitMap.Create;
  WinScr.Width  := Panel.Width;
  WinScr.Height := Panel.Height;
  DC := GetDC(0);
  BitBlt(WinScr.Canvas.Handle, 0, 0, WinScr.Width, WinScr.Height, DC, X, Y, SRCCOPY);
  ReleaseDC(0,DC);
  WinScr.SaveToFile(ImageSavePath+Filename);
  Application.ProcessMessages;
  QRImage1.Picture.Bitmap.LoadFromFile(ImageSavePath+Filename);
  Application.ProcessMessages;
  if Preview = True then
    QuickRep.Preview;
  WinScr.Free;
end;
---------------------------------------------------------------------
참고로 QuickRep에 밴드는 TQRBand로 하고요. 밴드타입은 rbDetail로 했습니다. TQRBand에 QRShape는 인쇄되는데 캡쳐한 이미지가 인쇄되지 않아요...
고수님들 제발좀 도와주세요.....