WINCC函数编程频道|福州电脑网

2023年12月20日发(作者：)

1．切换画面按钮 ....................................................................................................................................................................................................................................... 2

2.设定BIT变量当前值 ............................................................................................................................................................................................................................. 2

3.取当前登陆用户 ..................................................................................................................................................................................................................................... 2

4.取硬盘剩余容量 ..................................................................................................................................................................................................................................... 3

5．以图像模式显示（灯、钮）等 ............................................................................................................................................................................................................ 5

6.自定义对象 ............................................................................................................................................................................................................................................. 6

返回值 .............................................................................................................................................................................................................................................. 19

8.小键盘 ................................................................................................................................................................................................................................................... 19

传递页面C脚本 ............................................................................................................................................................................................................................ 23

10.将变量B的值赋给变量A(无符号16位) ......................................................................................................................................................................................... 25

11.乒乓键 ................................................................................................................................................................................................................................................. 26

12.C脚本、脉冲延时 .............................................................................................................................................................................................................................. 27

URATION TOOOL ....................................................................................................................................................................................................................... 28

14.用“笔组”实现一张页面做趋势 ...................................................................................................................................................................................................... 28

15.滑竿，SLIDER CONTROL的使用 ......................................................................................................................................................................................................... 34

16.切换语言 ............................................................................................................................................................................................................................................. 35

1．切换画面按钮

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

SetPictureName(lpszPictureName,"PictureWindow1","HS_"); //设定PictureWindow1填充为页面HS_

SetTagChar("TT","操作模式"); //Return-Type: BOOL //设定字符串变量TT当前值为“操作模式”以显示页眉

}

2.设定BIT变量当前值

SetTagBit("N3_VALVE_RESET",0);

3.取当前登陆用户 @CurrentUser

4.取硬盘剩余容量

5．以图像模式显示（灯、钮）等

智能对象状态显示

选透明颜色

6.自定义对象

C动作

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

Valve(lpszPictureName,lpszObjectName); //Return-Type: void

}

全局脚本项目函数

void Valve(char *lpszPictureName, char *lpszObjectName)

{

char* Tagname = GetPropChar(lpszPictureName, lpszObjectName, "ObjectName");//设TAGNAME当前值为N3_HS_A

char* TitleName = GetPropChar(lpszPictureName, lpszObjectName, "TITLE");//设TITLENAME当前值为热风炉自动

char* Name = GetPropChar(lpszPictureName, lpszObjectName, "PICNAME");//设NAME当前值为QD_BUTTON

char* DIS = GetPropChar(lpszPictureName, lpszObjectName, "DIS");//设DIS是否显示，本变量空用于下面的阀函数

static BOOL visble; //声明BOOL量VISBLE

long lLeft ; //声明常整数1LEFT,用于弹出框的左上角

long lTop;

BOOL Bool=TRUE; //声明BOOL量BOO1为真

LINKINFO linkinfo; //Structure definition结构定义

visble=TRUE; //设VISBLE当前值为真

//lLeft =599;

//lTop=327;

lLeft =GetLeft(lpszPictureName,lpszObjectName)+50; //1LEFT当前值为当前页面的当前对象的左坐标+50，注意不是VALUE的值而是当前对象按钮“热风炉自动”

lTop=GetTop(lpszPictureName,lpszObjectName); //1TOP当前值为当前页面的当前对象的上坐标

if (lLeft <20) //限制坐标范围

{

lLeft =20;

}

if (lLeft >1240)

{

lLeft =1240;

}

if (lTop>200)

{

lTop=200;

}

if (lTop<20)

{

lTop=20;

}

SetLeft(lpszPictureName,"value",lLeft); //设定当前页面中画面窗口VALUE的左上角坐标

SetTop(lpszPictureName,"value",lTop);

SetPictureName(lpszPictureName,"value",".PDL"); //设定当前页面中画面窗口VALUE填充页面为.PDL

PDLRTSetPropEx(0,lpszPictureName,"value","Visible",VT_BOOL,&visble,NULL,NULL,0,NULL,NULL); //设定 VALUE的一些属性，帮助里未查到，待查

SetPropChar(lpszPictureName,"value","CaptionText",TitleName); //设定VALUE的CAPTION TEXT为热风炉自动

SetPropChar(lpszPictureName,"value","TagPrefix",Tagname); //为VALUE中所有变量增加前缀N3_HS_A

SetPropChar(lpszPictureName,"value","PictureName",Name); //为VALUE填充页面为QD_BUTTON

SetPropChar(Name,"text","Text",Tagname);//为当前页面名字叫TEXT的TEXT属性设定为TAGNAME的当前值，本项目用于阀函数

SetPropChar(Name,"Button4","Visible",DIS); //为当前页面名字叫BUTTON4的VISIBLE属性设定为DIS的当前值，本项目用于阀函数，下同

SetPropChar(Name,"Button5","Visible",DIS);

SetPropChar(Name,"Button10","Visible",DIS);

SetPropChar(Name,"Button11","Visible",DIS);

}

