我打开一些关于游戏的delphi代码 看到里面部分图片是用十六进制代码来表示图片的但是我在只有这些十六进制代码的时候怎么可以还原为图片资源呢?十六进制例下
Picture.Data = {
07544269746D617036010000424D360100000000000076000000280000001200
0000100000000100040000000000C00000000000000000000000100000000000
000000000000000080000080000000808000800000008000800080800000C0C0
C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
FF00333333333333333333000000333333300033333333000000333330088800
33333300000033300887888800333300000030088777888888003300000038F7
777F888888880300000038F77FF7778888880300000038FFF779977788880300
000038F77AA777770788030000003388F77777FF070033000000333388F8FFFF
F0333300000033333388FFFFFF0333000000333333338FFFFFF0030000003333
333338FFF8833300000033333333338883333300000033333333333333333300
0000}
Picture.Data = {
07544269746D617036010000424D360100000000000076000000280000001200
0000100000000100040000000000C00000000000000000000000100000000000
000000000000000080000080000000808000800000008000800080800000C0C0
C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
FF00333333333333333333000000333333300033333333000000333330088800
33333300000033300887888800333300000030088777888888003300000038F7
777F888888880300000038F77FF7778888880300000038FFF779977788880300
000038F77AA777770788030000003388F77777FF070033000000333388F8FFFF
F0333300000033333388FFFFFF0333000000333333338FFFFFF0030000003333
333338FFF8833300000033333333338883333300000033333333333333333300
0000}
解决方案 »
- delphi+access 在一个表中想把一个字段改为关键字,并且设置默认值为-1
- 在本机上运行可以,在别的机子上怎么就不行了呢。
- 这个sql语句怎么写啊
- wps office 2005 竟然是用 delphi写的!!!
- 高手请帮忙, 关于cxTreeList的问题
- 各位大虾,请问在Delphi7中,通过Rave Reports5.0 做的报表,打印时,如何才能不让出现打印预览,用rvproject1.Execute好像解决不了。
- 如何把n张连续的图片合成电影文件!
- 怎样得到良好的键盘按下连续响应
- 资源管理器完蛋了
- 求大侠,急救,socket 多线程问题
- delphi编译错误求助
- Treeview 如何取得每一葉子(末端結點)的路徑呢
1、程序
从data数据的某个起始处(和图片格式有关)起,将全部数据保存到一个二进制文件。比如这里是bmp格式,将424D3601……全部保存到xx.bmp:var
S: string;
B: Byte;
F: TFileStream;
……
//424D3601……复制给S
for I := 1 to Length(S) do
begin
B := StrToInt('$' + Copy(S, I*2-1, 2));
F.Write('d:\xx.bmp');
end;
F.Free;
2、手工
在Form放一个TImage,邮件“view as text”,将data数据直接复制到Picture.Data,然后“view as form”,在TImage的编辑界面中就可以保存此图片了
可惜本人小白一个 怎么才可以保存为二进制文件啊?
要能更加详细说明下就好了谢谢