imagelist中的位图格式不一样了

[fbiboss]

img := TBitmap.Create;
ImageList1.GetBitmap(0, img);这样得到的位图跟直接在IMAGE控件中加载的位图不一样,是怎么回事啊?好像文件头没有了?

[kye_jufei]

你要指定它的高度和寬度，像素過大，圖像就失真了。。。修改成32*32試試。。。

[fbiboss]

不是指大小,大小一样,是本来应该BMP的文件头好像变了

[SQLDebug_Fan]

把TImageList的透明属性加上试试。

[fbiboss]

不行啊,就是这个函数提示的

LoadFromStream(Stream : TStream; ABackColor : TBDColor): Boolean;
var
FileHeader : TBitmapFileHeader;
InfoHeader : TBitmapInfoHeader;
begin
//读取文件头
Stream.Read(FileHeader,SizeOf(TBitmapFileHeader));
Stream.Read(InfoHeader,SizeOf(TBitmapInfoHeader));
with FileHeader,InfoHeader do
begin
//确定位图格式
if (bfType<>$4D42) or (biSize<>SizeOf(TBitmapInfoHeader)) or
(biBitCount<>BD_BITCOUNT) or (biCompression<>BI_RGB) then
begin
self.Error:='错误的数据格式！';
result:=false;
exit;
end;

[crackdung]

delphi的图像处理，应该这个是不错。

网站

免费的。



my blog
http://ufo-crackerx.blog.163.com/

[火龙岛主]

IMAGE控件中加载的不是位图？

[fbiboss]

是imagelist,是位图,同样的图放到IMAGE中就正常