如何处理图片背景？

Question

遇到个问题，bmp图片的背景是黑色的，我想在显示这个图片时使其背景变为透明，在delphi6中能做到吗？
  delphi6怎么才能使用.gif文件？以上问题请高手指点。

Answer 1

可以设置Mask色为黑色，就没有背景了。
要使用GIF，须安装第三方GIF组件，Delphi本身好像没有支持。
你也可以把GIF转换成AVI后再使用。

Answer 2

TBitmap.TransparentColor:=clBlack;
TBitmap.Transparent:=True;

Answer 3

樓上的辦法只能用于win2000以上
-------------------------------------------------------
1、http://www.eastrise.cn/bbsxp/ShowPost.asp?id=2
2、
var
  Gif :TGIFImage;
begin
  //
  Img_Tag.Picture :=nil;
  Gif :=TGIFImage.Create;
  try
    Gif.LoadFromFile('C:\A.GIF');
    GIF.OptimizeColorMap;
    Img_Tag.Picture.Assign(Gif);
  except
    Gif.Free;
  end;end;

Answer 4

2.也可以使用第三方控件：GifImage

Answer 5

不行，还是不能消除黑色背景。这么说吧，一个bmp图片，在整个黑色矩形背景下中间有一个白色的圆，我想只显示这个白色的圆，不要黑色的背景，delphi可以吗?我用图片编辑器创建一个没有背景的gif图，jpg格式的强加了一个背景。情况就是这样。

Answer 6

可以呀~~我測試過了。
代碼，請看：http://www.eastrise.cn/bbsxp/ShowPost.asp?id=2

Answer 7

To jackie168(玉面書生)：能不能发一个第三方控件：Delphi6 的 GifImage，我下的都不能用