delphi11 FSDK_MatchFaces jpg对比代码

以下是 Delphi11 中使用 FSDK_MatchFaces 进行 JPG 图片比对的示例代码：

uses
  LuxandFaceSDK; //引入 LuxandFaceSDK 单元

procedure TForm1.MatchFaces;
var
  Image1, Image2: HBITMAP;
  FaceTemplate1, FaceTemplate2: FSDK_FaceTemplate;
  Similarity: Double;
begin
  //加载并解码两张 JPG 图片为 Bitmap 格式
  Image1 := LoadBitmapFromFile('image1.jpg');
  Image2 := LoadBitmapFromFile('image2.jpg');

  try
    //用两张图片提取人脸模板
    FSDK_GetFaceTemplate(Image1, FaceTemplate1);
    FSDK_GetFaceTemplate(Image2, FaceTemplate2);

    //比较两个人脸模板的相似度
    FSDK_MatchFaces(FaceTemplate1, FaceTemplate2, Similarity);

    //将结果显示在 Label1 中
    Label1.Caption := Format('Similarity: %f', [Similarity]);
  finally
    //释放位图资源
    DeleteObject(Image1);
    DeleteObject(Image2);
  end;
end;

注意，这段代码需要 LuxandFaceSDK 的支持，你需要先安装 LuxandFaceSDK 并将其添加到你的 Delphi 项目中。