Transparenz in TImage mit WinXP SP2 versagt ?

[vsti]

Tag,

hier auch nochmal meine Lösung, nicht schön, aber funzt

Delphi-Quellcode:

  Bild:=tbitmap.Create;
  Imagelist1.GetBitmap(0,Bild);
  Bild.Transparent := true;
  Bild.TransparentMode :=  tmFixed;
  Bild.TransparentColor := clWhite;
  dbgrid1.Canvas.Draw(rect.left+3,rect.Top+1,Bild);
  Bild.Free;