wincc脚本-按钮二次确认并生成消息记录

1、弹出画面#include apdefap.hvoid OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y) #pragma option(mbcs)/ WINCC:TAGNAME_SECTION_START/ syntax: #define TagNameInAction DMTagName/ next TagID : 1/ WINCC:TAGNAME_SECTION_END/ WINCC:PICNAME_SECTION_STAR

2、T/ syntax: #define PicNameInAction PictureName/ next PicID : 1#define PIC_0 1505R-ABCD.Pdl/ WINCC:PICNAME_SECTION_ENDSSMChangeWorkField(SSMGetScreen(lpszPictureName),PIC_0,TRUE);/SSMOpenTopFieldFixedSize(SSMGetScreen(lpszPictureName),PIC_0);#include apdefap.hvoid OnLButtonDown(char* lpszPictureName,

3、 char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)#pragma option(mbcs)/ WINCC:TAGNAME_SECTION_START/ syntax: #define TagNameInAction DMTagName/ next TagID : 1/ WINCC:TAGNAME_SECTION_END#define Apc_CurrentUserName local:CurrentUserName#define Var ALARM-RD/ESDBUTTON.IN/ WINCC:TA

4、GNAME_SECTION_END/定义消息号， 并赋值int nMsgNr = 1;int iNewValue ;int iOldValue;int RetMsg;double dValue5 = 0,0,0,0,0; /定义double型数组，对应过程值块的前5个变量char* lpszVal5 = ,; /定义字符指针数组，对应过程值块的后5个变量/确认操作if (GetTagBit(Var)=0) RetMsg = MessageBox (FindWindow(NULL,WinCC-Runtime - ),确定急停本炉n? , 急停确认n, MB_OKCANCEL|MB_ICONQUE

5、STION|MB_SYSTEMMODAL); if (RetMsg=IDOK) /获取旧值、赋予新值 iOldValue=GetTagBit(Var); iNewValue=1; SetTagBitWait(Var,(WORD)iNewValue); /将用户名、变量名、消息号、新值和旧值放到定义的数组中 lpszVal0 = GetTagCharWait(Apc_CurrentUserName); lpszVal1 =Var; dValue0 = nMsgNr; dValue1 = iNewValue; dValue2 = iOldValue; /调用产生消息的函数 OperationLog

6、_V6(lpszPictureName,nMsgNr,dValue,lpszVal); else RetMsg = MessageBox (FindWindow(NULL,WinCC-Runtime - ), 确定解除本炉急停吗n? , 急停确认n, MB_OKCANCEL|MB_ICONQUESTION|MB_SYSTEMMODAL); if (RetMsg=IDOK) /获取旧值、赋予新值 iOldValue=GetTagBit(Var); iNewValue=0; SetTagBitWait(Var,(WORD)iNewValue); /将用户名、变量名、消息号、新值和旧值放到定义的数组中 lpszVal0 = GetTagCharWait(Apc_CurrentUserName); lpszVal1 =Var; dValue0 = nMsgNr; dValue1 = iNewValue; dValue2 = iOldValue; /调用产生消息的函数 OperationLog_V6(lpszPictureName,nMsgNr,dValue,lpszVal); / WINCC:PICN