treeviewmain.h

著名的基因芯片表达数据聚类软件。esein编写

//---------------------------------------------------------------------------
#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