mehrere Treiber-Variablen beschreiben

mehrere Treiber-Variablen beschreiben

Guten Tag,
und zwar habe ich folgendes Problem.
Ich habe einen Bildschirm auf dem 25 Variablen gesetzt werden können.
Diese Variablen werden auf interne temporäre Variablen geschrieben, was noch funktioniert.
Nun habe ich einen "Speichern" Button, welcher bei Betätigung alle 25 Variablen auf Treibervariablen schreiben soll.
Und diese werden nur sporadisch beschrieben. Meistens funktionieren die ersten 10 und der Rest nur vereinzelt.
Die Treibervariablen befinden sich im OnlineContainer und sind alle online!
Hier der Codeauszug von der Zuweisung:
zOLV.Item("VarStr.s").Value = thisProject.Variables.Item("VarStr_Intern.s").Value
zOLV.Item("VarStr.i1.i").Value = thisProject.Variables.Item("VarStr_Intern.i1.i").Value
zOLV.Item("VarStr.i1.s").Value = thisProject.Variables.Item("VarStr_Intern.i1.s").Value
zOLV.Item("VarStr.i2.i").Value = thisProject.Variables.Item("VarStr_Intern.i2.i").Value
zOLV.Item("VarStr.i2.s").Value = thisProject.Variables.Item("VarStr_Intern.i2.s").Value
zOLV.Item("VarStr.i3.i").Value = thisProject.Variables.Item("VarStr_Intern.i3.i").Value
zOLV.Item("VarStr.i3.s").Value = thisProject.Variables.Item("VarStr_Intern.i3.s").Value
zOLV.Item("VarStr.b1.b").Value = thisProject.Variables.Item("VarStr_Intern.b1.b").Value
zOLV.Item("VarStr.b1.s").Value = thisProject.Variables.Item("VarStr_Intern.b1.s").Value
zOLV.Item("VarStr.b2.b").Value = thisProject.Variables.Item("VarStr_Intern.b2.b").Value
zOLV.Item("VarStr.b2.s").Value = thisProject.Variables.Item("VarStr_Intern.b2.s").Value
zOLV.Item("VarStr.b3.b").Value = thisProject.Variables.Item("VarStr_Intern.b3.b").Value
zOLV.Item("VarStr.b3.s").Value = thisProject.Variables.Item("VarStr_Intern.b3.s").Value
zOLV.Item("VarStr.r1.r").Value = thisProject.Variables.Item("VarStr_Intern.r1.r").Value
zOLV.Item("VarStr.r1.s").Value = thisProject.Variables.Item("VarStr_Intern.r1.s").Value
zOLV.Item("VarStr.r2.r").Value = thisProject.Variables.Item("VarStr_Intern.r2.r").Value
zOLV.Item("VarStr.r2.s").Value = thisProject.Variables.Item("VarStr_Intern.r2.s").Value
zOLV.Item("VarStr.r3.r").Value = thisProject.Variables.Item("VarStr_Intern.r3.r").Value
zOLV.Item("VarStr.r3.s").Value = thisProject.Variables.Item("VarStr_Intern.r3.s").Value
zOLV.Item("VarStr.s1.c").Value = thisProject.Variables.Item("VarStr_Intern.s1.c").Value
zOLV.Item("VarStr.s1.s").Value = thisProject.Variables.Item("VarStr_Intern.s1.s").Value
zOLV.Item("VarStr.s2.c").Value = thisProject.Variables.Item("VarStr_Intern.s2.c").Value
zOLV.Item("VarStr.s2.s").Value = thisProject.Variables.Item("VarStr_Intern.s2.s").Value
zOLV.Item("VarStr.s3.c").Value = thisProject.Variables.Item("VarStr_Intern.s3.c").Value
zOLV.Item("VarStr.s3.s").Value = thisProject.Variables.Item("VarStr_Intern.s3.s").Value

Es funktioniert nur zuverlässig, wenn ich nach jeder Zeile eine gute Weile warte.
An was kann das liegen, bzw was mach ich falsch?
Liegt dies an der Globalen Updatezeit der Treibervariablen? Dieser Wert ist auf 1000ms gestellt.
Ich würde diesen Wert nur ungern ändern, da sonst die CPU Auslastung in die Höhe schießt.

This is a migrated post! Originally posted on 03.03.2016 by user NikoG. Please be aware that information can be outdated.