Question

我有一个功能，用他们的图标来安装Android安装的应用程序。该函数提取Jdrawable并将其转换为Jbitmap（并且为了测试此函数我将此jbitmap保存到文件并且一切正常）但是如果我尝试将此jbitmap转换为Tbitmap，则此行有访问冲突：

如果Result.Map（TMapAccess.maWrite，BitmapData）则

function JBitmapToBitmap(const AImage: JBitmap): TBitmap;
var
  ImageData: TJavaArray<Integer>;
  BitmapData: TBitmapData;
  Width, Height: Integer;
begin
  Assert(AImage <> nil);
  Width := AImage.getWidth;
  Height := AImage.getHeight;
  ImageData := TJavaArray<Integer>.Create(Width * Height);
  AImage.getPixels(ImageData, 0, Width, 0, 0, Width, Height);
  if Result.Map(TMapAccess.maWrite, BitmapData) then    <--- access violation
  try
    Result := TBitmap.Create(Width, Height);
    Move(ImageData.Data^, BitmapData.Data^, Width * Height * SizeOf(Integer));
  finally
    Result.Unmap(BitmapData);
  end
  else
    Result := nil;
end;

我确信jBitmap没有损坏，因为如果我保存到文件Jbitmap，我可以看到它很好。

提前致谢

Answer 1

您应该在Map方法调用之前创建Result对象

位图转换delphi xe5

1 个答案: