Fonction FindPropertyObject

Permet d'adresser les objets pendant l'exécution par un paramètre au format chaîne de caractères utilisant le nom de ces objets.

Par exemple, la commande suivante :

MyObj.Prop1.Command = 5

correspond au bloc de commandes suivant :

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

Cela permet de créer des noms dynamiquement pendant l'exécution. Exemple :

"TextEdit1" à "TextEdit5" dans une boucle pour créer cinq noms de contrôles.

Voir aussi : FindObject

Syntaxe :

FindPropertyObject( ObjVar, PropName As String )

Paramètres :

ObjVar : variable d'objet devant être définie dynamiquement pendant l'exécution.

PropName : chaîne de caractères spécifiant le nom de la propriété à adresser pendant l'exécution.

Codes d'erreur :

5 appel de procédure incorrect

12 variable non définie

14 paramètre incorrect

52 nom ou numéro de fichier incorrect

57 erreur E/S de périphérique