画面窗口定义如下：

QD_BOTTON页面定义如下：

其中确定按钮定义如下：

动作按下置1，抬起置0

取下按钮为关闭当前窗口

阀门

自定义对象

C脚本

#include "apdefap.h"

void OnLButtonDown(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName, UINT nFlags, int x, int y)

{

Valve(lpszPictureName,lpszObjectName); //Return-Type: void

}

页面VALVE_FUNCTION_STAME如下

其中设备名称定义为TEXT，取的即为OBJECTNAME，本例中为N3_SV101

其中远程等状态灯显示为结构变量后缀 .XXX

其中打开、关闭等按钮（未知是否需要确定取消），本例中是这样实现的，以打开按钮为例：

实际上本例中打开按钮有2个重叠在一起

下面的打开按钮（黑色边框）控制实际的IO后缀：

上面的打开按钮的可见性由DIS变量的当前值确定，若DIS为真，则蓝色边框打开按钮可见，蓝打开按钮（BOTTON4）控制PIC1可见

PIC1填充为OPEN页面

OPEN页面如下：

其中确定按钮为BOTTON8,因所有变量前缀已赋值，则确定按钮仍连接实际IO后缀，同黑色打开按钮。

返回值

本例中如此操作有些繁琐，对于需要确认的按钮可以用OK返回值实现，则简便许多，代码如下：

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

int ret_val;

ret_val=MessageBox(NULL,"你确定要顺启流程吗?","请确认此动作",MB_OKCANCEL|MB_SETFOREGROUND|MB_SYSTEMMODAL);

if(ret_val==1)SetTagBit("_FM",1);

}

8.小键盘

，有时候操作人员不希望用键盘操作而是希望用鼠标操作，如图：

其中绿色为输出值：

1、2、3~.按钮的C脚本一样就是对象名称不同，对象名称为当前按钮：

C脚本如下：

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

char*A=GetPropChar(lpszPictureName, "TAG", "TEXT");

char*B=GetPropChar(lpszPictureName, lpszObjectName, "ObjectName");

strcat(A,B);

SetPropChar(lpszPictureName, "TAG", "TEXT",A);

}

空白域定义为TAG，无脚本

确定按钮将TAG赋给SP,C脚本如下：

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

char*A=GetPropChar(lpszPictureName, "TAG", "TEXT");

SetTagChar(".SP",A);

SetPropChar(lpszPictureName, "DIS", "OutputValue","1");

}

取消按钮清空TAG，代码如下：

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

SetPropChar(lpszPictureName, "TAG", "TEXT","");

}

传递页面C脚本

附录 PID传递页面C脚本：

void PID(char *lpszPictureName, char *lpszObjectName)

{

char* Tagname = GetPropChar(lpszPictureName, lpszObjectName, "ObjectName");

char* TitleName = GetPropChar(lpszPictureName, lpszObjectName, "TITLE");

char* Name = GetPropChar(lpszPictureName, lpszObjectName, "PICNAME");

char* MAX = GetPropChar(lpszPictureName, lpszObjectName, "MAX");

char* MIX = GetPropChar(lpszPictureName, lpszObjectName, "MIX");

char* UNIT = GetPropChar(lpszPictureName, lpszObjectName, "UNIT");

char* PV = GetPropChar(lpszPictureName, lpszObjectName, "PV");

char* SP = GetPropChar(lpszPictureName, lpszObjectName, "SP");

char* Out = GetPropChar(lpszPictureName, lpszObjectName, "OUT");

char* In = GetPropChar(lpszPictureName, lpszObjectName, "IN");

char* MANUAL_SP= GetPropChar(lpszPictureName, lpszObjectName, "MANUAL_SP");

//char* PID = GetPropChar(lpszPictureName, lpszObjectName, "PID");

static BOOL visble;

long lLeft ;

long lTop;

BOOL Bool=TRUE;

LINKINFO linkinfo;

visble=TRUE;

lLeft =50;

lTop=50;

//lLeft =GetLeft(lpszPictureName,lpszObjectName)+50;

//lTop=GetTop(lpszPictureName,lpszObjectName);

//if (lLeft <20)

//{

//lLeft =20;

//}

//if (lLeft >840)

//{

//lLeft =840;

//}

//if (lTop>500)

//{

//lTop=500;

//}

//if (lTop<20)

//{

//lTop=20;

//}

SetLeft(lpszPictureName,"value",lLeft);

SetTop(lpszPictureName,"value",lTop);

SetPictureName(lpszPictureName,"value",Name);

PDLRTSetPropEx(0,lpszPictureName,"value","Visible",VT_BOOL,&visble,NULL,NULL,0,NULL,NULL);

SetPropChar(lpszPictureName,"value","CaptionText",TitleName);

SetPropChar(lpszPictureName,"value","TagPrefix",Tagname);

SetPropChar(lpszPictureName,"value","PictureName",Name);

SetPropChar(Name,"text","Text",Tagname);

SetPropChar(Name,"IO1","OutputValue",MAX);

SetPropChar(Name,"IO2","OutputValue",MIX);

SetPropChar(Name,"IO3","OutputValue",UNIT);

SetPropChar(Name,"IO4","OutputValue",PV);

SetPropChar(Name,"IO5","OutputValue",SP);

SetPropChar(Name,"IO6","OutputValue",Out);

SetPropChar(Name,"IO7","OutputValue",In);

SetPropChar(Name,"IO8","OutputValue",MANUAL_SP);

}

