Delphi上的大位图

我想用代码创建大型Bitmap

LargeBmp := TBitmap.Create;
  try
    LargeBmp.Width := 1000; // fine 
    LargeBmp.Height := 15000; // XP - EOutOfResources,Not enough memory,Win 7 - works fine
    ...
  finally
    FreeAndNil(LargeBmp);
  end;

此代码在Windows XP上引发EOutOfResources异常并显示消息“内存不足”,但在Windows 7中正常工作.

怎么了？为什么内存不足？它只有60 MB.

解决方法

设置像素格式如下：

LargeBmp.PixelFormat := pf24Bit;

我有几次同样的问题,总能解决它.

原文地址：https://www.jb51.cc/delphi/102014.html