delphi11 FSDK_LoadImageFromHBitmap 从TIMAGE中获取

在 Delphi 中，可以使用 TBitmap 类型来表示图像，可以将 TIMAGE 类型转换为 TBitmap 类型，以便在 Delphi 应用程序中显示和处理图像。以下是将 TIMAGE 转换为 TBitmap 类型的示例代码：

var
  hBitmap: HBITMAP;
  Image: FSDK_IMAGE;
  TImage: TIMAGE;
  Bitmap: TBitmap;
begin
  // 从 Windows GDI 获取位图句柄
  hBitmap := LoadBitmap(hInstance, 'BITMAP_ID');

  // 将 HBITMAP 转换为 FaceSDK 图像
  FSDK_LoadImageFromHBitmap(hBitmap, Image, False);

  // 将 FaceSDK 图像转换为 TIMAGE 类型
  TImage := TIMAGE.Create;
  TImage.Handle := Image.ToHandle;

  // 将 TIMAGE 转换为 TBitmap 类型
  Bitmap := TBitmap.Create;
  Bitmap.Assign(TImage);

  // 在 Delphi 应用程序中显示图像
  Image1.Picture.Bitmap.Assign(Bitmap);

  // 处理图像
  // ...

  // 释放图像资源
  FSDK_FreeImage(Image);
  TImage.Free;
  Bitmap.Free;
end;

请注意，在将 TIMAGE 转换为 TBitmap 类型后，需要使用 TBitmap 的 Assign 方法将 TIMAGE 对象赋值给 TBitmap 对象。在使用完 TBitmap 对象后，需要调用 Free 方法释放资源。