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 )

Параметры:

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