回复:Wincc登录画面设计

已锁定

龟仙人

西门子1847工业学习平台

  • 帖子

    928
  • 精华

    15
  • 被关注

    163

论坛等级:奇侠

注册时间:2006-12-15

普通 普通 如何晋级?

发布于 2022-03-20 12:20:30

3楼

用户登录.pdf

这是程序代码,运行语言只有在中文简体,繁体和英文运行可以,其它语言画面无法自动调整画面大小。

//***********************登录重试按钮***********************

#include "apdefap.h"

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

{

SetVisible(lpszPictureName,"@ERROR",FALSE);

SetOperation(lpszPictureName,"@LoginIn",TRUE);

SetOperation(lpszPictureName,"@PasswordIn",TRUE);

SetOperation(lpszPictureName,"@OK",TRUE);

Set_Focus(lpszPictureName,"@LoginIn");

SetVisible(lpszPictureName,lpszObjectName,FALSE);

}


//***********************登录按钮***********************

#include "apdefap.h"

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

{

#pragma code ("UseAdmin.DLL")

#include "pwrt_api.h"

#pragma code ()

HWND hWnd=NULL;

if (PWRTSilentLogin(GetInputValueChar(lpszPictureName,"@LoginIn"),GetInputValueChar(lpszPictureName,"@PasswordIn")) == FALSE)

  {

  SetOperation(lpszPictureName,"@OK",FALSE);

  SetOperation(lpszPictureName,"@LoginIn",FALSE);

  SetOperation(lpszPictureName,"@PasswordIn",FALSE);

  SetVisible(lpszPictureName,"@ERROR",TRUE);

  SetVisible(lpszPictureName,"@REPEAT",TRUE);

  Set_Focus(lpszPictureName,"@REPEAT");

  }

else

  {

if (GetLanguage ()==0x0804 && GetLanguage ()==0x0404) 

//获取窗口中文句柄(简体中文和繁体中文)

hWnd=FindWindow(NULL,"WinCC-运行系统 - ");

if(GetLanguage ()==0x0409)

//获取窗口英文句柄

hWnd=FindWindow(NULL,"WinCC-Runtime - ");

//设置窗口位置,大小

SetWindowPos(hWnd,HWND_TOP,0,0,1680,1050,0);

//此处设置登录窗口位置和大小,根据分辨率调整画面大小


  OpenPicture("MainPicture.Pdl"); //Return-Type: void  

  }

}


//***********************登录窗口退出按钮***********************

#include "apdefap.h"

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

{

#pragma option(mbcs)

// WINCC:TAGNAME_SECTION_START

// syntax: #define TagNameInAction "DMTagName"

// next TagID : 1

// WINCC:TAGNAME_SECTION_END


// WINCC:PICNAME_SECTION_START

// syntax: #define PicNameInAction "PictureName"

// next PicID : 1

// WINCC:PICNAME_SECTION_END

   DeactivateRTProject (); //Return-Type: BOOL 

//Return-Type: BOOL 

}



//***********************打开主画面窗口***********************

#include "apdefap.h"

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

{

HWND hWnd=NULL;

if (GetLanguage ()==0x0804 && GetLanguage ()==0x0404)

//获取窗口中文句柄

hWnd=FindWindow(NULL,"WinCC-运行系统 - ");

if(GetLanguage ()==0x0409)

//获取窗口英文句柄

hWnd=FindWindow(NULL,"WinCC-Runtime - ");

//设置窗口位置,大小

SetWindowPos(hWnd,HWND_TOP,0,0,1680,1050,0);

//此处设置登录窗口位置和大小,根据分辨率调整画面大小

}

//***********************主画面退出按钮***********************

#include "apdefap.h"

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

{

#pragma option(mbcs)

// WINCC:TAGNAME_SECTION_START

// syntax: #define TagNameInAction "DMTagName"

// next TagID : 1

// WINCC:TAGNAME_SECTION_END


// WINCC:PICNAME_SECTION_START

// syntax: #define PicNameInAction "PictureName"

// next PicID : 1

// WINCC:PICNAME_SECTION_END

SetVisible(lpszPictureName,"ExitWindow",TRUE); //Return-Type: BOOL 

}

//***********************退出画面退出按钮***********************

#include "apdefap.h"

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

{

#pragma option(mbcs)

// WINCC:TAGNAME_SECTION_START

// syntax: #define TagNameInAction "DMTagName"

// next TagID : 1

// WINCC:TAGNAME_SECTION_END


// WINCC:PICNAME_SECTION_START

// syntax: #define PicNameInAction "PictureName"

// next PicID : 1

// WINCC:PICNAME_SECTION_END  

  ExitWinCC();


}

//***********************退出画面取消按钮***********************

#include "apdefap.h"

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

{


#pragma option(mbcs)

// WINCC:TAGNAME_SECTION_START

// syntax: #define TagNameInAction "DMTagName"

// next TagID : 1

// WINCC:TAGNAME_SECTION_END


// WINCC:PICNAME_SECTION_START

// syntax: #define PicNameInAction "PictureName"

// next PicID : 1

// WINCC:PICNAME_SECTION_END

SetVisible("MainPicture.Pdl","ExitWindow",FALSE); //Return-Type: BOOL 

}


评论
编辑推荐: 关闭

请填写推广理由:

本版热门话题

SIMATIC WinCC / Panel

共有32644条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜,你发布的帖子

评为精华帖!

快扫描右侧二维码晒一晒吧!

再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!

  • 分享

  • 只看
    楼主

top
X 图片
您收到0封站内信:
×
×
信息提示
很抱歉!您所访问的页面不存在,或网址发生了变化,请稍后再试。