iomodule.cpp

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

         Label9->Enabled= true;
         ComboBox3->Enabled= true;
         Label10->Enabled= false;
         ComboBox4->Enabled= false;
         break;
       case I8040:  // DI
       case I8051:
       case I8052:
       case I8053:
       case I8058:
         Label3->Enabled= false;
         MaskEdit1->Enabled= false;
         Label4->Enabled= true;
         MaskEdit2->Enabled= true;
         Label5->Enabled= false;
         MaskEdit3->Enabled= false;
         Label6->Enabled= false;
         MaskEdit4->Enabled= false;
         Label9->Enabled= false;
         ComboBox3->Enabled= false;
         Label10->Enabled= false;
         ComboBox4->Enabled= false;
         break;
       case I8041:  // DO
       case I8056:
       case I8057:
       case I8060:
       case I8064:
       case I8065:
       case I8066:
       case I8068:
       case I8069:
         Label3->Enabled= true;
         MaskEdit1->Enabled= true;
         Label4->Enabled= false;
         MaskEdit2->Enabled= false;
         Label5->Enabled= false;
         MaskEdit3->Enabled= false;
         Label6->Enabled= false;
         MaskEdit4->Enabled= false;
         Label9->Enabled= false;
         ComboBox3->Enabled= false;
         Label10->Enabled= false;
         ComboBox4->Enabled= false;
         break;
       case I8042:  // DI and DO
       case I8054:
       case I8055:
       case I8063:
         Label3->Enabled= true;
         MaskEdit1->Enabled= true;
         Label4->Enabled= true;
         MaskEdit2->Enabled= true;
         Label5->Enabled= false;
         MaskEdit3->Enabled= false;
         Label6->Enabled= false;
         MaskEdit4->Enabled= false;
         Label9->Enabled= false;
         ComboBox3->Enabled= false;
         Label10->Enabled= false;
         ComboBox4->Enabled= false;
         break;
    }

  return(0);
}
//---------------------------------------------------------------------
int __fastcall TIOModule_Dlg::Execute(void)
{
  int i, rc;
  char buff[80];

  memcpy((char *)para, (char *)PARA_IO, sizeof(para));
  for(i=0; i<SLOT_MAX_CASE; i++)
  {
    sprintf(buff, "Slot-%d", i+1);
    ComboBox1->Items->Add(buff);
  }
  ComboBox1->ItemIndex=0;
  i= ComboBox1->ItemIndex;
  display_Slot(i);
  OLD_SLOT= 0;

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

   if(check_Slot(OLD_SLOT) != 0)
   {
      ComboBox1->ItemIndex= OLD_SLOT;
      ComboBox1->SetFocus();
      return;
   }
   para[OLD_SLOT].mod_no= ComboBox2->ItemIndex;
   para[OLD_SLOT].addr_do= atoi(MaskEdit1->Text.c_str());
   para[OLD_SLOT].addr_di= atoi(MaskEdit2->Text.c_str());
   para[OLD_SLOT].addr_ao= atoi(MaskEdit3->Text.c_str());
   para[OLD_SLOT].addr_ai= atoi(MaskEdit4->Text.c_str());
   para[OLD_SLOT].gain_ao= ComboBox3->ItemIndex;
   para[OLD_SLOT].gain_ai= ComboBox4->ItemIndex;
   idx= ComboBox1->ItemIndex;
   display_Slot(idx);
   OLD_SLOT= idx;
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::ComboBox2Change(TObject *Sender)
{
//
    int idx;

    idx= ComboBox2->ItemIndex;
    display_Module(idx);
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::MaskEdit1Exit(TObject *Sender)
{
   int addr;

   addr= atoi(MaskEdit1->Text.c_str());
   if(addr<0 || addr>DD_MAX_BIT)
   {
      MessageBox(NULL, "DO: Output Coil address must be 1 to 512", WinCON8000, MB_OK);
      MaskEdit1->SetFocus();
   }
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::MaskEdit2Exit(TObject *Sender)
{
   int addr;

   addr= atoi(MaskEdit2->Text.c_str());
   if(addr<0 || addr>DD_MAX_BIT)
   {
      MessageBox(NULL, "DI: Input Coil address must be 1 to 512", WinCON8000, MB_OK);
      MaskEdit2->SetFocus();
   }
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::MaskEdit3Exit(TObject *Sender)
{
   int addr;

   addr= atoi(MaskEdit3->Text.c_str());
   if(addr<0 || addr>ED_MAX)
   {
      MessageBox(NULL, "AO: Holding Register address must be 1 to 128", WinCON8000, MB_OK);
      MaskEdit3->SetFocus();
   }
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::MaskEdit4Exit(TObject *Sender)
{
   int addr;

   addr= atoi(MaskEdit4->Text.c_str());
   if(addr<0 || addr>ED_MAX)
   {
      MessageBox(NULL, "AI: Input Register address must be 1 to 128", WinCON8000, MB_OK);
      MaskEdit4->SetFocus();
   }
}
//---------------------------------------------------------------------------
void __fastcall TIOModule_Dlg::OKBtnClick(TObject *Sender)
{
// OK
   int i, pos, fd, mod_no;

   if(check_Slot(OLD_SLOT) != 0)  return;
   para[OLD_SLOT].mod_no= ComboBox2->ItemIndex;
   para[OLD_SLOT].addr_do= atoi(MaskEdit1->Text.c_str());
   para[OLD_SLOT].addr_di= atoi(MaskEdit2->Text.c_str());
   para[OLD_SLOT].addr_ao= atoi(MaskEdit3->Text.c_str());
   para[OLD_SLOT].addr_ai= atoi(MaskEdit4->Text.c_str());
   para[OLD_SLOT].gain_ao= ComboBox3->ItemIndex;
   para[OLD_SLOT].gain_ai= ComboBox4->ItemIndex;
   memcpy((char *)PARA_IO, (char *)para, sizeof(PARA_IO));
   for(i=0; i<SLOT_MAX_CASE; i++)
   {
     mod_no= PARA_IO[i].mod_no;
     if(mod_no == 0)
     {  // empty slot
       PARA_IO[i].addr_do= 0;
       PARA_IO[i].addr_di= 0;
       PARA_IO[i].addr_ao= 0;
       PARA_IO[i].addr_ai= 0;
       PARA_IO[i].gain_ao= 0;
       PARA_IO[i].gain_ai= 0;
     }
     else if(mod_no == I8017H)
     {  // AI
       PARA_IO[i].addr_do= 0;
       PARA_IO[i].addr_di= 0;
       PARA_IO[i].addr_ao= 0;
       PARA_IO[i].gain_ao= 0;
     }
     else if(mod_no == I8024)
     {  // AO
       PARA_IO[i].addr_do= 0;
       PARA_IO[i].addr_di= 0;
       PARA_IO[i].addr_ai= 0;
       PARA_IO[i].gain_ai= 0;
     }
     else if(mod_no==I8040 || mod_no==I8051 || mod_no==I8052 || mod_no==I8053
          || mod_no==I8058 )
     {  // DI
       PARA_IO[i].addr_do= 0;
       PARA_IO[i].addr_ao= 0;
       PARA_IO[i].addr_ai= 0;
       PARA_IO[i].gain_ao= 0;
       PARA_IO[i].gain_ai= 0;
     }
     else if(mod_no==I8041 || mod_no==I8056 || mod_no==I8057 || mod_no==I8060
          || mod_no==I8064 || mod_no==I8065 || mod_no==I8066 || mod_no==I8068
          || mod_no==I8069  )
     {  // DO
       PARA_IO[i].addr_di= 0;
       PARA_IO[i].addr_ao= 0;
       PARA_IO[i].addr_ai= 0;
       PARA_IO[i].gain_ao= 0;
       PARA_IO[i].gain_ai= 0;
     }
     else if(mod_no==I8042 || mod_no==I8054 || mod_no==I8055 || mod_no==I8063)
     {  // DI and DO
       PARA_IO[i].addr_ao= 0;
       PARA_IO[i].addr_ai= 0;
       PARA_IO[i].gain_ao= 0;
       PARA_IO[i].gain_ai= 0;
     }
   }
   fd= sopen(DEMO_SYS_TBL, O_RDWR | O_BINARY, SH_DENYNO);
   pos= sizeof(Reg_Def) + sizeof(Coil_Def) + sizeof(MB_PORT) + sizeof(MB_UNIT);
   lseek(fd, pos, SEEK_SET);
   write(fd, (char *)PARA_IO, sizeof(PARA_IO));
   close(fd);

}
//---------------------------------------------------------------------------