unit1.h

来自「元胞自动机运用于模式识别上的小程序」· C头文件 代码 · 共 61 行

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <ComCtrls.hpp>
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// IDE-managed Components
   TPaintBox *PaintBox1;
   TButton *ButtonRun;
   TButton *ButtonStep;
   TButton *ButtonStop;
   TGroupBox *GroupBoxReset;
   TButton *ButtonRandom;
   TButton *ButtonDead;
   TButton *ButtonAlive;
   TEdit *EditIterations;
   TTrackBar *TrackBar1;
   TEdit *EditCell;
   TGroupBox *GroupBoxCursorColor;
   TShape *ShapeSandGenerator;
   TShape *ShapeSand;
   TShape *ShapeEmpty;
   TShape *ShapeContainer;
   void __fastcall PaintBox1MouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
   void __fastcall ButtonRunClick(TObject *Sender);
   void __fastcall ButtonStepClick(TObject *Sender);
   void __fastcall ButtonStopClick(TObject *Sender);
   void __fastcall FormPaint(TObject *Sender);
   void __fastcall FormShow(TObject *Sender);
   void __fastcall ButtonRandomClick(TObject *Sender);
   void __fastcall ButtonDeadClick(TObject *Sender);
   void __fastcall ButtonAliveClick(TObject *Sender);
   void __fastcall TrackBar1Change(TObject *Sender);
   void __fastcall PaintBox1MouseMove(TObject *Sender, TShiftState Shift,
          int X, int Y);
   void __fastcall ShapeEmptyMouseDown(TObject *Sender,
          TMouseButton Button, TShiftState Shift, int X, int Y);
   void __fastcall ShapeSandMouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
   void __fastcall ShapeContainerMouseDown(TObject *Sender,
          TMouseButton Button, TShiftState Shift, int X, int Y);
   void __fastcall ShapeSandGeneratorMouseDown(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