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

C++빌더 Q&A
C++Builder Programming Q&A
[62258] Re:Re:폼프린트시 TScrollBox 에 가려진 부분보이게 하는방법..
도라지 [forevermc] 971 읽음    2010-08-26 10:35
장성호님 정말 감사합니다.
덕분에 해결 잘되었습니다^^


장성호 님이 쓰신 글 :
: 다음 링크에 보시면..
: ScrollBox의 안보이는 영역까지 dc에 draw해주는 함수가 있습니다.
: http://cafe.naver.com/bcbmaster/759
:
: 참조하세요
:
: 그럼..
:
: 도라지 님이 쓰신 글 :
: : 안녕하세요..
: : 업체에 넘겨줘야하는데;; 이부분 프린트가 안돼서;;
: : 일주일째 삽질만 죽도록 하고 있는데 해결이 안되는군요...
: :
: : TScrollBox를 이용해서.. 오브젝트들을 동적으로 생성하구요^^;;
: :
: : 장성호님의 GetPanelImage() 함수를 이용해서..
: :
: : 아래 소스와 같이 이용하였습니다.
: : 허나 가려진 부분은 계속해서 보이지 않구.. 눈에 보이는 부분만 프린트가 되는군요..
: :
: : 참고해야할 함수나? 아님 잘못된부분.. 조언부분 모두 감사히 듣겠습니다.
: :
: : 조언 부탁드려요 ㅠㅠ;
: :
: :
: :     pForm = ScrollBox1;
: :     Graphics::TBitmap *mjbmp= GetPanelImage(pForm);
: : 
: :    if (!PrintDialog1->Execute())
: :               return;
: : 
: :     TPrinter *prt = Printer();
: :     mjbmp->HandleType = bmDIB;
: : 
: :     double h = mjbmp->Height;
: :     double w = mjbmp->Width;
: :     double fct;
: :     double wf;
: : 
: :     prt->Orientation = poPortrait;
: :     prt->Title = "EC PRINT";
: : 
: :     wf = (double)prt->PageWidth / w;
: :     fct = (double)prt->PageHeight / h;
: : 
: :     if (fct > wf)  fct = wf;
: : 
: :     prt->BeginDoc();
: :     prt->Canvas->StretchDraw(Rect(250, 500, fct*w+250, fct*h+500), mjbmp);
: :     prt->EndDoc();
: : 
: :     delete mjbmp;
: : 

: :
: :
: :
: : Graphics::TBitmap * __fastcall GetPanelImage(TScrollBox *Panel)
: : {
: :     if(Panel==NULL)return NULL;
: : 
: :     Graphics::TBitmap *bmp=NULL;
: : 
: :     bmp = new Graphics::TBitmap;
: :     bmp->Width=Panel->ClientWidth;
: :     bmp->Height=Panel->ClientHeight;
: :     bmp->Canvas->Brush = Panel->Brush;
: :     bmp->Canvas->FillRect(Panel->ClientRect);
: :     bmp->Canvas->Lock();
: : 
: :     try
: :     {
: :         int Ofs=0;
: :         if(GetWindowLong(Panel->Handle, GWL_STYLE) & WS_BORDER )
: :             Ofs = -1;  // Don't draw form border
: :         else
: :             Ofs = 0;  // There is no border
: : 
: :         Panel->PaintTo(bmp->Canvas->Handle, Ofs, Ofs);
: : 
: :     }
: :     __finally
: :     {
: :         bmp->Canvas->Unlock();
: :     }
: : 
: :     return bmp;
: : }

+ -

관련 글 리스트
62253 폼프린트시 TScrollBox 에 가려진 부분보이게 하는방법.. 도라지 850 2010/08/25
62254     Re:폼프린트시 TScrollBox 에 가려진 부분보이게 하는방법.. 장성호 1091 2010/08/26
62258         Re:Re:폼프린트시 TScrollBox 에 가려진 부분보이게 하는방법.. 도라지 971 2010/08/26
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.