How do I add an Event Handler at run time in VB6

What about

    Dim WithEvents newControl As New Text1

then using Text1's events?

J.

Basically you can't.  VB6 uses control arrays to accomplish this.  The WithEvents keyword only allows you to handle ONE control.  It is possibly to create a dynamic control and assign it to a variable declared using WithEvents but you can only create ONE dynamic control in this way.  You must have a declaration for each "dynamic" control which makes it pretty silly and you might as use a control array since you must plan ahead at design time.

Hi Idle_Mind

Ok, how about this. I have a structure that contains a Command Button (SSCommand).
I create an array of these structures and eventually add the Command Button to a Form.
How do I, (or can I) get at the 'Button_Click()' event for each command button in the structure?

-------example structure------------------
Type ItemDataStructure
    ItemIndex As Integer
    ItemNumber As Integer
    'ItemName As String
    ItemGroupName As String
    ItemButton As SSCommand <<-- Infragistics command button
    ButtonName As String
    ParentName As String
    ButtonWidth As Integer
    ButtonHeight As Integer
    ButtonTop As Integer
    ButtonLeft As Integer
    ButtonOrder As Integer
End Type
------------------------------------------------

Any Ideas?

BTW, I need to step out for a while, be back later today

rrbecker

If the control supports it then you would need to create a control array of SSCommand.  When you create a new structure, also load another button into the control array.  Then instead of storing a button reference in your structure, you store the INDEX of the button in the control array.

Hi Idle_Mind,

I'm back.... I've found that I can create and add the SSCommand button to a  form or panel by using the following syntax:

------------snippet--------------------
MainStruct.GroupStructure(GroupCounter).ItemStructure(ItemCounter).ItemButton.Container = MainStruct.GroupStructure(GroupCounter).GroupItemPanel
-------------------------------------

and this would display a new SSCommand button on my form. I can set all the other properties including Height, Width, Top and Left but I guess I still have the problem of being able to 'Read' the 'Click' event of the button.

If you have any other ideas I would appreciate it, otherwise I'll revert back to a 'Control' array and close this ticket.

Thanks in advance

rrbecker

Thanks Idle_Mind,

Not the answer I was 'Hoping' for but the 'Correct' answer none-the-less. You have helped me with problems in the past and have always given me the 'Best' solution possible.

So again, thanks for all your help, I will proceed to implement the 'Control Array'.

rrbecker