이렇게하면 드래그는 되는데

밑에 패널 밖으로 나가버리네요 ㅡㅡ

이거 해결책 없을까요?

__fastcall TForm19::TForm19(TComponent* Owner)
	: TForm(Owner)
{
	isDrag=false;
}
//---------------------------------------------------------------------------
void __fastcall TForm19::Panel2MouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
		  int X, int Y)
{
	isDrag=true;
	Panel2->Left = X;
}
//---------------------------------------------------------------------------
void __fastcall TForm19::Panel2MouseMove(TObject *Sender, TShiftState Shift, int X,
		  int Y)
{
	  if(isDrag)
	  Panel2->Left += X;

}
//---------------------------------------------------------------------------
void __fastcall TForm19::Panel2MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift,
		  int X, int Y)
{
	 isDrag = false;
}