怎样把bitmap保存在pas文件里(50分)

  • 主题发起人 主题发起人 Fred2000
  • 开始时间 开始时间
呵呵,怎么可能呢?
你的要求可以换种方式实现:
1、用 TImage 控件,在设计期就把图片 Load 进来,这样的结果是把 Bitmap 保存在 DFM 中。
2、使用资源文件(.RES):
interface
{$R *.RES}
...
LoadBitmap(...);
资源文件可以使用 Tools -> ImageEditor 编辑。

See it ?
From: BaKuBaKu
 
为什么非要放在pas文件中呢?给我个理由先!
我觉得BaKuBaKu的方法是最实用,也最常用的.
非要放的话可以这样试试:
const
cMyBitmap: array of integer = (
$01, $23, $45, $...
...
... $00, $ff);
编个程序事先把你要存的数据一个字节一个字节的按上面的
格式存好,贴到源文件中,作为一个常量数组定义,在你的程
序中按你的意图爱怎么操作就怎么操作把.
 
也可以保存在流文件里!
不知道你所谓的保存在PAS里是什么意思?!
 
1.最简单的方法,放个TImage,属性Visible是True还是False随你便。(程序从头到尾占你点内存吆)
2.作个res随是调用
 
接受答案了.
 
后退
顶部