een zichtbaar onderdeel van deze code zal bewegen, bewegen een controle op vluchten, zelfs niet om ervoor te zorgen dat de extctrls zaad in je. De voorwaarden voor het gebruik van de controles, en dan zet je de muis bij de volgende code, een gebeurtenis plaatsvindt. Beheersing van de bewegingen van de afzender: (TObject knop: tmousebutton;     veranderen: tshiftstate;,, X, y: gehele); var, de     temppanel:TPanel;,     controle: de controle en  , begint,   /vrij staat   muis,   vangen en vrijlaten,    ; als de afzender en,         /Vergadering heeft een handvat. Het   rechtstreeks te       (afzender). Uitvoering (wm_syscommand, f019,0 dollar),     andere,         /onderdeel niet aan, zet het in een   kan    ,   proberen,             controle = (stuurt het verslag:）；，      temppanel：= TPanel。创造（自我）；，      与temppanel做，      开始，    /替换元件与temppanel，        描述：= ''；，        bevelouter：= bvnone；，        窗口（控制。左，control.top，，，        控制。宽度控制。高度）；，        家长：=控制。父母；，        /把我们控制在temppanel，        control.parent：= temppanel；，        /移动temppanel里面有控制，        执行（wm_syscommand，f019,0美元）；，        /把组件面板掉了，     control.parent：=父母；，        control.left：=左；，                control.top:= top;      ,       eindigt;      ,   eindelijk             temppanel. Vrijheid,  ;       voorbij, voorbij.