[Gambas-user] Arrays of controls

[Dag-Jarle Johansen]

thanks a lot, tobias, danke sehr, genau was ich brauche - just what I was
looking for and searched a lot for. and an extra thanks for the very
detailled description; mostly there is one little point, clear to anyone who
uses this every day, and therefor not mentioned, but an obstacle to the
newbie.

now I am looking forward to use this new knowledge in my software.

regards,
Dag-Jarle Johansen

2011/8/28 tobias <tobiasboe1 at ...20...>

> hi,
>
> > I do not check this at all:
> >
> > Public Sub Page_First_Init()
> >      Dim hPictureBox As PictureBox
> >      Dim I As Integer
> >      For i = 0 To 9
> >          hPictureBox = New PictureBox(Me) As "PBX"
> >          hPictureBox.Tag = i
> >      Next
> > End
>
> ok, you have a loop from 0 to 9 in which you create PictureBoxes by
> using New, each of them gets the event name "PBX" and a tag to identify
> them.
> those PictureBoxes are created on Me and therefore now normal controls.
> you additionally hold a reference to the just created one in hPictureBox
> so you can change its attributes as you want:
> hPictureBox.Visible = False
> you can pick a particular box using Me.Children (i don't know, if this
> is the best solution for it):
>
> Public Function Pick(iInd As Integer) As PictureBox
>   Dim cControl As Control
>
>   For Each cControl In Me.Children
>     If Object.Type(cControl) = "PictureBox" And cControl.Tag = iInd Then
>       Return cControl
>     Endif
>   Next
>   Return Null
> End
>
> the thing with this is that Tags may be set arbitrarily, so checking if
> the control is also a PictureBox is a little more secure not to give
> something wrong back but keep in mind that for some reason, you may have
> given another PictureBox the same Tag which leads to giving back the
> first one recognized in Me.Children... (according to the doc, the Tag
> property of Controls aren't used by any component but only by the
> programmer, so you might take this solution with care or derive another
> one from it.
> for a different approach, you may have a look at the ArrayOfControls
> example.
>
> within an event raised by the PBX "group" you can just use Last.
>
> i hope, it's somehow clearer, now?
>
> regards,
> tobi
>
>
> ------------------------------------------------------------------------------
> EMC VNX: the world's simplest storage, starting under $10K
> The only unified storage solution that offers unified management
> Up to 160% more powerful than alternatives and 25% more efficient.
> Guaranteed. http://p.sf.net/sfu/emc-vnx-dev2dev
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>