Funkcja FindObject

Pozwala adresować obiekt podczas wykonywania programu przez jego nazwę w postaci ciągu.

Na przykład następująca instrukcja:

MyObj.Prop1.Command = 5

odpowiada następującemu blokowi poleceń:

Dim ObjVar as Object

Dim ObjProp as Object

ObjName As String = "MyObj"

ObjVar = FindObject( ObjName As String )

PropName As String = "Prop1"

ObjProp = FindPropertyObject( ObjVar, PropName As String )

ObjProp.Command = 5

Pozwala to na dynamiczne tworzenie nazw podczas wykonywania programu. Na przykład:

"TextEdit1" do "TextEdit5" w pętli, aby utworzyć pięć nazw kontrolnych.

Zobacz także: FindPropertyObject

Składnia:

FindObject( ObjName As String )

Parametry:

Nazwa_obiektu: Ciąg określający nazwę obiektu adresowanego podczas wykonywania programu.