www.pudn.com > FUN_2V.rar > Unit1.h
//--------------------------------------------------------------------------- #ifndef Unit1H #define Unit1H //--------------------------------------------------------------------------- #include#include #include #include #include #include #include //--------------------------------------------------------------------------- #include #include #include #include #include //--------------------------------------------------------------------------- #include "ucvm_type.h" #include "ucvm9.hpp" //--------------------------------------------------------------------------- typedef double (*func_type)(double); //--------------------------------------------------------------------------- class TForm1 : public TForm { __published: // IDE-managed Components TScrollBox *ScrollBox1; TImage *Image1; TPageControl *PageControl1; TTabSheet *TabSheet1; TMemo *Memo1; TTabSheet *TabSheet2; TLabel *Label1; TLabel *Label2; TLabel *Label3; TEdit *Edit1; TEdit *Edit2; TEdit *Edit3; TLabel *Label4; TLabel *Label5; TLabel *Label6; TEdit *Edit4; TEdit *Edit5; TEdit *Edit6; TGroupBox *GroupBox1; TRadioButton *RadioButton1; TRadioButton *RadioButton2; TGroupBox *GroupBox2; TRadioButton *RadioButton3; TRadioButton *RadioButton4; TRadioButton *RadioButton5; TGroupBox *GroupBox3; TRadioButton *RadioButton6; TRadioButton *RadioButton7; TRadioButton *RadioButton8; TTabSheet *TabSheet3; TLabel *Label7; TLabel *Label8; TLabel *Label9; TEdit *Edit7; TEdit *Edit8; TCheckBox *CheckBox1; TLabel *Label10; TLabel *Label11; TLabel *Label12; TShape *Shape1; TShape *Shape2; TShape *Shape3; TButton *Button1; TButton *Button2; TLabel *Label13; TLabel *Label14; TLabel *Label15; TEdit *Edit9; TEdit *EditA; TLabel *Label16; TLabel *Label17; TLabel *Label18; TEdit *EditC; TEdit *EditD; TButton *Button3; TButton *Button4; TColorDialog *ColorDialog1; void __fastcall Button1Click(TObject *Sender); void __fastcall Button2Click(TObject *Sender); void __fastcall Button3Click(TObject *Sender); void __fastcall Button4Click(TObject *Sender); void __fastcall Shape1MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall Shape2MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall Shape3MouseUp(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y); void __fastcall FormCreate(TObject *Sender); void __fastcall FormDestroy(TObject *Sender); private: // User declarations TUCVM9 *my_ucvm9; public: // User declarations __fastcall TForm1(TComponent* Owner); }; //--------------------------------------------------------------------------- extern PACKAGE TForm1 *Form1; //--------------------------------------------------------------------------- #endif