1,184
社区成员
![](https://csdnimg.cn/release/cmsfe/public/img/topic.427195d5.png)
![](https://csdnimg.cn/release/cmsfe/public/img/me.40a70ab0.png)
![](https://csdnimg.cn/release/cmsfe/public/img/task.87b52881.png)
![](https://csdnimg.cn/release/cmsfe/public/img/share-circle.3e0b7822.png)
void __fastcall TForm_Main::ConnectPLC()
{
try
{
VARIANT def;
UnicodeString uncodeData = PLCRemoteIP;
def.bstrVal = uncodeData.c_str();
UnicodeString uncodeProg = PLCProgID;
TOPCServer_1->Connect1(uncodeProg.w_str(), def );
TOPCServer_1->OPCGroups->DefaultGroupUpdateRate = 200;
uncodeData = "Gr1";
def.bstrVal = uncodeData.w_str();
Group=TOPCServer_1->OPCGroups->Add(def);
uncodeProg = PLC_Item1;
Item_Thickness =Group->OPCItems->AddItem( uncodeProg.w_str() ,1);
uncodeProg = PLC_Item2;
Item_Width =Group->OPCItems->AddItem( uncodeProg.w_str() ,1);
IsConnectPLC = true;
}
catch(...)
{
IsConnectPLC = false;
MessageBoxA(NULL,"连接异常!","提示",MB_ICONWARNING);
}
}