problem with delegates

[Boni]

Dear All,
I would like to pass delegate (i.e function pointer ) into class
--------------------------
delegat TAAADelegate()
class A
dim myhandler as TAAADelegate
sub initialize ( handler_ as TAAADelegate)
myhandler=handler_
end sub

public shared sub Handler1()
end sub

end class

---------
dim oA as new A
A.initializelize(A.Handler1) 'Compiler complains
A.initializelize(addressof A.Handler1) 'Compiler complains

[Larry Lard]

Boni wrote:

Dear All,
I would like to pass delegate (i.e function pointer ) into class
--------------------------
delegat TAAADelegate()
class A
dim myhandler as TAAADelegate
sub initialize ( handler_ as TAAADelegate)
myhandler=handler_
end sub

public shared sub Handler1()
end sub

end class

---------
dim oA as new A
A.initializelize(A.Handler1) 'Compiler complains
A.initializelize(addressof A.Handler1) 'Compiler complains
It helps if you actually copy and paste directly from the editor :)
delegat TAAADelegate()
Guessing this is meant to be

Delegate Sub TAAADelegate()
dim oA as new A
A.initializelize(A.Handler1) 'Compiler complains
A.initializelize(addressof A.Handler1) 'Compiler complains

- The sub is called 'initialize' not 'initializelize'
- 'initialize' is an instance method not a shared method, so should be
invoked on oA not A

Once those changes are made, this compiles:

Dim oA As New A
oA.initialize(AddressOf A.Handler1)

--
Larry Lard
Replies to group please