ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 ievision.dll not loading or initialising

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
Ogaere Posted - Jul 13 2026 : 15:24:36





Below is my code, is there any out of the ordinary that is causing the error. The library ievision.dll is in the application folder:

function TfrmTokenSales.CountFaces(ABitmap: TBitmap): Integer;
var
ieBmp: TIEBitmap;
origImage, workImage: TIEVisionImage;
classifier: TIEVisionCascadeClassifier;
objects: TIEVisionVectorRect;
begin
ieBmp := TIEBitmap.Create;
try
ieBmp.Assign(ABitmap);

// Convert to single-channel grayscale
origImage := ieBmp.GetIEVisionImage();
workImage := IEVisionLib.createImage(origImage.getWidth(),
origImage.getHeight(), ievUINT8, 1);
origImage.convertColor(workImage, ievBGR2GRAY);
workImage.equalizeHistogram();

classifier := IEVisionLib.createCascadeClassifier(IEVC_FRONTAL_FACE_ALT_2);
objects :=classifier.detectObjects(
workImage,
1.05, // scaleFactor
5, // minNeighbors
ievDO_CANNY_PRUNING, // flags
IEVisionSize(workImage.getWidth() div 5,
workImage.getHeight() div 5), // minSize
IEVisionSize(workImage.getWidth(),
workImage.getHeight())); // maxSize

Result := objects.size();
finally
ieBmp.Free; // only the TIEBitmap needs freeing
end;
end;