怎样修改窗体（或者Screen）的缺省光标？？

Question

如题

Answer 1

窗口只要
screen.cursors[1]:=loadcursor(.....
button1.cursor:=1;
form1.cursor:=1;

Answer 2

screen.cursor :=crHourGlass;  //--漏斗
...
screen.cursor:=crdefault;    //--默认

Answer 3

我按你的说法做了：
　　screen.cursors[1000]:=loadcursor(0,pchar(32514));//32514));// 32761));// 32514));   screen.cursor:=1000;
  cursor:=1000;结果，当值为 32514（动态的沙漏形）时，光标明显有改变。 而设为 32761（手形），光标根本没出现改变。
这是为什么呢？？

Answer 4

标题栏的光标是系统不光标，有相关API的~~~