Source position: fonctions_images.pas line 112
procedure p_BitmapVersIco(
const aBmp_Bitmap: TBitmap;
const aIco_Destination: TIcon
);