TForm20 *Form20;
//---------------------------------------------------------------------------
__fastcall TForm20::TForm20(TComponent* Owner)
	: TForm(Owner)
{

	isDrag = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm20::Panel2MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y)
{
   isDrag = true;
   Panel2->Left = X;

}
//---------------------------------------------------------------------------
void __fastcall TForm20::Panel2MouseMove(TObject *Sender, TShiftState Shift, int X,
		  int Y)
{
	if(isDrag)
	{
		Panel2->Left +=X;
		if(Panel2->Left <0)
		{
			Panel2->Left = 0;
			isDrag = false;
		}
		if(Panel2->Left >Panel1->Width-9){
			Panel2->Left=Panel1->Width-15;
			isDrag = false;
		}
	}
}
//---------------------------------------------------------------------------
void __fastcall TForm20::Panel2MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
		  int X, int Y)
{
   isDrag = false;
}

답변들 감사합니다.

제가 질문을 정확히 못한것 같네요 .

마우스의 움직임은 자유롭되 드래그되는 패널이 바닥 패널안에서만 움직이게 하고 싶었거든요..

너무 쉬운 질문이였나 봅니다.

이렇게해도 대충 되네요 ^^