Good morning to everyone,
I've tested this "format" od this code to enumerate some controls in a
window and it works fine.
Private Delegate Function EnumChildProcDe legate _
(ByVal hWnd As IntPtr, _
ByVal lParam As Integer) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal hWndParent As IntPtr, _
ByVal lpEnumFunc As EnumChildProcDe legate, _
ByVal lParam As Integer) As Boolean
.......... code ...... and, finally
EnumChildWindow s(Me.Handle, AddressOf EnumChildProc, 0)
but what if I would declare more than one of enumeratione Function ?
For example, how can I do something like this:
Private Delegate Function EnumChildFIRSTD elegate (ByVal ....,
ByVal ....) As Boolean
Private Delegate Function EnumChildSECOND Delegate (ByVal ....,
ByVal ....) As Boolean
Private Delegate Function EnumChildTHIRDD elegate (ByVal ....,
ByVal ....) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildFIRSTD elegate,
ByVal ...) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildSECOND Delegate,
ByVal ...) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildTHIRDD elegate,
ByVal ...) As Boolean
.......... code ...... and, finally
EnumChildWindow s(Me.Handle, AddressOf EnumChildFIRST, 0)
EnumChildWindow s(Me.Handle, AddressOf EnumChildSECOND , 0)
EnumChildWindow s(Me.Handle, AddressOf EnumChildTHIRD, 0)
Hoping my question is clear, I really thank you.
Emilio.
I've tested this "format" od this code to enumerate some controls in a
window and it works fine.
Private Delegate Function EnumChildProcDe legate _
(ByVal hWnd As IntPtr, _
ByVal lParam As Integer) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal hWndParent As IntPtr, _
ByVal lpEnumFunc As EnumChildProcDe legate, _
ByVal lParam As Integer) As Boolean
.......... code ...... and, finally
EnumChildWindow s(Me.Handle, AddressOf EnumChildProc, 0)
but what if I would declare more than one of enumeratione Function ?
For example, how can I do something like this:
Private Delegate Function EnumChildFIRSTD elegate (ByVal ....,
ByVal ....) As Boolean
Private Delegate Function EnumChildSECOND Delegate (ByVal ....,
ByVal ....) As Boolean
Private Delegate Function EnumChildTHIRDD elegate (ByVal ....,
ByVal ....) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildFIRSTD elegate,
ByVal ...) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildSECOND Delegate,
ByVal ...) As Boolean
Private Declare Function EnumChildWindow s Lib "user32" _
(ByVal ..., ByVal lpEnumFunc As EnumChildTHIRDD elegate,
ByVal ...) As Boolean
.......... code ...... and, finally
EnumChildWindow s(Me.Handle, AddressOf EnumChildFIRST, 0)
EnumChildWindow s(Me.Handle, AddressOf EnumChildSECOND , 0)
EnumChildWindow s(Me.Handle, AddressOf EnumChildTHIRD, 0)
Hoping my question is clear, I really thank you.
Emilio.