FindPropertyObject funkcija
Įgalina objektą vykdymo metu adresuoti kaip eilutės parametrą naudojant objekto vardą.
Pavyzdžiui, ši komanda:
atitinka komandų bloką:
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
Tai leidžia dinamiškai kurti vardus vykdymo metu. Pavyzdžiui:
„TextEdit1“ iki „TextEdit5“ cikle sukuria penkis kontroliniai vardus.
Dar žr.: FindObject
Sintaksė:
FindPropertyObject( ObjVar, PropName As String )
Parametrai:
ObjVar: Objekto kintamasis, kurį norite dinamiškai apibrėžti vykdymo metu.
PropName: Eilutė, nurodanti savybės, į kurį norite kreiptis vykdymo metu, vardą.
5 Neteisingas procedūros iškvietimas
12 kintamasis nėra apibrėžtas
14 Neteisingas parametras
52 neteisingas failo pavadinimas arba failo numeris