delphixe LuxandFaceSDK FSDK_MatchFaces 人脸对比

`delphixe LuxandFaceSDK FSDK_MatchFaces` 是 Delphi 的一个函数调用，用于基于 LuxandFaceSDK 实现的人脸对比功能。LuxandFaceSDK 是一个用于人脸识别和人脸检测的软件开发工具包，可以在 Delphi、C++、C# 等多种编程语言中使用。`FSDK_MatchFaces` 则是 LuxandFaceSDK 中用于人脸对比的函数之一，其作用是比较两张人脸图像的相似程度。

相关问题

delphixe LuxandFaceSDK FSDK_MatchFaces 人脸对比代码

以下是一个使用 Delphi 和 LuxandFaceSDK 实现的人脸对比代码示例：

uses LuxandFaceSDK;

function CompareFaces(Image1, Image2: TBitmap): Integer;
var
  hImage1, hImage2: HBITMAP;
  FaceTemplate1, FaceTemplate2: TFaceTemplate;
  Similarity: Single;
begin
  // 将 Bitmap 转换为 HBITMAP
  hImage1 := ConvertBitmapToHBITMAP(Image1);
  hImage2 := ConvertBitmapToHBITMAP(Image2);

  // 提取人脸模板
  if FSDK_GetFaceTemplateInRegion(hImage1, FSdkFaceDetectionMode, 0, 0, 0, 0, FaceTemplate1) <> FSDKE_OK then begin
    Result := -1;
    Exit;
  end;
  if FSDK_GetFaceTemplateInRegion(hImage2, FSdkFaceDetectionMode, 0, 0, 0, 0, FaceTemplate2) <> FSDKE_OK then begin
    FSDK_FreeFaceTemplate(FaceTemplate1);
    Result := -1;
    Exit;
  end;

  // 对比人脸相似度
  if FSDK_MatchFaces(FaceTemplate1, FaceTemplate2, Similarity) <> FSDKE_OK then begin
    FSDK_FreeFaceTemplate(FaceTemplate1);
    FSDK_FreeFaceTemplate(FaceTemplate2);
    Result := -1;
    Exit;
  end;

  FSDK_FreeFaceTemplate(FaceTemplate1);
  FSDK_FreeFaceTemplate(FaceTemplate2);

  // 返回相似度
  Result := Round(Similarity * 100);
end;

这段代码包含一个名为 `CompareFaces` 的函数，可以将两个 `TBitmap` 类型的图像进行人脸对比，并返回相似度的百分比。在使用前，需要先调用 `FSDK_ActivateLibrary` 函数激活 LuxandFaceSDK。

delphixe LuxandFaceSDK8 FSDK_MatchFaces 人脸对比代码

以下是使用Delphi和LuxandFaceSDK8进行人脸对比的示例代码：

uses LuxandFaceSDK;

function MatchFaces(const filename1, filename2: string): double;
var
  img1, img2: HBITMAP;
  faceCount1, faceCount2: integer;
  faceCoords1, faceCoords2: PFSDK_FaceCoords;
  i: integer;
  score: double;
begin
  img1 := LoadImage(filename1);
  img2 := LoadImage(filename2);
  
  FSDK_DetectFaces(img1, @faceCount1, @faceCoords1);
  FSDK_DetectFaces(img2, @faceCount2, @faceCoords2);
  
  if (faceCount1 = 0) or (faceCount2 = 0) then
  begin
    Result := -1;
    Exit;
  end;
  
  score := 0;
  for i := 0 to faceCount1 - 1 do
  begin
    score := score + FSDK_MatchFaces(img1, @faceCoords1[i], img2, @faceCoords2[0]);
  end;
  score := score / faceCount1;
  
  Result := score;
  
  FreeImage(img1);
  FreeImage(img2);
  FSDK_FreeFaceCoords(faceCoords1);
  FSDK_FreeFaceCoords(faceCoords2);
end;

该函数接受两个文件名作为参数，加载图像并检测其中的面孔。然后，它将每个面孔与第二个图像中的第一个面孔进行匹配，并计算所有匹配的平均值。如果无法检测到任何面孔，则返回-1。请注意，此代码假定您已正确初始化LuxandFaceSDK8库。