unit1.h

家庭内温度记录仪器与计算机之间的通讯软件

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

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include "MSCommLib_OCX.h"
#include "PERFGRAP.h"
#include <Chart.hpp>
#include <ComCtrls.hpp>
#include <Dialogs.hpp>
#include <ExtCtrls.hpp>
#include <ImgList.hpp>
#include <Menus.hpp>
#include <OleCtrls.hpp>
#include <Series.hpp>
#include <TeEngine.hpp>
#include <TeeProcs.hpp>
#include <ToolWin.hpp>
#include <IniFiles.hpp>
#include <Filectrl.hpp>
#include <Mask.hpp>
#include <Grids.hpp>

#include <fcntl.h>
#include <sys\stat.h>
#include <share.h>
#include <io.h>
#include <stdio.h>
#include <math.h>
//---------------------------------------------------------------------------
class TfrmMain : public TForm
{
__published:	// IDE-managed Components
        TMainMenu *MainMenu1;
        TMenuItem *mnuFile;
        TMenuItem *mnuCOM;
        TMenuItem *mnuControl;
        TMenuItem *mnuDownLoad;
        TMenuItem *mnuClearSaveData;
        TMenuItem *mnuExit;
        TMenuItem *mnuCOM1;
        TMenuItem *mnuCOM2;
        TMenuItem *mnuCOM3;
        TMenuItem *mnuCOM4;
        TStatusBar *StatusBar;
        TPanel *Panel1;
        TPanel *Panel2;
        TImageList *ImageList1;
        TMenuItem *mnuData;
        TMenuItem *mnuOpenData;
        TMenuItem *mnuSaveData;
        TMenuItem *mnuHelp;
        TMenuItem *mnuAbout;
        TPrinterSetupDialog *PrinterSetupDialog1;
        TOpenDialog *OpenFile;
        TSaveDialog *SaveFile;
        TMSComm *MSComm1;
        TChart *Chart1;
        TFastLineSeries *Series1;
        TMenuItem *mnuGraph;
        TMenuItem *mnuChartZoomOut;
        TMenuItem *mnuChartZoomIn;
        TMenuItem *mnuChartZoomReset;
        TMenuItem *N18;
        TMenuItem *mnuRefresh;
        TTimer *Timer1;
        TPanel *Panel3;
        TButton *cmdRefresh;
        TUpDown *UDHour2;
        TUpDown *UDDay2;
        TUpDown *UDMonth2;
        TUpDown *UDHour1;
        TUpDown *UDMonth1;
        TUpDown *UDDay1;
        TUpDown *UDYear1;
        TUpDown *UDYear2;
        TEdit *tFromYear;
        TEdit *tFromMonth;
        TEdit *tFromDay;
        TEdit *tFromHour;
        TEdit *tToYear;
        TEdit *tToMonth;
        TEdit *tToDay;
        TEdit *tToHour;
        TLabel *Label1;
        TLabel *Label2;
        TLabel *Label3;
        TLabel *Label4;
        TPanel *Panel4;
        TComboBox *cmbDate;
        TStringGrid *grdData;
        TLabel *Label5;
        TEdit *eUserName;
        TMenuItem *mnuPrint;
        TLabel *Label6;
        TEdit *eTemp;
        TUpDown *UDTemp;
        TFastLineSeries *Series2;
        TMenuItem *mnuTime;
        TMenuItem *smnuClearScr;
        TToolBar *ToolBar1;
        TToolButton *cmdPrintChar;
        TToolButton *cmdCommData;
        TToolButton *cmdClearData;
        TToolButton *cmdTime;
        TToolButton *cmdRef;
        TToolButton *cmdClreaScr;
        TToolButton *cmdOpenFile;
        TToolButton *cmdSaveFile;
        TToolButton *cmdHelp;
        TToolButton *cmdClose;
        TLabel *lblDay;
        TEdit *eDay;
        TUpDown *UDDay;
        TFastLineSeries *Series3;
        void __fastcall FormCreate(TObject *Sender);
        void __fastcall mnuExitClick(TObject *Sender);
        void __fastcall mnuCOM1Click(TObject *Sender);
        void __fastcall mnuCOM2Click(TObject *Sender);
        void __fastcall mnuCOM3Click(TObject *Sender);
        void __fastcall mnuCOM4Click(TObject *Sender);
        void __fastcall mnuAboutClick(TObject *Sender);
        void __fastcall Timer1Timer(TObject *Sender);
        void __fastcall cmdRefreshClick(TObject *Sender);
        void __fastcall cmbDateClick(TObject *Sender);
        void __fastcall mnuOpenDataClick(TObject *Sender);
        void __fastcall mnuSaveDataClick(TObject *Sender);
        void __fastcall mnuClearSaveDataClick(TObject *Sender);
        void __fastcall mnuClearScrClick(TObject *Sender);
        void __fastcall mnuDownLoadClick(TObject *Sender);
        void __fastcall mnuTimeClick(TObject *Sender);
        void __fastcall mnuChartZoomOutClick(TObject *Sender);
        void __fastcall mnuChartZoomInClick(TObject *Sender);
        void __fastcall mnuChartZoomResetClick(TObject *Sender);
        void __fastcall mnuPrintClick(TObject *Sender);
        void __fastcall UDTempClick(TObject *Sender,
          TUDBtnType Button);
        void __fastcall UDDayClick(TObject *Sender, TUDBtnType Button);

private:	// User declarations
        OleVariant sBuff,rBuff;
        Byte SendData[11];
        Byte ReceiveData[1500];
        int InBufferCount;
        Byte ChkSum;
        bool bSendFlag;
        int DelayTime;
        int DayNum;
        Byte TempData[14][100];
        bool InvalData[14][100];
        AnsiString strTimeUpDown[2];
        //int ReportType;
public:		// User declarations
        __fastcall TfrmMain(TComponent* Owner);
        void __fastcall AutoCreateFolder();
        void __fastcall ReadIniFile();
        void __fastcall OpenComm();
        void __fastcall CloseComm();
        void __fastcall MenuEnable(bool bCtrl);
        void __fastcall SendReport(Byte ReportType);
        void __fastcall ReceiveReport();
        void __fastcall ShowMsg(AnsiString strMsg);
        void __fastcall RefreshGraph();
        void __fastcall RefreshScreen();
        void __fastcall RefreshList(int ii);
        bool __fastcall InStr(AnsiString str1,AnsiString str2);
        void __fastcall GetTimeArea();
        void __fastcall SaveData(AnsiString strFile);
        void __fastcall OpenData(AnsiString strFile);
        void __fastcall ClearAll();
        float __fastcall ByteToFloat(Byte InVal);
        void __fastcall IniOldData();

};
//---------------------------------------------------------------------------
extern PACKAGE TfrmMain *frmMain;
//---------------------------------------------------------------------------
#endif