Hello,

I wnat to change text field by HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1")

If Tag_1 = 1 then I want to change HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1") = Phase1

I am not sure below script . Is it possible to change text? Please let me have how to change text using HmiRuntime.Screens object.

Select Case Tag_1 

Case 1 : HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1").Text = "Phase1"

Case 2 : HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1") .Text = "Phase2"

End Select 

Hello,

why do you want to change the text with a script?

The easier way is that you use the function text list.

There you can define the different text at a list and need "only" a tag (INT) to select the text from the list.

regards
CaOd

I don't want to use text lists.

I want to use HmiRuntime tag to change text like text lists as my first question.

 Hi,

This should work fine with Comfort Panel.

Dim textFieldPhase 

Set textFieldPhase = HMIRuntime("myScreen").ScreenItems("myTextField")

Select Case SmartTags("selectInt")

  Case 1 textFieldPhase.Text  = "Phase1"

  Case 2 textFieldPhase.Text = "Phase2"

End Select

 So your script seems fine. I'm not sure about Case syntax i think it should be Case 1 instead of Case 1:. And i don't know from where your tag_1 is coming from, it should work without SmartTags too, i just like to use it on all HMI tags.

aisan

Hello,

I wnat to change text field by HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1")

If Tag_1 = 1 then I want to change HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1") = Phase1

I am not sure below script . Is it possible to change text? Please let me have how to change text using HmiRuntime.Screens object.

Select Case Tag_1 

Case 1 : HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1").Text = "Phase1"

Case 2 : HmiRuntime.Screens("Screen").ScreenItems("Textfeld_1") .Text = "Phase2"

End Select