Dispose all usercontrols...

[lidds]

I had a number of userControls added to a tableLayout, what I want to do is dispose of all userControls however if I use the following code it only seems to dispose of the first userControl and not the rest:

            For Each myControl As userDisplaySet In Me.tableDisplaySet.Controls
                ' Closes control
                myControl.Dispose()
            Next

Thanks

Simon

[cicatrix]

Do the rest of userDisplaySet controls reside in the tableDisplaySet container?

[lidds]

Yes, they do.

I am adding the userControl using the following code:

Me.tableDisplaySet.Controls.Add(New userDisplaySet())

[cicatrix]

your code iterates through all controls of tableDisplaySet, not just userDisplaySet.

Try it:

For Each ctl As userDisplaySet In Me.Controls.OfType(Of userDisplaySet)()
   ctl.Dispose
Next

[lidds]

OfType gives me an error

[minitech]

That's because not all versions have it... put this in your loop instead, and change the type to control:

For Each myControl As Control In Me.tableDisplaySet.Controls
     If TypeOf ctl Is userDisplayList Then
          Me.tableDisplaySet.Controls.Remove(ctl)
     End If
Next

[i00]

if you remove the first item from a list and then move to the next item it will may not work correctly

Try using a reverse loop through the list or use: For Each myControl As userDisplaySet In Me.tableDisplaySet.Controls.tolist

Let me know
Kris

[lidds]

Kris,

The tolist does not exist and is giving me an error?

Thanks

Simon

[cicatrix]

To clear the controls collection:

Me.tableDisplaySet.Controls.Clear

[lidds]

Thanks Cicatrix,

So simple

[NickThissen]

Clearing the Controls collection is not the same as disposing every control in the collection. Clearing will only remove the references to the controls from the collection, but the controls will still exist 'out there'.