00001
00009
00010
00011
00012
00013
00014 #ifndef MDISliceH
00015 #define MDISliceH
00016
00017 #include <Classes.hpp>
00018 #include <Controls.hpp>
00019 #include <StdCtrls.hpp>
00020 #include <Forms.hpp>
00021 #include <ComCtrls.hpp>
00022 #include <Menus.hpp>
00023 #include <Dialogs.hpp>
00024 #include <Printers.hpp>
00025 #include <Clipbrd.hpp>
00026 #include <ExtCtrls.hpp>
00027 #include <ActnCtrls.hpp>
00028 #include <ActnMan.hpp>
00029 #include <CustomizeDlg.hpp>
00030 #include <ToolWin.hpp>
00031 #include <gl\gl.h>
00032 #include <gl\glu.h>
00033
00034
00035 class TSliceForm : public TForm
00036 {
00037 __published:
00038 TPanel *Hauptpanel;
00039 TBevel *Bevel;
00040 TPanel *tPanel;
00041 TTrackBar *TrackBar;
00042 TGroupBox *GroupBox;
00043 TLabel *lpos;
00044 TLabel *lslice;
00045 TRadioButton *RadioButton1;
00046 TRadioButton *RadioButton2;
00047 TRadioButton *RadioButton3;
00048 TGroupBox *kontrast;
00049 TPanel *kontrastpanel;
00050 TCheckBox *CbTransfer;
00051 TPaintBox *HistoArea;
00052 void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
00053 void __fastcall FormCreate(TObject *Sender);
00054 void __fastcall FormResize(TObject *Sender);
00055 void __fastcall FormPaint(TObject *Sender);
00056 void __fastcall TrackBarChange(TObject *Sender);
00057 void __fastcall RadioButton1Click(TObject *Sender);
00058 void __fastcall RadioButton2Click(TObject *Sender);
00059 void __fastcall RadioButton3Click(TObject *Sender);
00060 void __fastcall FormActivate(TObject *Sender);
00061 void __fastcall HistoAreaDblClick(TObject *Sender);
00062 void __fastcall HistoAreaPaint(TObject *Sender);
00063 private:
00064 HDC hdc;
00065 HGLRC hrc;
00066 int PixelFormat;
00067 GLfloat w, h, wh;
00068 void __fastcall PaintGL();
00069 void __fastcall PrepareGLWindow();
00070 int pagesize;
00071
00072 public:
00073 virtual __fastcall TSliceForm(TComponent* Owner);
00074 void __fastcall SetPixelFormatDescriptor();
00075 };
00076
00077 extern TSliceForm *SliceForm;
00078
00079
00080 #endif