unit1.h

好东西,自己看,要慢慢品味,适用于学生搞各种设计,有立体效果,效果特棒

//---------------------------------------------------------------------------
#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include "lib\Elements.h"
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
//---------------------------------------------------------------------------
class TMainForm : public TForm
{
  __published:	// IDE-managed Components
    TPanel            *Control_Zone;
  TTimer *Timer1;
        TButton *Button1;
        TLabel *Label1;

    void __fastcall    FormResize(         TObject *Sender );
    void __fastcall    FormCreate(         TObject *Sender );
    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 );
    void __fastcall    FormMouseWheelDown( TObject *Sender,                     TShiftState Shift, TPoint  &MousePos, bool &Handled );
    void __fastcall    FormMouseWheelUp(   TObject *Sender,                     TShiftState Shift, TPoint  &MousePos, bool &Handled );
    void __fastcall    FormPaint(          TObject *Sender );
    void __fastcall    FormDestroy(        TObject *Sender );
  void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
  private:	// User declarations
    HDC                hdc;
    HGLRC              hrc;
    BASIC              Elements;
    float              w, h, PI, t;
    float              start_point;
    int                PixelFormat,x,y;
    BOOL               Left_Button_Down,inclined,key_and_mouse_down;
    float              zoom;
    GLuint             axials,points,polygon,cube,disk,cylinder,sphere,ring,arrow,curve,surface;
 
  public:		// User declarations
         __fastcall    TMainForm(TComponent* Sender);
    void __fastcall    IdleLoop(TObject*, bool&);

    void __fastcall    Prepare_All();
    void __fastcall    Draw_All();

    void __fastcall    Calculate_Points();
    void __fastcall    Calculate_Polygon();
    void __fastcall    Calculate_Curve();
    void __fastcall    Calculate_Surface();
    void __fastcall    Calculate_Curve1();
};
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif