shape.h

《C Builder 5技术内幕》程序源代码

//---------------------------------------------------------------------------
#ifndef ShapeH
#define ShapeH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Dialogs.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
//---------------------------------------------------------------------------
class TFormShape : public TForm
{
__published:	// IDE-managed Components
    TMainMenu *MainMenu;
    TMenuItem *MenuItemShapes;
    TMenuItem *MenuItemShapesRectangle;
    TMenuItem *MenuItemShapesCircle;
    TMenuItem *MenuItemShapesEllipse;
    TMenuItem *MenuItemShapesRoundSquare;
    TMenuItem *N1;
    TMenuItem *MenuItemShapesExit;
    TMenuItem *MenuItemColor;
    TMenuItem *MenuItemColorForm;
    TMenuItem *MenuItemColorShape;
    TShape *ShapeMain;
    TScrollBar *ScrollBarHorizontal;
    TScrollBar *ScrollBarVertical;
    TColorDialog *ColorDialog;
    TComboBox *ComboBoxShape;
    void __fastcall MenuItemColorShapeClick(TObject *Sender);
    void __fastcall MenuItemColorFormClick(TObject *Sender);
    void __fastcall ScrollBarHorizontalChange(TObject *Sender);
    void __fastcall ScrollBarVerticalChange(TObject *Sender);
    void __fastcall FormResize(TObject *Sender);
    void __fastcall MenuItemShapesExitClick(TObject *Sender);
    void __fastcall MenuItemShapesRectangleClick(TObject *Sender);
    void __fastcall MenuItemShapesCircleClick(TObject *Sender);
    void __fastcall MenuItemShapesEllipseClick(TObject *Sender);
    void __fastcall MenuItemShapesRoundSquareClick(TObject *Sender);
    void __fastcall ComboBoxShapeChange(TObject *Sender);
private:	// User declarations
public:		// User declarations
    __fastcall TFormShape(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TFormShape *FormShape;
//---------------------------------------------------------------------------
#endif