ContainerChildren (gb.qt4)
该虚拟类返回容器的所有子级的虚拟集合
属性
方法
Example
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: - " & ob.name
Next
End
Code adapted from a post by "shell" on the
https://www.gambas-es.org web site.