unit_file.cpp

平台:c++ builder V6.0 功能:利用串口设备通讯,

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

#include <vcl.h>
#pragma hdrstop

#include "Unit_File.h"
#include "main.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm_File *Form_File;
//---------------------------------------------------------------------------
__fastcall TForm_File::TForm_File(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm_File::Button2Click(TObject *Sender)
{
Close();        
}
//---------------------------------------------------------------------------
void __fastcall TForm_File::FormActivate(TObject *Sender)
{
Edit_ReportNo->Text=Form_Main->REPORT.Number;
Edit_Code->Text=Form_Main->REPORT.Code;
Edit_Name->Text=Form_Main->REPORT.Name;
Edit_Condition->Text=Form_Main->REPORT.Technic;
Edit_UserNo->Text=Form_Main->REPORT.UserNumber;
RadioGroup_State->ItemIndex=Form_Main->REPORT.State;
RadioGroup_Assem->ItemIndex=Form_Main->REPORT.Assem;
Edit_Memo->Text=Form_Main->REPORT.Memo;
CheckBox_1->Checked=Form_Main->REPORT.CHECK_1;
CheckBox_2->Checked=Form_Main->REPORT.CHECK_2;
CheckBox_3->Checked=Form_Main->REPORT.CHECK_3; 
Edit_Total->Text=Form_Main->CHK.Total_Times;
Edit_Spray->Text=Form_Main->CHK.Spray_Time;
Edit_InOut->Text=Form_Main->CHK.InOut_Time;
Edit_Break->Text=Form_Main->CHK.Break_Time;
GroupBox1->Enabled=!Form_Main->CHK.Checking;
GroupBox2->Enabled=!Form_Main->CHK.Checking;
}
//---------------------------------------------------------------------------
void __fastcall TForm_File::Button1Click(TObject *Sender)
{
Form_Main->REPORT.Number=Edit_ReportNo->Text;
Form_Main->REPORT.Code=Edit_Code->Text;
Form_Main->REPORT.Name=Edit_Name->Text;
Form_Main->REPORT.Technic=Edit_Condition->Text;
Form_Main->REPORT.UserNumber=Edit_UserNo->Text;
Form_Main->REPORT.State=RadioGroup_State->ItemIndex;
Form_Main->REPORT.Assem=RadioGroup_Assem->ItemIndex;
Form_Main->REPORT.Memo=Edit_Memo->Text;
Form_Main->REPORT.CHECK_1=CheckBox_1->Checked;
Form_Main->REPORT.CHECK_2=CheckBox_2->Checked;
Form_Main->REPORT.CHECK_3=CheckBox_3->Checked;
Form_Main->CHK.Total_Times=Edit_Total->Text.ToInt();
Form_Main->CHK.Spray_Time=Edit_Spray->Text.ToInt();
Form_Main->CHK.InOut_Time=Edit_InOut->Text.ToInt();
Form_Main->CHK.Break_Time=Edit_Break->Text.ToInt();
//
Form_Main->ProgressBar_Total->Max=Form_Main->CHK.Total_Times;
Form_Main->Label_Total->Caption="0/"+String(Form_Main->ProgressBar_Total->Max);

Form_Main->ProgressBar_Single->Max=Form_Main->CHK.Spray_Time+Form_Main->CHK.InOut_Time+Form_Main->CHK.Break_Time;
Form_Main->Label_Single->Caption="0/"+String(Form_Main->ProgressBar_Single->Max);

Form_Main->ProgressBar_Air->Max=Form_Main->CHK.Spray_Time;
Form_Main->Label_Air->Caption="0/"+String(Form_Main->ProgressBar_Air->Max);

Form_Main->ProgressBar_In_Out->Max=Form_Main->CHK.InOut_Time;
Form_Main->Label_In_Out->Caption="0/"+String(Form_Main->ProgressBar_In_Out->Max);

Form_Main->ProgressBar_Pause->Max=Form_Main->CHK.Break_Time;
Form_Main->Label_Pause->Caption="0/"+String(Form_Main->ProgressBar_Pause->Max);
Form_Main->Edit_Data_Send->Text="";
Form_Main->Edit_Data_Get->Text="";
TIniFile *NN;                 //初始化文件设置
       NN = new TIniFile(Form_Main->str_EXEC_PATH + "\\DCW.ini");
       NN->WriteInteger("测试参数","总循环次数",Form_Main->CHK.Total_Times);//
       NN->WriteInteger("测试参数","吹粉尘时间",Form_Main->CHK.Spray_Time);//
       NN->WriteInteger("测试参数","进出次数",Form_Main->CHK.InOut_Time);//
       NN->WriteInteger("测试参数","间歇时间",Form_Main->CHK.Break_Time);//
delete NN;
Close();
}
//---------------------------------------------------------------------------