求助图像校验或人脸识别

这个不是VFP的特长吧！

去网站：https://www.
下载 Luxand FaceSDK
可以做人脸的比对、检索、匹配、表情识别、闭眼识别等
他是一个 DLL 文件
有 VB 的示例
我用了5年
原先是 VFP 的
现在 7.2 版出来了
支持 Python
我也换到 Python

如果你想要开源的
有几百个人脸识别库和包
比如 DLib 和 Face++
用 Python 调用
VFP 再调用 Python 的
方法很多

VFP 调用 FaceSDK 函数：

Function Deal

    *!* Initialization functions
    Declare Integer FSDKVB_ActivateLibrary In facesdk-vb.Dll String LicenseKey
    Declare Integer FSDKVB_GetHardware_ID In facesdk-vb.Dll String @HardwareID
    Declare Integer FSDKVB_GetLicenseInfo In facesdk-vb.Dll String @LicenseInfo
    Declare Integer FSDKVB_SetNumThreads In facesdk-vb.Dll Integer Num
    Declare Integer FSDKVB_GetNumThreads In facesdk-vb.Dll Integer @Num
    Declare Integer FSDKVB_Initialize In facesdk-vb.Dll String DataFilesPath
    Declare Integer FSDKVB_Finalize In facesdk-vb.Dll


    *!*    Face detection functions
    Declare Long FSDKVB_DetectEyes In facesdk-vb.Dll Long Image, String @FacialFeatures
    Declare Long FSDKVB_DetectEyesInRegion In facesdk-vb.Dll Long Image, String @facePosition, String @FacialFeatures
    Declare Long FSDKVB_DetectFace In facesdk-vb.Dll Long Image, String @facePosition
    Declare Long FSDKVB_DetectMultipleFaces In facesdk-vb.Dll Long Image, Long @DetectedCount, String @FaceArray, Long MaxSize
    Declare Long FSDKVB_DetectFacialFeatures In facesdk-vb.Dll Long Image, String @FacialFeatures
    Declare Long FSDKVB_DetectFacialFeaturesInRegion In facesdk-vb.Dll Long Image, String @facePosition, String @FacialFeatures
    Declare Long FSDKVB_DetectFacialFeaturesEx In facesdk-vb.Dll Long Image, String @FacialFeatures, Single @ConfidenceLevels
    Declare Long FSDKVB_DetectFacialFeaturesInRegionEx In facesdk-vb.Dll Long Image, String @facePosition, String @FacialFeatures, Single @ConfidenceLevels
    Declare Integer FSDKVB_SetFaceDetectionParameters In facesdk-vb.dll short HandleArbitraryRotations, Short DetermineFaceRotationAngle, Long InternalResizeWidth
    Declare Long FSDKVB_SetFaceDetectionThreshold In facesdk-vb.Dll Long threshold


    *!*    Image manipulation functions
    Declare Integer FSDKVB_CreateEmptyImage In facesdk-vb.Dll Integer @Image
    Declare Integer FSDKVB_LoadImageFromFile In facesdk-vb.dll Long @Image, String FileName

    Declare Integer FSDKVB_LoadImageFromBuffer In facesdk-vb.Dll Integer @Image, String Buffer, Integer Width, Integer Height, Integer ScanLine, String ImageMode
    Declare Integer FSDKVB_LoadImageFromJpegBuffer In facesdk-vb.Dll Integer @Image, String @Buffer, Integer BufferLength
    Declare Integer FSDKVB_LoadImageFromPngBuffer In facesdk-vb.Dll Integer @Image, String @Buffer, Integer BufferLength

    Declare Integer FSDKVB_FreeImage In facesdk-vb.Dll Integer Image

    Declare Integer FSDKVB_SaveImageToFile In facesdk-vb.Dll Integer @Image, String FileName

    Declare Integer FSDKVB_LoadImageFromHBitmap In facesdk-vb.Dll Integer @Image, Integer BitmapHandle
    Declare Integer FSDKVB_SaveImageToHBitmap In facesdk-vb.Dll Integer Image, Integer @BitmapHandle

    Declare Integer FSDKVB_GetImageBufferSize In facesdk-vb.Dll Integer Image, Integer @BufSize, String ImageMode
    Declare Integer FSDKVB_SaveImageToBuffer In facesdk-vb.Dll Integer Image, String Buffer, String ImageMode

    Declare Integer FSDKVB_SetJpegCompressionQuality In facesdk-vb.Dll Integer Quality

    Declare Integer FSDKVB_CopyImage In facesdk-vb.Dll Integer SourceImage, Integer DestImage
    Declare Integer FSDKVB_ResizeImage In facesdk-vb.Dll Integer SourceImage, Double ratio, Integer DestImage
    Declare Integer FSDKVB_MirrorImage In facesdk-vb.Dll Integer Image, Integer UseVerticalInsteadOfHorizontalMirroring
    Declare Integer FSDKVB_RotateImage90 In facesdk-vb.Dll Integer SourceImage, Integer Multiplier, Integer DestImage
    Declare Integer FSDKVB_RotateImage In facesdk-vb.Dll Integer SourceImage, Double angle, Integer DestImage
    Declare Integer FSDKVB_RotateImageCenter In facesdk-vb.Dll Integer SourceImage, Double angle, Double xCenter, Double yCenter, Integer DestImage
    Declare Integer FSDKVB_CopyRect In facesdk-vb.Dll Integer SourceImage, Integer x1, Integer y1, Integer x2, Integer y2, Integer DestImage
    Declare Integer FSDKVB_CopyRectReplicateBorder In facesdk-vb.Dll Integer SourceImage, Integer x1, Integer y1, Integer x2, Integer y2, Integer DestImage

    Declare Integer FSDKVB_GetImageWidth In facesdk-vb.Dll Integer SourceImage, Integer @Width
    Declare Integer FSDKVB_GetImageHeight In facesdk-vb.Dll Integer SourceImage, Integer @Height

    *!*    removed from the library :
    *!*    Declare Integer FSDKVB_ExtractFaceImage In facesdk-vb.Dll Integer Image, String @FacialFeatures, Integer Width, Integer Height, Integer @ExtractedFaceImage, String @ResizedFeatures


    *!*    Matching
    Declare Long FSDKVB_GetFaceTemplate In facesdk-vb.Dll Long Ima, String @FaceTemplate
    Declare Long FSDKVB_GetFaceTemplateInRegion In facesdk-vb.Dll Long Image, String @facePosition, String @FaceTemplate
    Declare Long FSDKVB_GetFaceTemplateUsingFeatures In facesdk-vb.Dll Long Image, String @FacialFeatures, String @FaceTemplate
    Declare Long FSDKVB_GetFaceTemplateUsingEyes In facesdk-vb.Dll Long Image, String @eyeCoords, Byte FaceTemplate
    Declare Long FSDKVB_MatchFaces In facesdk-vb.dll String @FaceTemplate1, String @FaceTemplate2, Single @Similarity
    Declare Long FSDKVB_GetMatchingThresholdAtFAR In facesdk-vb.Dll Single FARvalue, Single @Threshold
    Declare Long FSDKVB_GetMatchingThresholdAtFRR In facesdk-vb.Dll Single FRRValue, Single @Threshold