10.将变量B的值赋给变量A(无符号16位)

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

SetTagWord("A", GetTagWord("B"));

SetTagWord("TOPP2_E_TOP_SYS_STOP", 0);

SetTagWord("TOPP2_E_TOP_SYS_RUN", 1);

}

11.乒乓键

#include "apdefap.h"

void OnClick(char* lpszPictureName, char* lpszObjectName, char* lpszPropertyName)

{

//Return-Type: BOOL

BOOL bstate;

//Get the current state of the tag

bstate = GetTagBit("TOPP2_E_r_SEL");

if(bstate)

{

SetTagBit("TOPP2_E_r_SEL",0);

}

else

{

SetTagBit("TOPP2_E_r_SEL",1);

}

另一种：SetTagBit("DEN_20",1-GetTagBit("DEN_20"));

12.C脚本、脉冲延时

在wincc 实现延时，比较浪费资源，不建议这么做。

按钮按下输出个3秒的脉冲

void delay(int tm)

{

time_t t1,t2;

double tt;

time(&t1);

for(;;)

{

time(&t2);

tt=difftime(t2,t1);

if (tt>=tm)

break;

}

在C脚本调用

SetTagBit("变量",1)；

delay（60）；//60为时间自己设定

SetTagBit("变量",0)；

URATION TOOOL

功能：修改结构变量、EXCEL导入报警、趋势标签，WINCC安装盘自带。

14.用“笔组”实现一张页面做趋势

增加内部标签（支持多项目复制、粘贴）

TagTrendType：用于替换笔组当前值

CurrentPage、PreviousPage：用于显示当前页面及后退到上幅页面，和本例关系不大

复制全局脚本VBS ，支持多项目复制粘贴

查找字符串“mainscreen”，替换为自己项目的主页面名

在自己项目的主页面增加页面窗体PictureWindow4PictureWindow5,填充页面为空，将主窗体页面重命名为PictureWindow3

拷贝趋势页面S_到当前工程。

定义笔组，如：

If = "Speed_Strand1" Then

AddTrend TrendObj, "1. Strand4 Actual Casting Speed", "WD_Act_Speed_4", RGB(0, 0, 0), 0, 5

AddTrend TrendObj, "2. Strand4 5#Withdrawal Actual Pressure", "WD5_Pressure_Actual_4", RGB(255, 0, 0), 0,

AddTrend TrendObj, "3. Strand4 5#Withdrawal Actual Gap", "WD5_Gap_Actual_4", RGB(0, 128, 0), 200, 450

AddTrend TrendObj, "4. Strand4 5#Withdrawal Set Gap", "WD5_Gap_Set_4", RGB(0, 0, 255), 200, 450

End If

上例中，笔组名称为"Speed_Strand1"，其中包括4只笔，以第一只为例，其中

"1. Strand4 Actual Casting Speed" 为WINCC显示的描述项，支持中文。

"WD_Act_Speed_4"：为变量标签。

RGB(0, 0, 0)：为笔颜色，三原色

0, 5:为WINCC显示时Y轴量程，X时间轴不需要定义，在S_TREND中已有。笔组最少一只笔，最多9只笔。

在画面增加按钮调用笔组"Speed_Strand1":

Sub OnClick(ByVal Item)

MyShowTrend("Speed_Strand1")

End Sub

另：VBS中多段代码取当前登陆用户名，若为空则MESSAGEBOX，故使用时需用个用户名登陆。

因使用了全局脚本，故测试时只运行当前页面则无法实现趋势功能，必须整个项目运行且勾选“全局脚本运行系统”才能看到效果

15.滑竿，SLIDER CONTROL的使用

1、在控件里调用WINCC SLIDER CONTROL，界面比较友好，但不能直接关联TAG变量，需要脚本如下：

Dim Slider

Set Slider=ScreenItems("SliderCtrl")

("tag").Write on

把代码写在控件的“事件”下的“对象事件”下的“change”事件里便可以改变了！

其中SliderCtrl是OCX控件WINCC SLIDER CONTROL的名称，tag是wincc变量

2、使用标准窗口对象滚动条对象,可直接关联变量标签

16.切换语言

SETLANGUE(0X0404);中文

SETLANGUE(0X0409);英文

WINCC函数

发布评论取消回复

最近发表

相关推荐

标签列表

WINCC函数

发布评论 取消回复

最近发表

相关推荐

标签列表

发布评论取消回复