[Lookas007]

Есть Image.Style.Color:=clGray(серый)
загружаю картинку и получаю в серой клетке картинка на белом фоне
Как убрать белый фон?

вариант1
Image.Picture.Bitmap.TransparentColour:=clWhite;
убирает картинку бесследно(остается серая клеть)

вариант2(через з)
for k:=1 to Image.Picture.Width do
for i:=1 to Image.Picture.height do
if Image.Picture.Bitmap.Canvas.Pixels[k,i]=clWindow then
Image.Picture.Bitmap.Canvas.Pixels[k,i]:=clGray;
дает такой же результат

Пожалуйста, подскажие не сложный выход!