void __fastcall TForm1::Button3Click(TObject *Sender)
{
//그냥 다음과 같이 하면 ScrollBar는 나타납니다.
SetWindowLongA(Panel1->Handle,GWL_STYLE,GetWindowLong(Panel1->Handle,GWL_STYLE)|WS_VSCROLL|WS_HSCROLL);
Panel1->Height++;
Panel1->Width++;
Panel1->Height--;
Panel1->Width--;
//Panel2는 Panel1위에 있는놈인데요 ..
SetScrollRange(Panel1->Handle,0,0,Panel2->Width,true);
SetScrollRange(Panel1->Handle,1,0,Panel2->Height,true);
}
위와같이 하면 그냥 ScrollBar는 나타납니다.
하지만 Scroll Message를 받아서 Panel위에 있는 Control의 좌표를 변경해줘야 하는데..
배보다 보꼽이 더 커질듯 한데요..
그냥 ScrollBox를 쓰실것을 권해드립니다.
그럼..
영악한녀석 님이 쓰신 글 :
: 안녕하십니까?? 선배님들..
:
: 패널에 굳이 스크롤 바를 적용시키려면 어떻게 해야 할까여?
|