Hi,
ich habe zuhause eine Funktion, die ich Dir am späten Nachmittag zur Verfügung stellen kann. Sie basiert darauf, dass ein TBitmap eine Canvas bereits stellt, auf die man das TIcon zeichnen kann. Vorher noch mit TBitmap.Width / TBitmap.Height die Größe angepasst, die Farbtiefe im Zweifelsfall lieber etwas zu hoch gewählt und schon geht's los
Grüße,
Daniel
Daniel R. Wolf