Icons von Imagelist haben weissen Rand :(

**Pseudemys Nelsoni**

hoi,

ich lade hiermit icons aus der imagelist in ein image:

Delphi-Quellcode:

			procedure GetIco(ImL: TImageList; Im: Timage; i: integer);

var

  ico: TIcon;

begin

  ico := TIcon.Create;

  Try

    Iml.GetIcon(i, ico);

    Im.Picture.Icon.Assign(ico);

  finally

    ico.Free;

  end;

end;

rufe es dann mit:

GetIco(Form2.ImageList1, Form2.image1, 0); auf...

http://www.angelfire.com/bug/delphi/icon.JPG

aber irgendwie ist die transparenz weg und wird durch weiss ersetzt.... gibts ne möglichkeit das mit transparenz hinzubekommen?

Icons von Imagelist haben weissen Rand :(

Icons von Imagelist haben weissen Rand :(

Forumregeln