ISControl.AllControls

Description

This property contains the list of all child controls.

Syntax

object.AllControls

Part	Attribute	Type	Description
`object`	Required	ISControl	The `object` always implements the ISControl interface

Restriction: This property is readonly.

Return Value

ISControls

Example

Display some information about all child controls.

sub main()
  Dim aCheckBox
  Dim aControlInfo

  Set aCheckBox = Form.Controls_("chkMV")
  set aParentControl = aCheckBox.Parent
  set aAllControls =  aParentControl.AllControls
  
  for each aControl in aAllControls
    aMessage = aMessage & vbNewLine & GetControlInfo(aControl) &_
      vbNewLine & " ---------- "
  next                  
  
  Profile.MsgBox(aMessage)
end sub

function GetControlInfo(aControl)
  aControlInfo =_
    "Caption: " & aControl.Caption & vbNewLine &_ 
    "Width: " & aControl.Width & vbNewLine &_
    "Height: " & aControl.Height & vbNewLine &_
    "Hint: " & aControl.Hint & vbNewLine &_
    "Left: " & aControl.Left & vbNewLine &_
    "Top: " & aControl.Top & vbNewLine &_
    "Tag: " & aControl.Tag & vbNewLine &_
    "ShortName: " & aControl.ShortName & vbNewLine &_
    "Enabled: " & aControl.Enabled & vbNewLine &_
    "TypeName: " & aControl.TypeName
  GetControlInfo = aControlInfo   
end function

Note: This macro should be executed in any event handler of the form control.

In Profile Client v8 on User Interface All Controls can be found in Maintain > Templates > Health Record Collection Templates > Open the selected form template > Open form editor > Object Inspector.

Version information

Added in v7.8.0