Implementing support for "For...Each"

[gxpark]

Hi,

I don't remember what do I need to do so my custom collection supports the For...Each navigation.

Can anyone point me in the right direction?

Thanks

[Edneeis]

Try making a collection class with the Class Builder AddIn thing, it takes care of all that for you.

[gxpark]

thanks... that option never crossed my mind (obviously) :)

[zeke_wpg]

The other way is as follows


' Class code
private mcolThings as new collection

public sub NewEnum as IUnkown
set newenum = mcolThings.[NewEnum]
end sub


in the procedure properties, set the newenum id to -4