2

我的 XE4 应用程序在 win 上运行良好，但无法在 iOS 中加载位图。该文件确实存在（已在终端窗口中检查）并且 Findfirst 的东西找到了它。我在 iOS 中没有异常，但如果文件在 win 中不存在，我会得到异常，因此在 iOS 中返回 true 的“IsEmpty”检查。

那么，关于它为什么不加载存在的文件并且不引发异常的任何线索？

干杯。

{$IFDEF MSWINDOWS}
  if FindFirst('.\*.*', faAnyFile, SR) = 0 then
  repeat
    showmessage(SR.Name);
  until FindNext(SR) <> 0;
  FindClose(SR);

  imgImage.Bitmap.LoadFromFile('.\'+'myfile.gif');

{$ELSE}
  if FindFirst(GetHomePath + PathDelim + Application.Title + '.app' + PathDelim+'*.*', faAnyFile, SR) = 0 then
  repeat
    showmessage(SR.Name);
  until FindNext(SR) <> 0;
  FindClose(SR);

  imgImage.Bitmap.LoadFromFile(GetHomePath + PathDelim + Application.Title + '.app' + PathDelim + 'myfile.gif');

{$ENDIF}
4

1 回答 1

2

对delphi单元进行了一些调试，似乎不支持iOS gif。这很可能是一个错误，但回答了我的问题！

于 2013-06-21T13:43:40.063 回答