IBM Lotus Symphony
|
Umożliwia adresowanie obiektów w czasie wykonania za pomocą łańcucha z nazwą obiektu.
Na przykład komenda:
MojObiekt.Wlasc1.Command = 5
odpowiada następującemu blokowi komend:
Dim ZmiennaObiektu as Object
Dim WlascObiektu as Object
NazwaObiektu As String = "MojObiekt"
ZmiennaObiektu = FindObject( NazwaObiektu As String )
NazwaWlasc As String = "Wlasc1"
WlascObiektu = FindPropertyObject( ZmiennaObiektu, NazwaWlasc As String )
WlascObiektu.Command = 5
Aby w czasie wykonywania dynamicznie tworzyć nazwy:
korzystając z pętli, można utworzyć pięć nazw: od "EdycjaTekstu1" do EdycjaTekstu5".
Patrz także: FindObject
FindPropertyObject( ZmiennaObiektu, NazwaWlasc As String )
Nazwa_właściwości: Nazwa właściwości, która ma być adresowana w czasie wykonania.
Nazwa_właściwości: Łańcuch określający nazwę właściwości, która ma być adresowana w czasie wykonania.