Image aus Imagelist laden, Transparenz , Qualität

[BrunoT]

Hi DP'ler,

ich möchte meine Smilies zur Bewertung aus einer Imagelist laden, kriege aber keinen transparenten Hintergrund und keine Qualität, als wenn ich das Bitmap direkt aus der Datei lade:

Delphi-Quellcode:

  If r>=32 Then
  Imagelist1.GetBitmap(1,Image1.Picture.Bitmap)
  else  Imagelist1.GetBitmap(2,Image1.Picture.Bitmap);
{  If r>=32 Then Image1.Picture.LoadFromFile('Smile.bmp')
  else Image1.Picture.LoadFromFile('Smile2.bmp');         }
  If r>=44 Then Image2.Picture.LoadFromFile('Smile.bmp')
  else Image2.Picture.LoadFromFile('Smile2.bmp');
  If r>=64 Then Image3.Picture.LoadFromFile('Smile.bmp')
  else Image3.Picture.LoadFromFile('Smile2.bmp');
  If r>=82 Then Image4.Picture.LoadFromFile('Smile.bmp')
  else Image4.Picture.LoadFromFile('Smile2.bmp');
  If r>=95 Then Image5.Picture.LoadFromFile('Smile.bmp')
  else Image5.Picture.LoadFromFile('Smile2.bmp');

Das erste Smilie ist aus der Imagelist

Was kann ich tun??