wincc常用C脚本..-豆柴文库

您所在位置：网站首页 / wincc常用C脚本...doc / 文档详情

免费试读已结束，剩余 10 页请下载文档后查看

10 金币

下载文档

/ 15

下载提示

如果您无法下载资料，请参考说明：

1、部分资料下载需要金币，请确保您的账户上有足够的金币

2、已购买过的文档，再次下载不重复扣费

3、资料包下载后请先用软件解压，在使用对应软件打开

文本预览

.用户注销：#pragmacode("useadmin.dll")#include"PWRT_api.h"#pragmacode()PWRTLogout();
2.用户登录：#pragmacode("useadmin.dll")#include"PWRT_api.h"#pragmacode()PWRTLogin('c');
3.关闭项目并退出wincc：ExitWinCC();
4.退出运行到wincc资源管理器：DeactivateRTProject();
按钮变三种颜色
#include"apdefap.h"
long_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)
{
#pragmaoption(mbcs)
if(GetTagWord("TX/ZSH001")==1)
return0x0000ff00;
else
if(GetTagWord("TX/ZSL001")==1)
return0x000000ff;
else
return0x00c0c0c0;
}
一个调用按钮变色
#include"apdefap.h"
long_main(char*lpszPictureName,char*lpszObjectName,char*lpszPropertyName)
{
#pragmaoption(mbcs)
if(GetTagWord("NewTag")==0)
return0x0000ff00;
else
return0x00ffffff;
}

5.结束监控并关闭计算机（会弹出确认对话框）HWNDhWnd=NULL;//Author:SmartsysintiRet;hWnd=FindWindow(NULL,"WinCC-运行系统-");iRet=MessageBox(hWnd,"结束监控并关闭计算机","关闭操作站",MB_YESNO|MB_ICONWARNING|MB_APPLMODAL);if(iRet==IDYES)DMExitWinCCEx(DM_SDMODE_POWEROFF);
6.点击事件弹出对话框，通过点击弹出对话框的确定和取消按钮实现对变量的置位或取消:intr;r=MessageBox(NULL,"YES为开，NO为关","确定开命令：",MB_YESNO|MB_SYSTEMMODAL);if(r==IDYES)SetTagBit("TAGNAME",TRUE);elseSetTagBit("TAGNAME",FALSE);
7.开显示关显示:（要在内部变量中建立三个二进制变量COLSE_DISPLAY、DISPLAY_NO和DISPLAY_COMMENT）//Funktion:BitinDoppelwortsetzen;if(GetTagBitWait("COLSE_DISPLAY")==1){SetTagBit("COLSE_DISPLAY",0);SetTagBit("DISPLAY_NO",0);//Return-Type:BOOLSetTagBit("DISPLAY_COMMENT",0);}else{SetTagBit("COLSE_DISPLAY",1);SetTagBit("DISPLAY_NO",1);//Return-Type:BOOLSetTagBit("DISPLAY_COMMENT",0);}
8.开阀确认:BOOLa;a=GetTagBit("30T制水启动");//Return-Type:shortintif(a==0){if(MessageBox(NULL,"真的要启动制水吗？","操作提示",MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB_SYSTEMMODAL)==6){SetTagBit("30T制水启动",1);//Return-Type:BOOL}}else{if(MessageBox(NULL,"真的要停止制水吗？","操作提示",MB_YESNO|MB_ICONQUESTION|MB_SETFOREGROUND|MB_SYSTEMMODAL)==6){SetTagBit("30T制水停止",1);}}
9.将WinCC运行画面最小化
HWNDWinCCHwnd;WinCCHwnd=FindWindow(NULL,"WinCC-Runtime-");//如果运行语言为英文if(WinCCHwnd==0)WinCCHwnd=FindWindow(NULL,"WinCC-运行系统-");//如果运行语言为中文CloseWindow(WinCCHwnd);10.显示或不显示（其中hiddVtext为内部的二进制变量）if(GetTag