Skip to Content

SiePortal

The integrated platform for your product selection, buying and support workflow - bringing together Industry Mall and Online Support.

SiePortalDeutsch

Search

Home
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menu temporary not available
- Menue temporary not available
- {{item.title}}

Products & Services
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
MySiePortal MySiePortal
{{(apiData.MySiePortal | filter:{'rank':1}:true)[0].title}} MySiePortal
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Cart ({{apiData.CartCount}})

Navigation

Change background image

Created by: jul's at: 3/1/2007 4:48 PM (19 Replies)

Rating (0)

Thanks 0

Result pages:: |; 1 | 2; |

20 Entries

Entries per page: 10 | all

3/1/2007 4:48 PM	Rate (0)
jul's Posts: 58 Rating: (1)	Hi everybody !! I am working on WINCC V6.0 SP4. I would like to have the possibility to change the background image in runtime. More precisely, when i'am in runtime,i want that when i push a button a configuration dialog box is openning. In this i can searchan image in .jpeg or .bmp . Then I select the image and, it takes place in the background of the current vue. I can do this for every vue. Julien
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

3/1/2007 5:21 PM	Rate (0)
Ikkezelf Posts: 1084 Rating: (72)	Hi, I would suggest that you take a look at google or some other website first to get the code you need to open a selection box. then implement that into wincc. If you then still have question, feel free to post them in here. with regards, Ikkezelf
Ikkezelf Posts: 1084 Rating: (72)
Suggestion To thank Quote Answer

3/1/2007 5:40 PM	Rate (0)
Marcio R. Santos Silver Member Joined: 12/5/2005 Last visit: 9/25/2024 Posts: 239 Rating: (9)	Hi, You can use this code, for to create a Open Dialog. Dim pathName Dim objDialog Set objDialog = CreateObject("UserAccounts.CommonDialog") objDialog.Filter = "JPG Files\|.jpg\|GIF Files\|.gif\|BMP Files\|*.bmp" objDialog.FilterIndex = 1 intResult = objDialog.ShowOpen If intResult<> 0 Then pathName = objDialog.FileName End If But, don't forget that your files should be in \\WinCCProject\Gracs. With the path of the selected image, you can change the property of your objects.
	Last edited by: Marcio at: 01.03.2007 17:43 Last edited by: Marcio at: 01.03.2007 17:43 Márcio Santos www.marcioroberto.wordpress.com
Suggestion To thank Quote Answer

3/2/2007 1:50 PM	Rate (0)
jul's Posts: 58 Rating: (1)	Marcio Hi, You can use this code, for to create a Open Dialog. Dim pathName Dim objDialog Set objDialog = CreateObject("UserAccounts.CommonDialog") objDialog.Filter = "JPG Files\|.jpg\|GIF Files\|.gif\|BMP Files\|*.bmp" objDialog.FilterIndex = 1 intResult = objDialog.ShowOpen If intResult<> 0 Then pathName = objDialog.FileName End If But, don't forget that your files should be in \\WinCCProject\Gracs. With the path of the selected image, you can change the property of your objects. Hi !! Ihave triyed your script in VB but nothing happend whenI push the button. No box dialog is openned ? !. I don't know if i wereveryprecise wheni have explain my problem: WhatI would like to haveisa dialogbox which permit us to choose an image and then this image is put on the backgroundof the current vue. whith this system, i canregularly update the background whith the last image ( for example photos of a plants whith the room ... where there is work and lot of modification are done). I have 10 vue with 10 differents kind of photos which have to be regularly updated from a DWG or a DXF file or BMP or JEPG. Best regards, Julien
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

