It so happened that I actively use Delphi in my work (programming for work, my own open and closed projects) and now I needed to write a program using the open library of computer vision OpenCV. What to do, because officially it is impossible to use OpenCV in Delphi, and moving to C for one program is too long.
But nothing is impossible ...
With a bit of searching on the Internet, I found several projects on using OpenCV in Delphi.
The first ,
second ,
third and most fresh and successful - the
fourth , which I took as a basis.
')
The project on github seemed interesting to me, many OpenCV functions were implemented, there are many examples in Delphi, but the project was abandoned by the author and I had to take on my own.
I have laid out all current developments on
code.google.com/p/opencv-delphi-new
Currently done:
1. Support RAD Studio XE3.
2. Added new features: cvFlip, cvClearMemStorage, cvCreateChildMemStorage, cvRectangle, cvRetrieveFrame, cvIntegral, cvGetPerspectiveTransform, cvWarpPerspective, cvCreateMat
3. Added 6 new examples:
FaceDetect - An example of face detection in a video stream using the Hough transform.
FindContours - Finding the contours of the image.
Integral - Integral Image.
WarpAffine - Image Transformation - Affine Transformations (Rotate the image at an arbitrary angle).
WrapPrespective - Image Transformation - Homography (Perspective Transformation).
MatchShapes - Search for an object in an image by pattern (Comparison of objects by the moments of their contours).
In the added examples I tried to describe in detail all the manipulations for obtaining the desired result.
If someone is interested in the topic of using OpenCV in Delphi, then write me an email or leave comments.
If the topic of using OpenCV is interesting in principle, then I can write a few articles, just write what direction you are interested in using OpenCV.