用数据加载 jbitmap

Loading a jbitmap with data

我正在使用 Delphi 10.2 Tokyo 作为开发工具开发一个 Android 应用程序。为了打印到 Zebra 打印机,我需要将图像作为 JBitmap 发送。我找不到任何关于如何加载 JBitmap 的主题。我有一个 TBitmap 包含图片。我只需要兼顾 JBitmap.

欢迎任何意见。

提前致谢

uses
  Androidapi.JNI.GraphicsContentViewText,
  FMX.Graphics, FMX.Surfaces, FMX.Helpers.Android;

function BitmapToJBitmap(const ABitmap: TBitmap): JBitmap;
var
  LSurface: TBitmapSurface;
begin
  Result := TJBitmap.JavaClass.createBitmap(ABitmap.Width, ABitmap.Height, TJBitmap_Config.JavaClass.ARGB_8888);
  LSurface := TBitmapSurface.Create;
  try
    LSurface.Assign(ABitmap);
    SurfaceToJBitmap(LSurface, Result);
  finally
    LSurface.Free;
  end;
end;