tmcn_def.cpp

《WinCE.NET嵌入式工业用控制器及自动控制系统设计》的源代码

//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include <stdio.h>

#include "main.h"
#include "TMCN_Def.h"
#include "WinCONSYS.h"   // common variable define
#include "STD_SUB.h"
#include "TAGDef.h"
//---------------------------------------------------------------------
#pragma resource "*.dfm"
TTMCNDefDlg *TMCNDefDlg;
//---------------------------------------------------------------------
__fastcall TTMCNDefDlg::TTMCNDefDlg(TComponent* AOwner)
	: TForm(AOwner)
{
}
//---------------------------------------------------------------------
int __fastcall TTMCNDefDlg::Execute(int type, int idx)
{
  int i, rc, bytes, bitno;
  char buff[80];

  m_type= type;
  m_idx= idx;

  // current value
  Label2->Visible= false;
  Label3->Visible= false;
  MaskEdit2->Visible= false;
  ComboBox1->Visible= false;

if(m_type==8)
{
  sprintf(buff, "Timer Preset, Modbus Address: %06d", TM_PSET_PTR+m_idx+400001);
  Label1->Caption= buff;
  sprintf(buff, "Timer Current, Modbus Address: %06d", TM_CURR_PTR+m_idx+400001);
  Label2->Caption= buff;
  sprintf(buff, "Timer Contact, Modbus Address: %06d", TM_BIT_PTR+m_idx+1);
  Label3->Caption= buff;
  sprintf(buff, "%d", Reg_Def.TM_PSET[m_idx]);
  MaskEdit1->Text= buff;
  sprintf(buff, "%d", Reg_Def.TM_CURR[m_idx]);
  MaskEdit2->Text= buff;
  bytes= m_idx/8;
  bitno= m_idx%8;
  rc= Coil_Bit_Read(&Coil_Def.TM_BIT[bytes], bitno);
  ComboBox1->ItemIndex= rc;
  Label4->Visible= true;
  Label5->Visible= true;
}
else if(m_type==9)
{
  sprintf(buff, "Counter Preset, Modbus Address: %06d", CN_PSET_PTR+m_idx+400001);
  Label1->Caption= buff;
  sprintf(buff, "Counter Current, Modbus Address: %06d", CN_CURR_PTR+m_idx+400001);
  Label2->Caption= buff;
  sprintf(buff, "Counter Contact, Modbus Address: %06d", CN_BIT_PTR+m_idx+1);
  Label3->Caption= buff;
  sprintf(buff, "%d", Reg_Def.CN_PSET[m_idx]);
  MaskEdit1->Text= buff;
  sprintf(buff, "%d", Reg_Def.CN_CURR[m_idx]);
  MaskEdit2->Text= buff;
  bytes= m_idx/8;
  bitno= m_idx%8;
  rc= Coil_Bit_Read(&Coil_Def.CN_BIT[bytes], bitno);
  ComboBox1->ItemIndex= rc;
  Label4->Visible= false;
  Label5->Visible= false;
}


  rc= ShowModal();        // display Form
  if(rc==mrOk)
   {
    return(0);
   }
  return(-1);
}
//---------------------------------------------------------------------
void __fastcall TTMCNDefDlg::OKBtnClick(TObject *Sender)
{
  int new_pset;

  // get current value
  new_pset= atoi(MaskEdit1->Text.c_str());
//  new_curr= atoi(MaskEdit2->Text.c_str());
//  new_dd= ComboBox1->ItemIndex;
  if(m_type==8)
  {
     Reg_Def.TM_PSET[m_idx]= new_pset;
     display_listview_TAG_Def(Form2->ListView1, m_type, m_idx);
  }
  else if(m_type==9)
  {
     Reg_Def.CN_PSET[m_idx]= new_pset;
     display_listview_TAG_Def(Form2->ListView1, m_type, m_idx);
  }
}
//---------------------------------------------------------------------------
void __fastcall TTMCNDefDlg::MaskEdit1Exit(TObject *Sender)
{
   int val;
   val= atoi(MaskEdit1->Text.c_str());
   if(check_TMCN_value(val)!=0)
   {
      MaskEdit1->SetFocus();
   }
}
//---------------------------------------------------------------------------
void __fastcall TTMCNDefDlg::MaskEdit2Exit(TObject *Sender)
{
   int val;
   val= atoi(MaskEdit2->Text.c_str());
   if(check_TMCN_value(val)!=0)
   {
      MaskEdit2->SetFocus();
   }
}
//---------------------------------------------------------------------------