3/2/2007 5:11 PM	Rate (0)
Marcio R. Santos Silver Member Joined: 12/5/2005 Last visit: 9/25/2024 Posts: 239 Rating: (9)	Hi, Use this code, tested and approved with WinCC 6.0 SP3 and WinXP SP2. Dim pathName Dim objDialog Dim intResult Dim pathArray Set objDialog = CreateObject("UserAccounts.CommonDialog") *objDialog.Filter = "JPG Files\|.jpg\|GIF Files\|.gif\|BMP Files\|.bmp" objDialog.FilterIndex = 1 intResult = objDialog.ShowOpen If intResult <> 0 Then pathName = objDialog.FileName pathArray = Split(pathName,"\") If UBound(pathArray)> 0 Then pathName = pathArray(UBound(pathArray)) HMIRuntime.Trace(pathName) &vbCr ScreenItems("GraphicObject1").PictureName = pathName End If End If Where I used in my screen a Graphic Object to show the pictures, and this object has the name GraphicObject1.** You can adapter this code to filter any type of file, but the WinCC in standard mode (without add-on) don't provide support for DWG and DXF formats.
	Márcio Santos www.marcioroberto.wordpress.com
Suggestion To thank Quote Answer

3/12/2007 9:12 AM	Rate (0)
jul's Posts: 58 Rating: (1)	Marcio Hi, Use this code, tested and approved with WinCC 6.0 SP3 and WinXP SP2. Dim pathName Dim objDialog Dim intResult Dim pathArray Set objDialog = CreateObject("UserAccounts.CommonDialog") *objDialog.Filter = "JPG Files\|.jpg\|GIF Files\|.gif\|BMP Files\|.bmp" objDialog.FilterIndex = 1 intResult = objDialog.ShowOpen If intResult <> 0 Then pathName = objDialog.FileName pathArray = Split(pathName,"\") If UBound(pathArray)> 0 Then pathName = pathArray(UBound(pathArray)) HMIRuntime.Trace(pathName) &vbCr ScreenItems("GraphicObject1").PictureName = pathName End If End If Where I used in my screen a Graphic Object to show the pictures, and this object has the name GraphicObject1.** You can adapter this code to filter any type of file, but the WinCC in standard mode (without add-on) don't provide support for DWG and DXF formats. Hi !! I have tryed your script, but it doesn't work with me ! I don't said that i'm working with Win Server 2003 and Wincc V6.0 SP4 how can i do ? i'm beginner in script. I do like this : i wrote the script on a button. When i push the buton the script is executed ( but nothing happened). in the same screen i have the graphicobject1. Thanks ! Julien
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

3/12/2007 4:46 PM	Rate (0)
jul's Posts: 58 Rating: (1)	I have search a little, and i see that ("Useraccounts.CommonDialog") is not compatible with Win server 2003. I found that the function is ("SAFRCFileDlg.FileOpen") used like this : Set oFODLg = CreateObject("SAFRCFileDlg.FileOpen") x = oFODLg.OpenFileOpenDlg WScript.Echo x, oFODLg.Filename I tryed to insert this code in the code you give to me, but it doesn't work. However this small script work and open a box.But then to put the image.... i need you ! Julien
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

3/13/2007 6:36 PM	Rate (0)
jul's Posts: 58 Rating: (1)	Hi !! To simplify, is it possible to display the configuration dialog of a graphic object in runtime ? In this way i can do as if i were in graphic editor : when i create a graphic object, i have to choose an image to put in the graphic object. I wonder if a C or VB function exist which permit to open this configuration dialog ? Julien
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

3/13/2007 9:35 PM	Rate (0)
Danielle Posts: 1275 Rating: (123)	jul's Hi !! To simplify, is it possible to display the configuration dialog of a graphic object in runtime ? In this way i can do as if i were in graphic editor : when i create a graphic object, i have to choose an image to put in the graphic object. I wonder if a C or VB function exist which permit to open this configuration dialog ? Julien Hi Julien, As long as your pictures are located on the "...\Project\GraCS" folder you can change the picture name parameter, in your graphic object. In a C Script you could use: SetPropChar("ScreenName","GraphicObjectName", "PictureName", "PictureName.bmp"); Best regards, Danielle
Danielle Posts: 1275 Rating: (123)	Last edited by: Danielle at: 13.03.2007 21:45
Suggestion To thank Quote Answer

3/14/2007 10:25 AM	Rate (0)
jul's Posts: 58 Rating: (1)	Danielle jul's wrote: Hi !! To simplify, is it possible to display the configuration dialog of a graphic object in runtime ? In this way i can do as if i were in graphic editor : when i create a graphic object, i have to choose an image to put in the graphic object. I wonder if a C or VB function exist which permit to open this configuration dialog ? Julien Hi Julien, As long as your pictures are located on the "...\Project\GraCS" folder you can change the picture name parameter, in your graphic object. In a C Script you could use: SetPropChar("ScreenName","GraphicObjectName", "PictureName", "PictureName.bmp"); Best regards, Danielle Hi Danielle !! The SetPropChar works correclty but without dialog to search a picture. But an other problem is that when i change the vue or when i stop the runtime, the picture is not yet here. More precisely: in NewPdl0.pdl there is "image" a graphical object which has "toto.bmp". When i push the button "tata.bmp" replace "toto.bmp". but if i go in an other PDL, and return to NewPdl0.pdl "tata.bmp" is replaced by "toto.bmp" It happens the same thing if i stop the runtime. What i want is that "tata.bmp" stay in the PDL. Under I put the VB script I made which permit ti search the picture whith a dialog box : (It works without problem but whith the problem of tata and toto !) Dim pathName Dim oFODLg Dim pathArray Dim objScreen Set oFODLg = CreateObject("SAFRCFileDlg.FileOpen") //this insctruction works with server 2003 x = oFODLg.OpenFileOpenDlg pathName = oFODLg.FileName pathArray = Split(pathName,"\") MsgBox(pathName) If UBound(pathArray)>0 Then pathName = pathArray(UBound(pathArray)) HMIRuntime.Trace(pathName) &vbCr Set objScreen = HMIRuntime.Screens("NewPdl0") MsgBox(objScreen.ScreenItems("image").PictureName) objScreen.ScreenItems("image").PictureName = pathName End If Can you help me Pleeease ???
jul's Posts: 58 Rating: (1)
Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on