Hi, I have a lot of experience in vb6, so any help will be appreciated ..
Biblioteca.dll an alert, get a camera by stream. When this library can identify a particular object, it creates several events, one of them would be a bitmap.
However I can work with all events but can not save this bitmap file, says it is incompatible ...
Could someone help me, the part of the code below:
Recalling that has no documentation in the library, just use references so my doubts ...
I'm glad to wait for the help of each, will always be welcome.
Tanks.
Biblioteca.dll an alert, get a camera by stream. When this library can identify a particular object, it creates several events, one of them would be a bitmap.
However I can work with all events but can not save this bitmap file, says it is incompatible ...
Could someone help me, the part of the code below:
Code:
Private Sub Video_FrameReceived(Index As Integer, ByVal hBitmap As stdole.OLE_HANDLE) 'Event to receive the FRAMES
Call ANPR(Index).ReadFromBitmap(hBitmap, 0) ''Calling the function that will search the object in the frame
Dim plates As PlateCollection
pcount = ANPR(Index).plates.Count
If pcount > 0 Then 'Here he compares and verifies that an object found
For I = 0 To pcount - 1 ' Here it checks how many objects found
If ANPR(Index).plates.Item(I).Text Like "[A-Z][A-Z][A-Z]####" = True Then ' here a simplex filter to keep out unwanted objects or patterns
Text3(Index) = ANPR(Index).plates.Item(I).Text & "---" & Video(Index).FrameReceivedType ' save objeto to text
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'here me he should return the bitmap, and save to picture ... just this time I'm not getting run ..
ANPR(Index).plates.Item(Index).Bitmap
Recalling that has no documentation in the library, just use references so my doubts ...
Tanks.I'm glad to wait for the help of each, will always be welcome.
Tanks.