Zugriff auf dein Objekt im Bild

[Mutabor]

Zuviel Werbung?
-> Hier kostenlos registrieren

Hallo Liebes Forum... ich habe ein problem.

Vielleicht kann es jemand lösen.
Ich habe eine Interne Variable... diese möchte ich gern mit einem Trigger belegen... Wenn diese variable Kippt, möchte ich das im Bild ein Objekt einen Atributwert ändert.
ich habe aber ein problem beim zugriff auf das objekt... ich mache es so wie siemens auf deren seite sagt:

Dim objGrid
Dim Filtmerk

'Set objGrid = HMIRuntime.ActiveScreen.ScreenItems("dgv_AbfuellAuftraege")

Set objGrid = HMIRuntime.Screens("Z_9100_AbfuellAuftraege").ScreenItems("dgv_AbfuellAuftraege")

Filtmerk = objGrid.filter
objGrid.filter = ""
objGrid.filter = Filtmerk

Mit der auskommentierten Zeile funktioniert es, wenn ich den Code auf einen Button lege welcher im gleichen bild ist. nun möchte ich aber über einen trigger auf einer variablen dass das gleiche passiert... wer weiß sowas tolles?

laut siemens seite sollte das funktionieren... ich bekomme aber den fehler:
============HMIScreens============
Application : PDLRT
Picture : Z_9100_AbfuellAuftraege.pdl_Events
Function : Sub cmd_ViewRefresh_OnClick(Byval Item)
Line : 17
Error : get_Item:Falscher Parameter.

============HMIScreens============

Das ist die Zeile in der ich das Objekt holen will...

 

[rostiger Nagel]

ähm, ich tippe mal du Arbeitest mit WinCCflexibel?
Wenn es so wäre, könntest du deinscript an dieine Variabel hängen,
indem du es durch die Funktion 'Wertänderung der Variabel' ausführst.
den Trigfer der Variabel musst du auf ständig Lesen einstellen.

 

[Larry Laffer]

Zuviel Werbung?
-> Hier kostenlos registrieren

Ich habe da ein kleines Verständnis-Problem.
Welches Script (welche Codezeile) funktioniert, wenn du sie über einen Button startest ?
Welcher Code steht in Zeile 17 des Scriptes ?
Eine interne Variable wird nicht auf Wertänderung überprüft ...

Gib mal etwas mehr Info's ...

Gruß
Larry

 

[rostiger Nagel]

Könnte es den sein, da du dein Bildnamen falsch geschrieben hast?

Set objGrid = HMIRuntime.Screens[COLOR="Red"]("Z_9100_AbfuellAuftraege")[/COLOR].ScreenItems("dgv_AbfuellAuftraege" )

 

[Mutabor]

Hallo und Dankw für eure Antworten,

leider hilft mir das bisher noch nicht. Ich nutze denke ich kein Wincc Flexibel weil ich nicht mal weiß was das ist ich habe ein VBS script und deine Triggervariable mit der ich das gern tuen würde wenn ich es denn hinbekomme. Bisher möchte ich es über einen Button machen. Richtig geschrieben ist es.

@Larry:
Wenn ich die Auskommentierte Zeile rein nehme statt der darunterliegenden bekomme ich das Objekt und das script funktioniert... nutze ich es wo wie jetzt stürzt er beim ziehen des objektes ab mit besagter fehlermeldung.

'Set objGrid = HMIRuntime.ActiveScreen.ScreenItems("dgv_AbfuellAuftraege")

Set objGrid = HMIRuntime.Screens("Z_9100_AbfuellAuftraege").ScreenItems("dgv_AbfuellAuftraege" )


Ich hoffe jemand hat eine idee danke:shock:

 

[Kai]

Zuviel Werbung?
-> Hier kostenlos registrieren

Ich nutze denke ich kein Wincc Flexibel weil ich nicht mal weiß was das ist.

Mit was für einer Visualisierung arbeitest Du denn? Arbeitest Du vielleicht mit WinCC?

Dim objGrid 
Dim Filtmerk
 
'Set objGrid = HMIRuntime.ActiveScreen.ScreenItems("dgv_AbfuellAuftraege")
 
Set objGrid = HMIRuntime.Screens("Z_9100_AbfuellAuftraege").ScreenItems("dgv_AbfuellAuftraege")
 
Filtmerk = objGrid.filter
objGrid.filter = ""
objGrid.filter = Filtmerk

Handelt es sich bei dem Bild "Z_9100_AbfuellAuftraege" um ein Grundbild oder vielleicht um ein Bild in einem Bildfenster?

Gruß Kai