ContainerChildren (gb.qt4)

This virtual class returns a virtual collection of all children of a container.

Esta clase no es instanciable.

Esta clase actúa como un array de sólo lectura.

Esta clase es enumerable con la palabra clave FOR EACH.

Count   Return the number of child controls.
Max   Return the number of child controls minus one, i.e. the higher child control index.

Clear   Delete all children controls of a container.


Public Sub Form_Open()

  Dim hChildren As ContainerChildren = FMain.Children
  Dim ob As Object

  Print "FMain has " & Str(hChildren.Count) & " children"

  If hChildren.Count = 0 Then Message.Info("Add some controls (e.g. Button, TextBox etc.) to the FMain form and try again", "OK")

  For Each ob In hChildren
    Print "FMain contains: - " &


Code adapted from a post by "shell" on the web site.