Hallo,
ich habe ein kleines VB Skript in dem ich den Aktuellen Bildnamen auslese und in einem Textfeld in einem Template das immer aufgerufen wird ausgebe.
Hintergrund ist der dass der Bildname mit der Bildüberschrift im Bild immer konsistent sein muss.
In dem ersten Projekt geht das ganze im zweiten geht es nicht mehr. Der Fehler liegt bei "activeScreenName" es steht der richtige name darin aber in der Methode .Screens() wird es nicht richtig verarbeitet
HmiRuntime.Screens(activeScreenName).ScreenItems("Screen_Name") -> funktioniert nicht
HmiRuntime.Screens("Anlage").ScreenItems("Screen_Name") -> funktioniert
In activeScreenName steht aber "Anlage"
Irgendwas stinkt hier gewaltig....
Gruß
ich habe ein kleines VB Skript in dem ich den Aktuellen Bildnamen auslese und in einem Textfeld in einem Template das immer aufgerufen wird ausgebe.
Hintergrund ist der dass der Bildname mit der Bildüberschrift im Bild immer konsistent sein muss.
In dem ersten Projekt geht das ganze im zweiten geht es nicht mehr. Der Fehler liegt bei "activeScreenName" es steht der richtige name darin aber in der Methode .Screens() wird es nicht richtig verarbeitet
HmiRuntime.Screens(activeScreenName).ScreenItems("Screen_Name") -> funktioniert nicht
HmiRuntime.Screens("Anlage").ScreenItems("Screen_Name") -> funktioniert
In activeScreenName steht aber "Anlage"
Code:
'###############Set Screenname###################
'------------------------------------------------
'- declar lokal properties
'------------------------------------------------
Dim activeScreenName
Dim textfield
'------------------------------------------------
'- main
'------------------------------------------------
' get activ screenname
'activeScreenName = HmiRuntime.ActiveScreen.ObjectName
activeScreenName = HmiRuntime.BaseScreenName
' declar textfield as object from template
Set textfield = HmiRuntime.Screens(activeScreenName).ScreenItems("Screen_Name")
' set screenname to outputfield
textfield.ProcessValue = activeScreenName
Gruß