让彩色光标出现在Delphi程序中

在Delphi中用Loadcursor()得到的光标只有黑白两色，怎样在程序中得到彩色光标呢？笔者尝试制作了以下程序：
方法一 用Loadcursorfromfile()从外部调入图标作为光标
Loadcursorfromfile()函数可以读＊