Delphi 安卓添加资源图片并读取

本文整理自网络，侵删。

 
通过 Deployment Manager 添加图片 CHEMICAL.png 和 FACTORY.png
uses System.IOUtils;

procedure TForm1.FormCreate(Sender: TObject);
var
  Path: string;
begin
  Path := TPath.Combine(TPath.GetDocumentsPath, 'CHEMICAL.png');
  if TFile.Exists(Path) then
    Image1.Bitmap.LoadFromFile(Path);
  Path := TPath.Combine(TPath.GetDocumentsPath, 'FACTORY.png');
  if TFile.Exists(Path) then
    Image2.Bitmap.LoadFromFile(Path);
end;


 

相关阅读 >>

Delphi研究之驱动开发篇（四）--使用系统内存堆

Delphi 利用sendinput模拟鼠标键盘

Delphi lockbox 做加密解密

Delphi执行sql提示“不正常地定义参数对象”，“提供了不一致或不完整的信息”错误

Delphi 设置richedit的行间距

Delphi2010新功能:tdirectory.getfiles 支持通配符

Delphi listbox 使用

Delphi 获取安卓手机wifi信息(xe8)

Delphi 一个高效的正整数排序函数

Delphi 使用管道进程间通讯

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 安卓添加资源图片并读取