FindObject-funktion

Tillader et objekt at blive adresseret under kørselstid som en strengparameter gennem objektnavnet.

For eksempel følgende kommando:

MyObj.Prop1.Command = 5

modsvarer kommandoblokken:

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

Dette tillader at navne oprettes dynamisk på kørselstidspunktet. For eksempel:

"TextEdit1" til TextEdit5" i en løkke for at oprette fem kontrolelementers navne.

Se også:FindPropertyObject

Syntaks:

FindObject( ObjName As String )

Parametre:

ObjName: Streng som angiver navnet på det objekt, som du vil adressere på kørselstidspunktet.