2
Мое приложение XE4 отлично работает на выигрыше, но не загружает растровое изображение в iOS. Файл существует (проверен в окне терминала), и Findfirst находит его. Я не получаю исключения в iOS, но если файл не существует в win, я получаю исключение, поэтому проверяется «IsEmpty», который возвращает true в iOS.Delphi XE4 iOS Загрузка растрового изображения - файл не загружен
Итак, какие-либо подсказки относительно того, почему он не загружает файл, который существует и не создает исключение?
Cheers.
{$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}