FindObject Function

Позволяет во время выполнения обращаться к объекту как строковому параметру через имя этого объекта.

Например, следующая команда:

MyObj.Prop1.Command = 5

соответствует блоку команд:

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

Это позволяет создавать имена динамически во время выполнения. Например:

"TextEdit1" to "TextEdit5" in a loop to create five control names.

См. также: FindPropertyObject

Синтаксис

FindObject( ObjName As String )

Параметры:

Имя_объекта . Строка, задающая имя объекта, к которому нужно обращаться во время выполнения.