GetVarExtensions - metoda obiektu PmaCommGroup
Opis:
Zwraca tablicę wszystkich rozszerzeń danych (obiektów
ExtComm) zarejestrowanych w obiekcie
PmaCommGroup (wszystkie pozycje tej grupy).
Składnia:
Array GetVarExtensions()
Wartość zwrotna:
tablica 1-wymiarowa (obiekt
PmArray dla
JavaScript lub typ danych
Array dla
VBScript).
Przykład:
JavaScriptVBScriptWybierz oraz skopiuj do schowka
// Uzyska tablicę odniesień do wszystkich zarejestrowanych obiektów ExtComm PmaCommGroup obiektu /Comm/Group1:
var aExt = pMe.Pm("/Comm/Group1").GetVarExtensions();
var nExt = aExt.GetSize(1);
var iExt;
for (iExt = 0; iExt < nExt; iExt++)
{
var oExt = aExt.GetItem(iExt);
// Rozszerzenie danych = obiekt ExtComm
// Wyświetla identyfikator każdej pozycji do INFO systemu:
Pm.Debug(oExt.ItemId);
// Do zmiennej (do której należy rozszerzenie danych) ustawi jakość na wartość 24=Bad:CommFailure:
oExt.Var.Quality = 24;
}
' Uzyska tablicę odniesień do wszystkich zarejestrowanych obiektów ExtComm PmaCommGroup obiektu /Comm/Group1:
Dim aExt
aExt = pMe.Pm("/Comm/Group1").GetVarExtensions()
Dim nExt
nExt = UBound(aExt) + 1
Dim iExt
For iExt = 0 To nExt - 1
Dim oExt
Set oExt = aExt(iExt)
' Rozszerzenie danych = obiekt ExtComm
' Wyświetla identyfikator każdej pozycji do INFO systemu:
Pm.Debug(oExt.ItemId)
' Do zmiennej (do której należy rozszerzenie danych) ustawi jakość na wartość 24=Bad:CommFailure:
oExt.Var.Quality = 24
Next