31 lines
1.2 KiB
C
31 lines
1.2 KiB
C
|
//---------------------------------------------------------------------------
|
||
|
|
|
||
|
|
#ifndef Unit1H
|
||
|
|
#define Unit1H
|
||
|
|
//---------------------------------------------------------------------------
|
||
|
|
#include <Classes.hpp>
|
||
|
|
#include <Controls.hpp>
|
||
|
|
#include <StdCtrls.hpp>
|
||
|
|
#include <Forms.hpp>
|
||
|
|
//---------------------------------------------------------------------------
|
||
|
|
class TForm1 : public TForm
|
||
|
|
{
|
||
|
|
__published: // IDE-managed Components
|
||
|
|
void __fastcall FormPaint(TObject *Sender);
|
||
|
|
void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
|
||
|
|
TShiftState Shift);
|
||
|
|
void __fastcall FormMouseMove(TObject *Sender, TShiftState Shift,
|
||
|
|
int X, int Y);
|
||
|
|
void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
|
||
|
|
TShiftState Shift, int X, int Y);
|
||
|
|
void __fastcall FormMouseUp(TObject *Sender, TMouseButton Button,
|
||
|
|
TShiftState Shift, int X, int Y);
|
||
|
|
private: // User declarations
|
||
|
|
public: // User declarations
|
||
|
|
__fastcall TForm1(TComponent* Owner);
|
||
|
|
};
|
||
|
|
//---------------------------------------------------------------------------
|
||
|
|
extern PACKAGE TForm1 *Form1;
|
||
|
|
//---------------------------------------------------------------------------
|
||
|
|
#endif
|
||
|
|
|