L landa8888 Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-13 #1 如何让JPG图片背景透明,如果不能透明背景变白色也可,能否用DELPHI编程实现.
T TYZhang Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-13 #3 jpg图很难操作,可以先转成BMP图,改完后再存为JPG图。
Q qnaqbgss Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-14 #5 uses jpeg; var myjpeg:tjpegimage; bmp1:Tbitmap; begin myjpeg:=tjpegimage.create; bmp1:=tbitmap.create; myjpeg.loadfromfile('你的文件'); bmp1.assign(myjpeg);//////// image1.picture.bitmap.assign(bmp1);///////把图片赋给IMAGE控件 image1.Picture.Bitmap.TransparentColor:=clwhite////clwhite是透明色 image1.Transparent:=true;///透明 image1.refresh; bmp1.free; myjpeg.free; end;
uses jpeg; var myjpeg:tjpegimage; bmp1:Tbitmap; begin myjpeg:=tjpegimage.create; bmp1:=tbitmap.create; myjpeg.loadfromfile('你的文件'); bmp1.assign(myjpeg);//////// image1.picture.bitmap.assign(bmp1);///////把图片赋给IMAGE控件 image1.Picture.Bitmap.TransparentColor:=clwhite////clwhite是透明色 image1.Transparent:=true;///透明 image1.refresh; bmp1.free; myjpeg.free; end;
L landa8888 Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-15 #6 to:qnaqbgss, 按你的方法做了,可惜不行,不知道是不是我哪里搞错了?
Q qnaqbgss Unregistered / Unconfirmed GUEST, unregistred user! 2004-05-15 #7 你QQ多少?我发例子给你。 我的QQ:15104368