关于提取图标的问题？？？ExtractIcon问题？？？？？？？？？？？？？？？？？？？

看这个代码：
var
  hh:ticon;
begin
  hh:=ticon.create;
  try
    hh.handle:=extracticon(hinstance,pchar('c:\xxx.exe'),1);
    hh.savetofile('c:\1.ico');
  finally
    hh.free;
  end;
end;这样获得的图标只有１６种颜色，如何解决？如何判断16*16,32*32大小的图标呢？
如何获得高颜色的图标呢？256色？？？？？？？？？？？？？？？如果最新的xp图标包含128*128,64*64,32*32,16*16中图标，如何释放呢？