-> Hier kostenlos registrieren
Guten Morgen,
ich hab in einem Bildfenster 128 Variablen aus einer SPS projektiert. Ich aktualisiere die Variablen mittels eines Scripts das ich über einen Button aufrufe:
Nachdem ich die Runtime gestartet habe und das Bildfenster das erstemal aufmache, gebraucht das Script eine Ewigkeit bis es durchgelaufen ist. Wenn ich das Bildfenster wieder schließe und neu aufrufe wird das Script erheblich schneller abgearbeitet. Woran kann dies liegen?
ich hab in einem Bildfenster 128 Variablen aus einer SPS projektiert. Ich aktualisiere die Variablen mittels eines Scripts das ich über einen Button aufrufe:
Code:
Sub OnClick(ByVal Item)
Dim Fenster
Set Fenster=ScreenItems("Bildfenster2")
Fenster.Visible=False
Fenster.Visible=True
Dim Artikel_Inhalt,Inhalt,Artikel_Nummer,Nummer,Artikel_Einheit,Einheit
Dim Artikel_Geraet,Geraet,Artikel_Volumenbildend,Volumenbildend,Artikel_Sollmenge,Sollmenge,i
For ii= 1 To 32
Set Artikel_Inhalt = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Artikel_Inhalt" & ii)
Set Artikel_Nummer = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Artikel_Nummer" & ii)
Set Artikel_Einheit = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Artikel_Einheit" & ii)
Set Artikel_Geraet = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Artikel_Geraet" & ii)
Set Artikel_Volumenbildend = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Volumenbildend" & ii)
Set Artikel_Sollmenge = HMIRuntime.Tags("S7-Programm/TempRezeptDB.Sollmenge" & ii)
Set Inhalt = HMIRuntime.Screens("Main.Bildfenster2").ScreenItems("Inhalt" & ii)
Artikel_Inhalt.read
Inhalt.AddItem(Artikel_Inhalt.value)
Inhalt.ListIndex=0
Set Nummer = HMIRuntime.Screens("Main.Bildfenster2").ScreenItems("ArtNr" & ii)
Artikel_Nummer.read
Nummer.AddItem(Artikel_Nummer.value)
Nummer.ListIndex=0
Set Einheit = HMIRuntime.Screens("Main.Bildfenster2").ScreenItems("Einheit" & ii)
Artikel_Einheit.read
Einheit.Text= Artikel_Einheit.value
Set Geraet = HMIRuntime.Screens("Main.Bildfenster2").ScreenItems("Geraet" & ii)
Artikel_Geraet.read
HMIRuntime.Trace ii & vbCrLf
Next
end sub
Nachdem ich die Runtime gestartet habe und das Bildfenster das erstemal aufmache, gebraucht das Script eine Ewigkeit bis es durchgelaufen ist. Wenn ich das Bildfenster wieder schließe und neu aufrufe wird das Script erheblich schneller abgearbeitet. Woran kann dies liegen?