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 外挂编写的几个api函数

Delphi windows 编程[9] - wm_close 消息

Delphi rect()

Delphi windows xp下屏蔽ctrl_alt_del键的方法

Delphi 替换系统文件实现绕过杀软启动

Delphi xe tparallel.for循环

Delphi 如何快速读写文件中的字符串

Delphi idhttp的基本用法

dekphi qq自动发消息源码

Delphi disable_uac_vista

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

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