Delphi Android XE7加载位图失败答案

【问题标题】：Delphi Android XE7 Loading Bitmap FailedDelphi Android XE7加载位图失败
【发布时间】：2023-04-03 15:23:01
【问题描述】：

我开发了一个应用程序。它在我的手机上工作得很好，但是当这个应用程序开始在其他手机上工作时它就不能工作了它在显示启动画面后关闭。当我在与其他手机一起使用的手机上进行调试时，我遇到了这个问题，“EBitmapLoadinFailed”“加载位图失败”。我在主窗体的列表框中有一个位图。我在列表框中禁用了位图它的工作我的表单创建代码是，

    procedure Tfrm_login.FormCreate(Sender: TObject);
var
      strdb : String;
begin
 try
 strDB :=System.IOUtils.TPath.GetDocumentsPath + PathDelim + 'user.s3db';
 with con do
  begin
    LoginPrompt                   := False;
    Params.Clear;
    Params.Values['Database']     := strDB;
    Params.Values['DriverID']     := 'SQLite';
    Params.Values['CharacterSet'] := 'utf8';
    Connected                     := True;
  end;
     sqlexe('CREATE TABLE IF NOT EXISTS AYARLAMA('+
            'ID    INTEGER     NOT NULL PRIMARY KEY AUTOINCREMENT,'+
            'TIP   NVARCHAR(50)    NULL,'+
            'DEGER NVARCHAR(255)   NULL)');
 except
   //fdf
 end;

end;

我的表单显示代码，

procedure Tfrm_login.FormShow(Sender: TObject);
begin
try
with myq do
 begin
  sql.Clear;
  sql.Add('SELECT * FROM AYARLAMA WHERE TIP='+''''+'MAIL'+'''');
  Open;
  if RecordCount>0 then
   begin
    first;
    edit_ad.Text:=FieldByName('DEGER').AsString;
   end;
 end;
 except
 /// tyrt
 end;

end;

【问题讨论】：

你需要调试这个。您显示的代码没有位图。 TPath.Combine 是你的朋友 FWIW。
对不起我的英语，但 FWIW 是什么？
您可以使用网络搜索来回答这个问题。永远值得记住这个选项。
谢谢我无法理解“为了什么值得”
在这种情况下，它表示您的主要问题之外的评论。它对解决主要问题没有帮助，但它是一个有用的提示。

标签： android delphi firemonkey delphi-xe7

【解决方案1】：

如果设备是 Android 5.0，我认为安装 Delphi 的 Android 5.0 更新会有所帮助。我已经以这种方式解决了同样的问题。

链接是： http://cc.embarcadero.com/item/30110

【讨论】：