LXD.rar_AO_DO转换器_DI/DO

//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #pragma package(smart_init) #include <vcl/dstring.h> //--------------------------------------------------------------------------- #include "Lxd_Ai.h" #include "Lxd_Ao.h" #include "Lxd_Dio.h" //--------------------------------------------------------------------------- #include <stdio.h> #include <string.h> #include <stdlib.h> #include <sys\timeb.h> #include <FileCtrl.hpp> #include <Dialogs.hpp> //--------------------------------------------------------------------------- int AINUM; int AONUM; int DINUM; int DONUM; int HOTNUM; int LISTNUM; int BARNUM; //--------------------------------------------------------------------------- TAnalogeAI *vAin; TAnalogeAO *vAout; TdigitalDi *vDin; TdigitalDo *vDout; TQflow Qflow; TdigitalHot *vHot; int *HpList; int *HpBar; //--------------------------------------------------------------------------- #ifdef DEBUG float vDemoTime; long vStartTime; #endif extern AnsiString V1; //--------------------------------------------------------------------------- #include "MainUnit.h" extern TmainForm *mainForm; extern void CommSend(void); //--------------------------------------------------------------------------- #include "KaiUnit.h" #include "HotUnit.h" //--------------------------------------------------------------------------- #include "CovUnit.h" extern TCoverForm *CoverForm; //系统名称画面 use for to change Form //--------------------------------------------------------------------------- #include "ListUnit.h" extern TListForm *ListForm; //数据列表画面 use for to change Form extern void ListDataDisplay(void); //周期性数据列表刷新 extern void ListLedDisplay(void); //非周期性数据列表刷新 //--------------------------------------------------------------------------- #include "BarUnit.h" extern TBarForm *BarForm; //数据棒图画面 use for to change Form extern void BarDataDisplay(void); //周期性数据列表刷新 extern void BarLedDisplay(void); //非周期性数据列表刷新 //--------------------------------------------------------------------------- #include "TrdUnit.h" extern TTrendForm *TrendForm; //实时趋势图画面 use for to change Form extern void TrendDataDisplay(void); //周期性数据列表刷新 extern void TrendLedDisplay(void); //非周期性数据列表刷新 //--------------------------------------------------------------------------- #include "HistUnit.h" extern THistForm *HistForm;//历史趋势图画面 use for to change Form extern void HisDataSave(void);//Save History Data extern void HisDataDisplay(void);//周期性刷新Form窗体 //--------------------------------------------------------------------------- #include "HisUnit2.h" extern THistForm2 *HistForm2;//液位历史趋势图画面 use for to change Form //extern void HisData2Save(void);//Save History2 Data //--------------------------------------------------------------------------- #include "PidUnit.h" extern TPidForm *PidForm; //调节画面 use for to change Form extern void PidDataDisplay(void); //周期性数据列表刷新 extern void PidLedDisplay(void); //非周期性数据列表刷新 //--------------------------------------------------------------------------- #include "LU1Unit.h" extern TLU1Form *LU1Form; //画面 use for to change Form extern void LU1DataDisplay(void); //周期性数据列表刷新 //--------------------------------------------------------------------------- #include "RptUnit.h" extern TRptForm *RptForm; //报表画面 use for to change Form //extern void RptInitDataDisplay(void); //--------------------------------------------------------------------------- #include "tools.h" extern bool SetRange1Flag,SetRange2Flag; extern bool SetPid1Flag,SetPid2Flag; extern void GetDi(void); extern void SetDo1(void); extern void SetHot1(void); extern void GetHot1(void); extern void SetRange1Prodave(void); extern void SetRange2Prodave(void); extern void Get1Prodave(void); extern void Get2Prodave(void); extern void SetPid1Prodave(void); extern void SetPid2Prodave(void); extern void GetPid2(void); extern bool CanHot; extern bool CanSetDo; //--------------------------------------------------------------------------- //For timer count int vCount=0; //in Timer to count timer times every 100ms int CurrentWinNum=-1; //当前前台显示的窗体号;0为CoverForm窗体 //使用在SpeedButton中直接赋值,WinChange和WinRepaint //根据WinNum操作相应的窗体 //--------------------------------------------------------------------------- struct timeb t; //#include <sys\timeb.h> TMyTime vMyTime; //--------------------------------------------------------------------------- //CLASS=TMyTime构造函数 TMyTime::TMyTime(void) { ftime(&t); vTimeMilliBegin=t.millitm; //毫秒开始时间计时 vTimeMilliEnd=t.millitm; //毫秒结束时间计时 vTimeMilliValue=30; //毫秒时间差值 vTimeSecondBegin=t.time; //秒开始时间计时 vTimeSecondEnd=t.time; //秒结束时间计时 vTimeSecondValue=2; //秒时间差值 vTimeValue=2.030; //时间差值 /*#ifdef DEBUG vStartTime=vTimeSecondBegin; #endif*/ } //--------------------------------------------------------------------------- //CLASS=TMyTime析构函数 TMyTime::~TMyTime() { } //--------------------------------------------------------------------------- void TMyTime::ValueOfTime(void) { ftime(&t); vTimeMilliBegin=t.millitm; vTimeSecondBegin=t.time; vTimeSecondValue=vTimeSecondBegin-vTimeSecondEnd; vTimeMilliValue=vTimeMilliBegin-vTimeMilliEnd; if(vTimeSecondValue<0) {vTimeSecondValue=2;} vTimeValue=vTimeSecondValue + vTimeMilliValue/1000; /*#ifdef DEBUG CoverForm->Label1->Caption="毫秒开始时间计时:"; CoverForm->Label2->Caption="毫秒结束时间计时:"; CoverForm->Label3->Caption="毫秒时间差值:"; CoverForm->Label4->Caption="秒开始时间计时:"; CoverForm->Label5->Caption="秒结束时间计时:"; CoverForm->Label6->Caption="秒时间差值:"; CoverForm->Label7->Caption="时间差值:"; CoverForm->Label8->Caption="时间累加值:"; CoverForm->Label9->Caption="系统时间差值:"; CoverForm->StaticText1->Caption=vMyTime.vTimeMilliBegin; CoverForm->StaticText2->Caption=vMyTime.vTimeMilliEnd; CoverForm->StaticText3->Caption=vMyTime.vTimeMilliValue; CoverForm->StaticText4->Caption=vMyTime.vTimeSecondBegin; CoverForm->StaticText5->Caption=vMyTime.vTimeSecondEnd; CoverForm->StaticText6->Caption=vMyTime.vTimeSecondValue; CoverForm->StaticText7->Caption=vMyTime.vTimeValue; vDemoTime += vMyTime.vTimeValue; CoverForm->StaticText8->Caption=vDemoTime; CoverForm->StaticText9->Caption=vMyTime.vTimeSecondBegin-vStartTime; #else CoverForm->Label1->Visible=false; CoverForm->Label2->Visible=false; CoverForm->Label3->Visible=false; CoverForm->Label4->Visible=false; CoverForm->Label5->Visible=false; CoverForm->Label6->Visible=false; CoverForm->Label7->Visible=false; CoverForm->Label8->Visible=false; CoverForm->Label9->Visible=false; CoverForm->StaticText1->Visible=false; CoverForm->StaticText2->Visible=false; CoverForm->StaticText3->Visible=false; CoverForm->StaticText4->Visible=false; CoverForm->StaticText5->Visible=false; CoverForm->StaticText6->Visible=false; CoverForm->StaticText7->Visible=false; CoverForm->StaticText8->Visible=false; CoverForm->StaticText9->Visible=false; #endif */ vTimeMilliEnd=vTimeMilliBegin; vTimeSecondEnd=vTimeSecondBegin; } //--------------------------------------------------------------------------- TdigitalHot::TdigitalHot(void) { } TdigitalHot::~TdigitalHot(void) { } //--------------------------------------------------------------------------- //CLASS=TAnalogeIn构造函数 TAnalogeAI::TAnalogeAI(void)