dztp.~h

来自「电子天平测量数据处理系统」· ~H 代码 · 共 68 行

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

#ifndef DZTPH
#define DZTPH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Grids.hpp>
#include <ExtCtrls.hpp>
#include <Buttons.hpp>
#include "MSCommLib_OCX.h"
#include <OleCtrls.hpp>
#include <ComCtrls.hpp>
#include "OtherInfoDlg.h"
#include "KADlg.h"
#include "MGDlg.h"
#include <ADODB.hpp>
#include <Db.hpp>
#include <Excel_2K_SRVR.h>

#define INPUT_MODE      1               //输入模式 
#define SETTINGS_STRING "9600,N,8,1"   //设置串口发送参数
//---------------------------------------------------------------------------
class TDZTPForm : public TForm
{
__published:	// IDE-managed Components
        TStringGrid *StringGrid;
        TPanel *Panel1;
        TGroupBox *PrintGroupBox;
        TBitBtn *PreViewBitBtn;
        TBitBtn *PrintBitBtn;
        TGroupBox *GroupBox3;
        TPanel *Panel2;
        TLabel *DataLabel;
        TPanel *Panel3;
        TGroupBox *CommGroupBox;
        TRadioButton *Com1RadioButton;
        TRadioButton *Com2RadioButton;
        TMSComm *MSComm;
        TGroupBox *InfoGroupBox;
        TBitBtn *BitBtn1;
        TBitBtn *BitBtn2;
        TBitBtn *OtherInfoBitBtn;
        TADOTable *ADOTable;
        void __fastcall StringGridDblClick(TObject *Sender);
        void __fastcall Com1RadioButtonClick(TObject *Sender);
        void __fastcall Com2RadioButtonClick(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
        void __fastcall MSCommComm(TObject *Sender);
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall OtherInfoBitBtnClick(TObject *Sender);
        void __fastcall BitBtn1Click(TObject *Sender);
        void __fastcall BitBtn2Click(TObject *Sender);
        void __fastcall PreViewBitBtnClick(TObject *Sender);
        void __fastcall PrintBitBtnClick(TObject *Sender);
        void __fastcall FormShow(TObject *Sender);
private:	// User declarations
        short s_ComPortNum;
public:		// User declarations
        __fastcall TDZTPForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TDZTPForm *DZTPForm;
//---------------------------------------------------------------------------
#endif