main.cpp

来自「C++ builder 完全攻略 学习C++ Builder 不可缺少」· C++ 代码 · 共 49 行

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

#include <vcl.h>
#pragma hdrstop

#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
int LastX = 0;
int LastY = 0;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
  if ((X - LastX) > 0)
  {
    if ((Shape1->Left + Shape1->Width) < Form1->ClientWidth)
      Shape1->Left++;
  }
  else
  {
    if (Shape1->Left > 0)
      Shape1->Left--;
  }

  if ((Y - LastY) > 0)
  {
    if ((Shape1->Top + Shape1->Height) < Form1->ClientHeight)
      Shape1->Top++;
  }
  else
  {
    if (Shape1->Top > 0)
      Shape1->Top--;
  }

  LastX = X;
  LastY = Y;
}
//---------------------------------------------------------------------------