unit1.h

CAD转换工具 CAD转换工具 CAD转换工具 CAD转换工具

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Dialogs.hpp>
#include <ExtCtrls.hpp>
#include <Menus.hpp>
#include <cadimage.h>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ImgList.hpp>
#include <ToolWin.hpp>
//---------------------------------------------------------------------------
class TfrmCADImageDLLdemo : public TForm
{
__published:	// IDE-managed Components
        TMainMenu *MainMenu1;
        TMenuItem *mmiFile;
        TMenuItem *mmiOpen;
        TPaintBox *PaintBox1;
        TOpenDialog *OpenDialog1;
        TControlBar *clbBar;
        TToolBar *tlbBar;
        TToolButton *tbOpen;
        TImageList *imLarge;
        TComboBox *cbScale;
        TToolButton *tbSave;
        TMenuItem *mmiSaveAs;
        TSaveDialog *SaveDialog1;
        TPanel *plPanel;
        TComboBox *cbLayouts;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall Open1Click(TObject *Sender);
        void __fastcall FormDestroy(TObject *Sender);
        void __fastcall PaintBox1Paint(TObject *Sender);
        void __fastcall tbOpenClick(TObject *Sender);
        void __fastcall cbScaleChange(TObject *Sender);
        void __fastcall mmiSaveAsClick(TObject *Sender);
        void __fastcall FormMouseWheel(TObject *Sender, TShiftState Shift,
          int WheelDelta, TPoint &MousePos, bool &Handled);
        void __fastcall cbLayoutsCloseUp(TObject *Sender);
private:	// User declarations
        HINSTANCE CADImageDLL;
        HANDLE CADHandle;
        CADLAYOUT CADLayout;
        CADLAYOUTNAME CADLayoutName;
        CADLAYOUTSCOUNT CADLayoutsCount;
        CADUNITS CADUnits;
        CLOSECAD CloseCAD;
        CREATECAD CreateCAD;
        CURRENTLAYOUTCAD CurrentLayoutCAD;
        DEFAULTLAYOUTINDEX DefaultLayoutIndex;
        DRAWCAD DrawCAD;
        DRAWCADEX DrawCADEx;
        GETBOXCAD GetBoxCAD;
        SAVECADTOBITMAP SaveCADtoBitmap;
        SAVECADTOGIF SaveCADtoGif;
        SAVECADTOJPEG SaveCADtoJpeg;
        float CADWidth;
        float CADHeight;
        int nDestOffX;
        int nDestOffY;
        double nScale;
        bool bFileLoaded;
        void GetResolutionParams(float* vHorRes, float* vVertRes);
        void ProcessMenuItems(bool bEnable);
        void RefreshDrawing();
public:		// User declarations
        __fastcall TfrmCADImageDLLdemo(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TfrmCADImageDLLdemo *frmCADImageDLLdemo;
//---------------------------------------------------------------------------
#endif