[eXplorer]

Всем привет! Подскажите, никак не получается извлечь ico из dll или exe файла, размером больше чем 32x32px... скорее всего надо масштабировать... незнаю как

Процедура:

var
Icon:Ticon;
bmp:Tbitmap;
begin
Icon:=Ticon.create;
Bmp:=Tbitmap.create;
Icon.handle:=ExtractIcon(hInstance, 'proga.exe', 0);
Bmp.width:=icon.width;
Bmp.height:=icon.height;
Bmp.Canvas.Draw(0, 0, icon);
Icon.Free;
end;