TMemo 에 배경 이미지 깔기
등록자 : cpueblo (유광희), 2008-10-22
소개
TMemo 에 배경 이미지를 까는 방법 입니다.
WNDPROC FOriginalProc;
LRESULT CALLBACK ListViewProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch(uMsg)
{
case WM_ERASEBKGND:
BitBlt((HDC)wParam, 0, 0, frmNotice->Memo1->Width, frmNotice->Memo1->Height, frmNotice->Image1->Canvas->Handle, 0, 0, SRCCOPY);
return 0;
case CN_CTLCOLOREDIT:
SetBkMode( (void *)wParam, TRANSPARENT );
return 0;
default:
return CallWindowProc((FARPROC)FOriginalProc, hWnd, uMsg,
wParam, lParam);
}
}
__fastcall TfrmNotice::TfrmNotice(TComponent* Owner)
: TForm(Owner)
{
frmNotice = this;
msgLoader = "";
FOriginalProc = (WNDPROC)SetWindowLong(Memo1->Handle, GWL_WNDPROC, (LONG)ListViewProc);
}
http://codesarang.com. mail to cpueblo cpueblo.com
|