LibreOffice 24.8 Help
āĻŦāĻ¸ā§āĻ¤ā§āĻ° āĻ¨āĻžāĻŽā§āĻ° āĻŽāĻžāĻ§ā§āĻ¯āĻŽā§ āĻ°āĻžāĻ¨ āĻāĻžāĻāĻŽā§ āĻāĻāĻāĻŋ āĻ¸ā§āĻā§āĻ°āĻŋāĻ āĻĒā§āĻ¯āĻžāĻ°āĻžāĻŽāĻŋāĻāĻžāĻ° āĻšāĻŋāĻ¸ā§āĻŦā§ āĻ¸āĻŽā§āĻŦā§āĻ§āĻ¨ āĻāĻ°āĻž āĻ¯āĻžāĻŦā§, āĻāĻŽāĻ¨ āĻŦāĻ¸ā§āĻ¤ā§ āĻ¸āĻā§āĻ°āĻŋā§ āĻāĻ°āĻž āĻšā§āĨ¤
āĻ¯ā§āĻŽāĻ¨, āĻ¨āĻŋāĻā§āĻ° āĻāĻŽāĻžāĻ¨ā§āĻĄāĻāĻŋ:
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" to "TextEdit5" in a loop to create five control names.
āĻāĻ°āĻ āĻĻā§āĻā§āĻ¨: FindPropertyObject
FindObject( ObjName As String )
ObjName: āĻ°āĻžāĻ¨ āĻāĻžāĻāĻŽā§ āĻāĻĒāĻ¨āĻŋ āĻ¯ā§ āĻŦāĻ¸ā§āĻ¤ā§āĻ° āĻ¨āĻžāĻŽ āĻāĻ˛ā§āĻ˛ā§āĻ āĻāĻ°āĻ¤ā§ āĻāĻžāĻ¨ āĻ¤āĻž āĻ¸ā§āĻ¨āĻŋāĻ°ā§āĻĻāĻŋāĻˇā§āĻāĻāĻžāĻŦā§ āĻāĻ˛ā§āĻ˛ā§āĻāĻāĻžāĻ°ā§ āĻ¸ā§āĻā§āĻ°āĻŋāĻāĨ¤