getmouse.h

《C++ Builder 5技术内幕》一书附带的程序源代码

//---------------------------------------------------------------------------
#ifndef GetMouseH
#define GetMouseH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TFormCapturingMouse : public TForm
{
__published:	// IDE-managed Componentsvoid __fastcall FormClick(TObject *Sender);
    TGroupBox *GroupBoxShiftSets;
    TCheckBox *CheckBoxShiftKey;
    TCheckBox *CheckBoxControlKey;
    TCheckBox *CheckBoxLeftButton;
    TCheckBox *CheckBoxRightButton;
    TMemo *MemoInfo;
    TButton *ButtonUnion;
    TButton *ButtonIntersection;
    TButton *ButtonDifference;
    TPanel *PanelTest;
    TLabel *LabelTest;
    void __fastcall FormClick(TObject *Sender);
    void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
    void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
          TShiftState Shift);
    void __fastcall FormKeyPress(TObject *Sender, char &Key);

    void __fastcall PanelTestMouseDown(TObject *Sender,
          TMouseButton Button, TShiftState Shift, int X, int Y);
    void __fastcall ButtonUnionClick(TObject *Sender);
    void __fastcall ButtonIntersectionClick(TObject *Sender);
    void __fastcall ButtonDifferenceClick(TObject *Sender);
private:	// User declarations
    void __fastcall CheckStateInfo(TShiftState Shift);
    void __fastcall OperateSet(TObject *Sender);
public:		// User declarations
    __fastcall TFormCapturingMouse(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormCapturingMouse *FormCapturingMouse;
//---------------------------------------------------------------------------
#endif