Функция FindObject

Позволява обект да бъде адресиран по време на изпълнение като параметър – низ посредством името му.

Например следната команда:

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“ до „TextEdit5“ в цикъл за създаване на пет имена на елементи за управление.

Виж също: FindPropertyObject

Синтаксис:

FindObject( ObjName As String )

Параметри:

ObjName: низ, задаващ името на обекта, който искате да се адресира по време на изпълнение.