Функция 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: низ, задаващ името на обекта, който искате да се адресира по време на изпълнение.