음..
혹시 Focus문제가 아닐까 하네요
대게 그냥 ScrollBox를 클릭해도 Focus가 ScrollBox로 이동되지 않습니다.
그런 Control이 몇개 있죠 TPanel 이나 TScrollBox , TGroupBox등 container컨트롤들이 대게 그렇죠..
이경우 다음과 같이 Focus를 ScrollBox로 설정해주시면 wheel이벤트가 발생할것입니다.
void __fastcall TForm1::ScrollBox1Click(TObject *Sender)
{
ScrollBox1->SetFocus();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ScrollBox1MouseWheel(TObject *Sender,
TShiftState Shift, int WheelDelta, TPoint &MousePos, bool &Handled)
{
ScrollBox1->VertScrollBar->Position -= WheelDelta;
}
//---------------------------------------------------------------------------
그럼..
안성준 님이 쓰신 글 :
: 안되는데요?
: 혹시 뭐 다른거 또 설정해줘야 하는거 있나요?
:
:
:
: civilian 님이 쓰신 글 :
: :
: : void __fastcall TForm1::ScrollBox1MouseWheel(TObject *Sender, TShiftState Shift, int WheelDelta, TPoint &MousePos, bool &Handled)
: : {
: : ScrollBox1->VertScrollBar->Position -= WheelDelta;
: : }
: :
: :
: : 본명이신지 가명인지 모르겠지만, 제 아들 이름과 같군요. ^^
: :
: : 안성준 님이 쓰신 글 :
: : : 안녕하세요...
: : :
: : : 개발하고 있는 프로그램에 TScrollBox 컨트롤을 사용하고 있는데요 스크롤 막대가 마우스로 드래그 하면 움직이는데 휠마우스로는 움직이지 않네요?
: : :
: : : 이거 휠마우스로 움직일 수 있는 방법은 없는건가요?
: : : 그리고 그렇게 할 수 없다면 혹시 TScrollBox 와 같은 기능이 되면서 휠마우스도 되는 상용 컨트롤이나 무료 컨트롤 어디 없을까요??
: : :
: : : 아시는 분 조언 부탁드릴께요...
|