Delphi XE5 for android无法复制System.StartUpCopy中的资产

Question

我正在使用Delphi XE5和Firemonkey的IOS和Android应用程序。 在IOS上，应用程序运行良好，无法在Android上启动。 原因是在启动阶段，它在System.StartUpCopy.pas单元中失败。

我有一些与应用程序一起部署的文件（多媒体内容和XML）。 虽然所有这些都在IOS上被复制好，但其中一些在Android上失败了。 部署配置是使用Delphi中的Deployment Manager完成的。

• 以下是可以的： assets / internal / profiles / default.xml
• 但是这个失败了： assets / internal / media / images / concert / object4.png

它在运行此代码的第97行的“System.StartUpCopy”内失败

ReadCount := AAsset_read(LAssetFile, @Buffer[0], MAX_BUFF_LEN);

但问题是它获得“LAssetFile”的地方有点高

LAssetFile := AAssetManager_open(LAssetManager, M.AsUtf8(OrigFileName).ToPointer, AASSET_MODE_BUFFER);

“AAssetManager_open”返回nil 。 为什么我不知道，因为我不知道如何从API获取一些错误代码。 整个代码块看起来像这样

function CopyAssetToFile(LAssetManager: PAAssetManager; const AssetFolder, AssetName: string;
              const DestinationRoot, DestFolder, FileName: string): Boolean;
var
  OrigFileName,
  DestFileName,
  DestinationPath: string;
  ReadCount, WriteCount: Integer;
  LAssetFile: PAAsset;
  FileHandle: THandle;
  Buffer: TBytes;
  M: TMarshaller;
begin
  Result := True;

  if AssetFolder = '' then
    OrigFileName := AssetName
  else
    OrigFileName := IncludeTrailingPathDelimiter(AssetFolder) +  AssetName;

  if DestFolder <> '' then
  begin
    DestinationPath := IncludeTrailingPathDelimiter(DestinationRoot) + DestFolder;
    DestFileName := IncludeTrailingPathDelimiter(DestinationRoot) + IncludeTrailingPathDelimiter(DestFolder) + FileName;
  end
  else
  begin
    DestinationPath := DestinationRoot;
    DestFileName := IncludeTrailingPathDelimiter(DestinationRoot) + FileName
  end;

  if not FileExists(DestFileName) then //do not overwrite files
  begin
    // Second Create an intermediate buffer.
    SetLength(Buffer, MAX_BUFF_LEN);
    LAssetFile := nil;
    try
      if not DirectoryExists(DestinationPath) then
      begin
        if not ForceDirectories(DestinationPath) then
        begin
          Exit(False);
        end;
      end;
      // We have a valid AssetManager. Start
      LAssetFile := AAssetManager_open(LAssetManager, M.AsUtf8(OrigFileName).ToPointer, AASSET_MODE_BUFFER);
      FileHandle := FileCreate(DestFileName);
      try
        if FileHandle = THandle(-1) then
        begin
          Exit(False);
        end;
        repeat
          ReadCount := AAsset_read(LAssetFile, @Buffer[0], MAX_BUFF_LEN);
          WriteCount := FileWrite(FileHandle, Buffer, 0, ReadCount);
        until (ReadCount <= 0) or (ReadCount <> WriteCount);

      finally
        FileClose(FileHandle);
      end;
    finally
      if (LAssetFile <> nil) then
        AAsset_close(LAssetFile);
      SetLength(Buffer, 0);
    end;
  end;
end;

这是原始的XE5代码。 现在，我看到ok文件和失败文件之间的唯一区别是目录深度。 第一个只有一个级别深度，例如。 一个目录，另一个有3个深度。 我有一些其他文件也复制好，所有只有一级目录深度。

任何人都知道这里可能有什么问题。 我无法进一步调试，因为我已尽可能地深入调试。

如果它有助于我在实际设备上测试三星Galaxy Nexus。

编辑：

发现如果我改变：

资产/内部/媒体/图像/演唱/ object4.png

至

资产/内部/媒体/图像/演唱/ object.png

然后它工作。 WTF。 有什么解释吗？ 我看了，数字应该是android和资产文件名的有效字符