不知道你的图形是什么格式的,如果是BMP格式,放在Form上设置Image的Transparent为true就行,
下面的代码是在图形不透明的情况下将将白色换成黄色,如果图形是JPG格式,需要先转换
procedure TForm1.Button1Click(Sender: TObject);
var
i,j:integer;
begin
for i:= 0 to Image2.Height-1 do
for j:= 0 to Image2.Width-1 do
begin
if Image2.Canvas.Pixels[j,i]=clWhite then
Image2.Canvas.Pixels[j,i]:=clYellow;
end;
end;