안녕하세요 하얀까마귀 입니다...



잠깐 들어 왔다가... 지금 시간이 없어서.. 간단하게만 답변 할께요...



더 아시고 싶으면 멜 주세요...



콘트롤 메세지 중에서 CM_MOUSELEAVE 와 CM_MOUSEENTER 라는 메세지가 있습니다...



보면 아시겠죠??? 빠져 나갈때... 들어올때 발생합니다.....



이 메세지를 이용하시면 만들수 있습니다...



콤포넌트를 (버튼) 상속 받으셔서 하나 만드셔도 되고... 아니면.. 조금 귀찮으시더라도



하나하나의 버튼마다 만들어 주면 됩니다...



먼저 private에

btnProc : TWndMethod; <-- 이놈은 이전의 메세지 프로시져를 저장할 변수

procedure MyBtnProc(var Msg : TMessage) ; <-- 이놈은 새로 만들 메세지 프로시져

이놈을 선언합니다...



그리고

formCreate

begin

// 이전의 프로시저 저장

btnproc := button1.Windowproc;

// 새로만든 프로시져로 바꿈..

button1.WindowProc := MyBtnProc;

end;



formClose

begin

button1.WindowProc := btnProc; //되돌려 줍니다.

end;



mybtnProc(var msg:message)

begin

case msg.msg of

CM_MOUSELEAVE:

begin

// 떠날때 처리

end;

CM_MOUSEENTER:

begin

// 들어올 때 처리

end;

end



// 요건 꼭꼭꼭 있어야 되요.. 왜냐구요..?? 나머지 메세지도 처리

// 해야 되니까...

btnProc(Msg);

end;



/////// 그냥 실제 테스트나 델파이에서 만든게 아니라서 에러가 있을지도 모르겠네요..



혹시 잘 안되면 메일 주시던지 아니면... 팁란 같은곳에 찾아보세요..



이런건 종종 나오는 문제같은데.. 아마 있을겁니다...



그럼 즐거운 시간 보내세요..



- 하얀까마귀 -







이빈 wrote:

> 한상 친절한 답변 감사합니다....

> 마우스화살표를 버튼에다 갔다 놓으면 흑백이 칼라로 변하게 하려고 합니다.

> 예를 들어 Explorer처럼 뒤로.앞으로,중지,새로고침,홈,검색,즐겨찾기,목록보기...

> 첨럼 마우스를 갔다데면 칼라도 변하잖아요....

> 델로 어떻게 코딩을 해야하는지....

> 어떻게 해야하는지 답답합니다.

> 친절한 답변 부탁합니다.그리고 자세히 설명도요...

> 그럼 즐거운 하루 되세요....

이빈 wrote:

> 한상 친절한 답변 감사합니다....

> 마우스화살표를 버튼에다 갔다 놓으면 흑백이 칼라로 변하게 하려고 합니다.

> 예를 들어 Explorer처럼 뒤로.앞으로,중지,새로고침,홈,검색,즐겨찾기,목록보기...

> 첨럼 마우스를 갔다데면 칼라도 변하잖아요....

> 델로 어떻게 코딩을 해야하는지....

> 어떻게 해야하는지 답답합니다.

> 친절한 답변 부탁합니다.그리고 자세히 설명도요...

> 그럼 즐거운 하루 되세요....



특별한 코딩이 필요한것은 아니고 트렌스버튼이라는 컴포넌트가 있습니다.

이컴포넌트는 델파이프로그램에서 지원이안되고 다른곳에서 받아와서 인스톨해야

될겁니다. 천리안이나 다른 델파이 자료실에가면 다운받을수 있을거예요.

만약 구하지 못했다면 위주소로 연락하면 줄수도 있음(공짜)