강영준 님이 쓰신 글 :
: 마우스로 버튼위에 가져 가면 글자 색이 바뀌게 할려면 어떻게 해야 하나요?
:
: 버튼을 벗어 나면 원래 색으로 돌아 가게 할려면..
:
: 방법을 알려 주세용.~~

void __fastcall TForm1::AppMessage(tagMSG &Msg, bool &Handled)
{
  if(Msg.message == WM_MOUSEMOVE){
     POINT p;
     GetCursorPos(&p);
     if(PtInRect(&(Label1->ClientRect),Label1->ScreenToClient(p))){
       if(Label1->Font->Color!=clBlue){
        Label1->Font->Color=clBlue;
       }
     }else{
       if(Label1->Font->Color!=clBlack){
        Label1->Font->Color=clBlack;
       }
     }
     Handled = true;
  }

}
void __fastcall TForm1::FormCreate(TObject *Sender)
{
  Application->OnMessage = AppMessage;
}
위와 같은 내용을 찾아서 버튼에 적용을 했드니 잘 되드군요..
그래서 기뻤죠.. 근데. 문제는...

mousemove메시지를 모두 가로체기 때문에 ... 트랙바를 마우스로 끌어 당기지를 못하드군요.

특정 컴포넌트들에만 작용하게 할려면 어떻게 해야 하나요?