안녕하세요...
저번에 경호님이 답변을 해주셨던 것으로 기억이 되는데요..
richedit의 스크롤 메시지를 가로채는 방법에 대해서 질문 좀 드릴께요..
richedit에서 스크롤을 하게 될 때 뭔가 이벤트를 주고 싶은데요....
팁의 25번글을 보고 아래처럼 해보았습니다...
틀린 점이 있으면 좀 가르쳐주세요....

WNDPROC FOriginalProc;
LRESULT WINAPI NewWinProc(HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam)
{
switch (uMsg)
{                       //  wndproc  SubClassWndProc
case SC_VSCROLL:
        ShowMessage("스크롤");
        break;
case SC_HSCROLL:
        ShowMessage("옆스크롤");
        break;
default :
return CallWindowProc((FARPROC)FOriginalProc, hWnd,uMsg,wParam, lParam);
}
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
        FOriginalProc = (WNDPROC)SetWindowLong(RichEdit1->Handle,GWL_WNDPROC,(LONG)NewWinProc);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormDestroy(TObject *Sender)
{
        SetWindowLong(RichEdit1->Handle,GWL_WNDPROC,(LONG)FOriginalProc);
}

감사합니다...