delphi小问题,帮忙看看?


我要获得系统当前运行程序(窗口)的图标,并把它们加到imaglist里去,我是这个做的: 
用GetClassLong(TopHdl,GCL_HICONSM)得到图标的句Hicon,再用Imagelist_addIcon(Imglist.Handle,HIcon);把图标加进Imglist,里. 
问题是,只能得到一部分窗口的图标,还有一部分得不到. 
请问是怎么回事,谢谢!