C++builder 实现动态添加按钮以及随意拖动实现

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
int X1,Y1,X2,Y2;
int iX,iY;
int KS=0;
TPanel *Pnzz;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{    }
//---------------------------------------------------------------------------
void __fastcall TForm1::DeleteAllPn(void)
{
//  int ii;
//  for(ii=0;ii<PnCount;ii++)  { delete Pn[ii]; }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::PtnMouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{
  if(Button==mbLeft)
  {