Promotic
WikipediaLinkedInYoutubeTwitterFacebook

ItemEx - vlastnost objektu PmData

Popis:
Vlastnost zpřístupňuje objekt typu Var, který reprezentuje jednu proměnnou definovanou v záložce Data. Proměnná je zde určena parametrem index..
Syntaxe:
ItemEx(index As Variant, nAttr As Long) As Object
Volání:
Čtení hodnoty:
val = oData.ItemEx(index).Value
Zápis hodnoty:
oData.ItemEx(index).Value = val
Přístup k objektu, který reprezentuje danou proměnnou:
Set obj = oData.ItemEx(index)
Parametry:
index(Variant) Určení proměnné buď jejím jménem (datový typ String, rozlišuje velká/malá písmena, například "a1") nebo indexem (indexováno od 0).
nAttr(Long) Umožňuje změnit chování metody.
0 (přednastaveno) - standardní chování (jako vlastnost Item).
1 - při odkazu na neexistující proměnnou nebude generována globální chyba v INFO systému.
Poznámka:
Vlastnost je určena jen pro čtení.

Objekt Var obsahuje informace o dané proměnné (hodnota, název, index, atd.).

Vlastnost Item (jako Var objekt) je jen pro čtení, tzn. tento objekt nelze změnit, ale například do vlastnosti Value objektu Var už zapisovat lze.

Pokud proměnné neexistuje, vrací se hodnota Nothing. Hodnotu Nothing lze testovat VBScript operátorem Is.

 
Identifikátor #vars:Na objekt Var se dá také odkázat přímo rozšířením cesty metody Pm pomocí identifikátoru #vars. Tento identifikátor lze použít v metodách pro práci s aplikačním stromem objektů (např. v metodě Pm) nebo ve vazbě PP v aplikaci a v obrazech. Například metoda Pm("/data/#vars/Teplota) vrací proměnnou "Teplota" (Var) v objektu "data" (PmData).
 
Identifikátor #ext: Na objekty Datová rozšíření v proměnné Var se dá také odkázat přímo rozšířením cesty metody Pm pomocí identifikátoru #ext. Lze použít v metodě Pm nebo ve vazbě PP v aplikaci a v obrazech. Například metoda pMe.Pm("/data/#vars/Teplota/#ext/al") vrací datové rozšíření s identifikátorem al (ExtAlarmAnalog) v proměnné "Teplota" (Var) v objektu "data" (PmData).
Viz také:
Příklad:
Test zda existuje datová položka s názvem "Teplota3":
If oData.ItemEx("Teplota3", 1) Is Nothing Then
  ' ... error
End If
© MICROSYS, spol. s r. o.Tavičská 845/21 703 00 Ostrava-Vítkovice