Sub Class_Globals
Private Callback As Object
Private Event As String
End Sub
Public Sub Initialize(CallbackModule As Object, EventName As String)
Dim DataList As List = Array As String("pla.traineddata","man.traineddata","p24.traineddata")
iOCR.Initilize(True,"iOCR",DataList,File.DirDocuments,"pla")
'Initialize imgTransformation
imT.Initialize
Callback = CallbackModule
Event = EventName
End Sub