TreeViewMain.h
上传用户:szb0815
上传日期:2007-06-13
资源大小:338k
文件大小:6k
- //---------------------------------------------------------------------------
- #ifndef TreeViewMainH
- #define TreeViewMainH
- //---------------------------------------------------------------------------
- #include <Classes.hpp>
- #include <Controls.hpp>
- #include <StdCtrls.hpp>
- #include <Forms.hpp>
- #include <Dialogs.hpp>
- #include "TreeViewClasses.h"
- #include <ExtCtrls.hpp>
- #include <Menus.hpp>
- #include <NMHttp.hpp>
- #include <Psock.hpp>
- #include <Registry.hpp>
- #include <Db.hpp>
- #include <DBCtrls.hpp>
- #include <DBTables.hpp>
- //---------------------------------------------------------------------------
- class TTreeViewMainForm : public TForm
- {
- __published: // IDE-managed Components
- TOpenDialog *OpenDialog1;
- TScrollBox *OverviewScrollBox;
- TPanel *OverviewPanel;
- TShape *ZoomBoxShape;
- TSplitter *Splitter1;
- TMainMenu *MainMenu1;
- TMenuItem *File1;
- TMenuItem *Load1;
- TFontDialog *ZoomFontDialog;
- TMenuItem *Setting1;
- TMenuItem *Options1;
- TOpenDialog *OpenDialog2;
- TMenuItem *SaveTreeImage1;
- TMenuItem *SaveThumbnailImage1;
- TMenuItem *SaveZoomedImage1;
- TSaveDialog *SaveDialog1;
- TMenuItem *Find1;
- TMenuItem *Gene1;
- TMenuItem *Help1;
- TMenuItem *About1;
- TScrollBox *CentralScrollBox;
- TScrollBox *LabelScrollBox;
- TPanel *CentralPanel;
- TSplitter *ArrayTreeSplitter;
- TPanel *ArrayTreePanel;
- TImage *ArrayTreeImage;
- TPanel *Panel2;
- TSplitter *ArrayLabelSplitter;
- TPanel *ArrayLabelPanel;
- TImage *ArrayLabelImage;
- TPanel *ZoomPanel;
- TImage *ZoomImage;
- TSplitter *Splitter2;
- TScrollBar *ScrollBar1;
- TPanel *OuterLabelPanel;
- TPanel *LabelPanel;
- TImage *NodeBarcodeImage;
- TImage *TreeImage;
- TSplitter *Splitter3;
- TImage *SmallGeneImage;
- TMenuItem *SaveList1;
- TSaveDialog *SaveListDialog;
- TMenuItem *SaveData1;
- TSaveDialog *SaveDataDialog;
- TSaveDialog *SavePSDialog;
- TMenuItem *S1;
- TMenuItem *SaveAllPS1;
- TNMHTTP *NMHTTP1;
- TMenuItem *SaveNodeData1;
- TMenuItem *EditURLStrings;
- TMenuItem *SaveNotes1;
- TSaveDialog *NoteSaveDialog;
- TMenuItem *Notes1;
- TMenuItem *AddNotetoDB1;
- void __fastcall TreeImageMouseDown(TObject *Sender, TMouseButton Button,
- TShiftState Shift, int X, int Y);
- void __fastcall Splitter2Moved(TObject *Sender);
-
-
-
- void __fastcall Splitter1Moved(TObject *Sender);
-
-
- void __fastcall Load1Click(TObject *Sender);
-
- void __fastcall Options1Click(TObject *Sender);
- void __fastcall SmallGeneImageMouseDown(TObject *Sender,
- TMouseButton Button, TShiftState Shift, int X, int Y);
- void __fastcall SmallGeneImageMouseMove(TObject *Sender,
- TShiftState Shift, int X, int Y);
- void __fastcall SmallGeneImageMouseUp(TObject *Sender,
- TMouseButton Button, TShiftState Shift, int X, int Y);
- void __fastcall FormKeyDown(TObject *Sender, WORD &Key,
- TShiftState Shift);
-
-
- void __fastcall SaveTreeImage1Click(TObject *Sender);
-
- void __fastcall SaveThumbnailImage1Click(TObject *Sender);
- void __fastcall SaveZoomedImage1Click(TObject *Sender);
-
- void __fastcall ZoomScrollBoxClick(TObject *Sender);
-
- void __fastcall Gene1Click(TObject *Sender);
- void __fastcall Help1Click(TObject *Sender);
- void __fastcall About1Click(TObject *Sender);
- void __fastcall ArrayTreeSplitterMoved(TObject *Sender);
- void __fastcall ArrayLabelSplitterMoved(TObject *Sender);
-
-
-
- void __fastcall ArrayTreePanelResize(TObject *Sender);
- void __fastcall ArrayLabelPanelResize(TObject *Sender);
-
- void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
- void __fastcall ScrollBar1Change(TObject *Sender);
- void __fastcall CentralPanelResize(TObject *Sender);
-
-
- void __fastcall Splitter3Moved(TObject *Sender);
-
-
- void __fastcall SaveList1Click(TObject *Sender);
- void __fastcall SaveData1Click(TObject *Sender);
- void __fastcall SavePSClick(TObject *Sender);
- void __fastcall S1Click(TObject *Sender);
- void __fastcall SaveAllPS1Click(TObject *Sender);
- void __fastcall SavePSAll(AnsiString PSFileName);
- void __fastcall SaveNodeData1Click(TObject *Sender);
- void __fastcall EditURLStringsClick(TObject *Sender);
- void __fastcall SaveNotes1Click(TObject *Sender);
- void __fastcall ScrollBar1KeyDown(TObject *Sender, WORD &Key,
- TShiftState Shift);
- void __fastcall AddNotetoDB1Click(TObject *Sender);
- private: // User declarations
- double FImageScaleX, FImageScaleY;
-
- public: // User declarations
- __fastcall TTreeViewMainForm(TComponent* Owner);
- TGeneCluster *Cluster;
- TStringList *GeneLabels;
- void __fastcall Redo();
- void __fastcall Reset();
- void __fastcall MakeZoom();
- void __fastcall ResetNode();
- void __fastcall Find(AnsiString FindString);
- void __fastcall MakeArrayTree();
- void __fastcall MakeArrayLabels();
- void __fastcall SaveNodeData(AnsiString FileName);
-
- void __fastcall MakeSimplePS();
- void __fastcall SetOverviewScrollPos();
- __property double ImageScaleX = {read=FImageScaleX,write=SetImageScaleX};
- __property double ImageScaleY = {read=FImageScaleY,write=SetImageScaleY};
- int ZoomImageScaleX, ZoomImageScaleY;
- double CorrSelectCutoff;
- double ImageContrast;
- double MaskVal;
- bool Dragging;
- TRect DragRect;
- int LastIndex;
- AnsiString Version;
- TStringList *URLStrings;
- TColor NegativeColor;
- TColor PositiveColor;
- TColor ZeroColor;
- TColor MissingColor;
- protected:
- void __fastcall SetImageScaleX(double d)
- {
- if (d>0)
- {
- FImageScaleX = d;
- }
- }
- void __fastcall SetImageScaleY(double d)
- {
- if (d>0)
- {
- FImageScaleY = d;
- }
- }
- };
- //---------------------------------------------------------------------------
- extern PACKAGE TTreeViewMainForm *TreeViewMainForm;
- //---------------------------------------------------------------------------
- #endif
-