小编Met*_*tre的帖子

Delphi没有正确编写我的文件头

我认为不是使用带有8位BMP的TImage而是保存我自己的Bitmap - 我之前已经用Delphi做了几次.但由于某些原因我无法弄清楚,文件的前两个字节总是写为四个字节!我的标题记录是

type
 BitmapH = Record
  head : WORD;
  filesize : DWORD;
  reserved : DWORD;
  bmpoffset : DWORD;
  bmpheadersize : DWORD;
  width : DWORD;
  height : DWORD;
  planes : WORD;
  bpp : word;
  comp : longint;
  bmdatasize : longint;
  hres : longint;
  vres : longint;
  numofcolors : longint;
  importantcolors : longint;
  palette : array[0..1023] of byte;
 end;
Run Code Online (Sandbox Code Playgroud)

我已经尝试过将其更改为2字节数组仍然没有去.即使它改为head:byte; 它仍然写入1个字节,然后将垃圾推送到下一个3.我必须遗漏一些简单的东西!

这是我写文件头的方式 -

var BM : file of BitmapH;
var BMD : file of byte;
var header : BitmapH;
var i …
Run Code Online (Sandbox Code Playgroud)

delphi file-io bitmap

1
推荐指数
1
解决办法
272
查看次数

标签 统计

bitmap ×1

delphi ×1

file-io ×1