*!*     Function FSDKVB_GetMatchingThresholdAtFAR(ByVal FARValue As Single, ByRef Threshold As Single) As Long
*!*        Declare Long FSDKVB_GetMatchingThresholdAtFAR In facesdk-vb.Dll Integer FARvalue, Integer Threshold
*!*        Declare Long FSDKVB_GetMatchingThresholdAtFRR In facesdk-vb.Dll Integer FRRValue, Integer Threshold
    Declare Long FSDKVB_GetDetectedFaceConfidence In facesdk-vb.Dll Long @Confidence


    *!*    Webcam
    Declare Integer FSDKVB_InitializeCapturing In facesdk-vb.Dll
    Declare Integer FSDKVB_FinalizeCapturing In facesdk-vb.Dll
    Declare Integer FSDKVB_SetCameraNaming In facesdk-vb.Dll String UseDevicePathAsName
    Declare Integer FSDKVB_GetCameraList In facesdk-vb.Dll String @VCameraList, Integer @CameraCount
    Declare Integer FSDKVB_GetCameraListEx In facesdk-vb.Dll String @VCameraNameList, String @VCameraDevicePathList, Integer @CameraCount
    Declare Integer FSDKVB_GetVideoFormatList In facesdk-vb.Dll String cameraName, String @VVideoFormatList, Integer @VideoFormatCount
    Declare Integer FSDKVB_SetVideoFormat In facesdk-vb.Dll String cameraName, String @VideoFormat
    Declare Integer FSDKVB_OpenVideoCamera In facesdk-vb.Dll String cameraName, Integer @cameraHandle
    Declare Integer FSDKVB_CloseVideoCamera In facesdk-vb.Dll Integer cameraHandle
    Declare Integer FSDKVB_GrabFrame In facesdk-vb.Dll Integer cameraHandle, Integer @Image
    Declare Integer FSDKVB_Paint In facesdk-vb.Dll Integer DC, Integer @Image

    Declare Integer FSDKVB_OpenIPVideoCamera In facesdk-vb.Dll String CompressionType, String URL, String Username, String Password, Integer TimeoutSeconds, Integer @cameraHandle

    Declare Integer FSDKVB_SetHTTPProxy In facesdk-vb.Dll String ServerNameOrIPAddress, Integer Port, String Username, String Password


    *!*    Tracker
    Declare Integer FSDKVB_CreateTracker In facesdk-vb.Dll Integer @Tracker
    Declare Integer FSDKVB_FreeTracker In facesdk-vb.Dll Integer Tracker
    Declare Integer FSDKVB_ClearTracker In facesdk-vb.Dll Integer Tracker
    Declare Integer FSDKVB_SetTrackerParameter In facesdk-vb.Dll Integer Tracker, String ParameterName, String ParameterValue
    Declare Integer FSDKVB_SetTrackerMultipleParameters In facesdk-vb.Dll Integer Tracker, String Parameters, Integer @ErrorPosition
    Declare Integer FSDKVB_GetTrackerParameter In facesdk-vb.Dll Integer Tracker, String ParameterName, String ParameterValue, Double MaxSizeInBytes
    Declare Integer FSDKVB_FeedFrame In facesdk-vb.Dll Integer Tracker, Double CameraIdx, Integer Image, Double @FaceCount, Double @IDs, Double MaxSizeInBytes
    Declare Integer FSDKVB_GetTrackerEyes In facesdk-vb.Dll Integer Tracker, Double CameraIdx, Double Id, String @FacialFeatures
    Declare Integer FSDKVB_GetTrackerFacialFeatures In facesdk-vb.Dll Integer Tracker, Double CameraIdx, Double Id, String @FacialFeatures
    Declare Integer FSDKVB_GetTrackerFacePosition In facesdk-vb.Dll Integer Tracker, Double CameraIdx, Double Id, String @facePosition
    Declare Integer FSDKVB_LockID In facesdk-vb.Dll Integer Tracker, Double Id
    Declare Integer FSDKVB_UnlockID In facesdk-vb.Dll Integer Tracker, Double Id
    Declare Integer FSDKVB_PurgeID In facesdk-vb.Dll Integer Tracker, Double Id
    Declare Integer FSDKVB_GetName In facesdk-vb.Dll Integer Tracker, Double Id, String Name, Double MaxSizeInBytes
    Declare Integer FSDKVB_GetAllNames In facesdk-vb.Dll Integer Tracker, Double Id, String Names, Double MaxSizeInBytes

    Declare Integer FSDKVB_SetName In facesdk-vb.Dll Integer Tracker, Double Id, String Name
    Declare Integer FSDKVB_GetIDReassignment In facesdk-vb.Dll Integer Tracker, Double Id, Double @ReassignedID
    Declare Integer FSDKVB_GetSimilarIDCount In facesdk-vb.Dll Integer Tracker, Double Id, Double @Count
    Declare Integer FSDKVB_GetSimilarIDList In facesdk-vb.Dll Integer Tracker, Double Id, Double SimilarIDList, Double MaxSizeInBytes
    Declare Integer FSDKVB_SaveTrackerMemoryToFile In facesdk-vb.Dll Integer Tracker, String FileName
    Declare Integer FSDKVB_LoadTrackerMemoryFromFile In facesdk-vb.Dll Integer Tracker, String FileName
    Declare Integer FSDKVB_GetTrackerMemoryBufferSize In facesdk-vb.Dll Integer Tracker, Double @BufSize
    Declare Integer FSDKVB_SaveTrackerMemoryToBuffer In facesdk-vb.Dll Integer Tracker, String @Buffer, Double MaxSizeInBytes
    Declare Integer FSDKVB_LoadTrackerMemoryFromBuffer In facesdk-vb.Dll Integer Tracker, String @Buffer


    *!*    Facial attributes
    Declare Integer FSDKVB_GetTrackerFacialAttribute In facesdk-vb.Dll Integer Tracker, Double CameraIdx, Double Id, String AttributeName, String AttributeValues, Double MaxSizeInBytes
    Declare Integer FSDKVB_DetectFacialAttributeUsingFeatures In facesdk-vb.Dll Integer Image, String @FacialFeatures, String AttributeName, String @AttributeValues, Double MaxSizeInBytes
    Declare Integer FSDKVB_GetValueConfidence In facesdk-vb.Dll String AttributeValues, String Value, Single @Confidence

Endfunc

大佬能放实例吗？