各位大大請問一下CreateCursor API要如何使用    ************************************************************       這段引述不會使用.如有前輩會請指教     CONST VOID *pvANDPlane,        // pointer to AND bitmask array     CONST VOID *pvXORPlane         // pointer to XOR bitmask array ***********************************************************    help 說明 但不是很了    HCURSOR CreateCursor(     HINSTANCE hInst,        // handle to application instance     int xHotSpot,        // horizontal position of hot spot     int yHotSpot,        // vertical position of hot spot     int nWidth,        // cursor width     int nHeight,        // cursor height     CONST VOID *pvANDPlane,        // pointer to AND bitmask array     CONST VOID *pvXORPlane         // pointer to XOR bitmask array    );            < >< >

Hi, 請參考: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/winui/WinUI/WindowsUserInterface/Resources/Cursors/UsingCursors.asp http://web.my8d.net/aw/api/CreateCursor.htm

自己解題 範例程式碼如下    const   MyCursor = 1; procedure TForm1.FormCreate(Sender: TObject);  var   Am,Xm: array[0..127]of Byte;   cur: HCURSOR; begin      Am[  0]:=$7F;  Am[  1]:=$FF;  Am[  2]:=$FF;  Am[  3]:=$FF;   Am[  4]:=$3F;  Am[  5]:=$FF;  Am[  6]:=$FF;  Am[  7]:=$FF;   Am[  8]:=$1F;  Am[  9]:=$FF;  Am[ 10]:=$FF;  Am[ 11]:=$FF;   Am[ 12]:=$0F;  Am[ 13]:=$FF;  Am[ 14]:=$FF;  Am[ 15]:=$FF;   Am[ 16]:=$07;  Am[ 17]:=$FF;  Am[ 18]:=$FF;  Am[ 19]:=$FF;   Am[ 20]:=$03;  Am[ 21]:=$FF;  Am[ 22]:=$FF;  Am[ 23]:=$FF;   Am[ 24]:=$01;  Am[ 25]:=$FF;  Am[ 26]:=$FF;  Am[ 27]:=$FF;   Am[ 28]:=$00;  Am[ 29]:=$FF;  Am[ 30]:=$FF;  Am[ 31]:=$FF;   Am[ 32]:=$00;  Am[ 33]:=$7F;  Am[ 34]:=$FF;  Am[ 35]:=$FF;   Am[ 36]:=$00;  Am[ 37]:=$3F;  Am[ 38]:=$FF;  Am[ 39]:=$FF;   Am[ 40]:=$00;  Am[ 41]:=$1F;  Am[ 42]:=$FF;  Am[ 43]:=$FF;   Am[ 44]:=$00;  Am[ 45]:=$0F;  Am[ 46]:=$FF;  Am[ 47]:=$FF;   Am[ 48]:=$00;  Am[ 49]:=$07;  Am[ 50]:=$FF;  Am[ 51]:=$FF;   Am[ 52]:=$00;  Am[ 53]:=$03;  Am[ 54]:=$FF;  Am[ 55]:=$FF;   Am[ 56]:=$00;  Am[ 57]:=$01;  Am[ 58]:=$FF;  Am[ 59]:=$FF;   Am[ 60]:=$00;  Am[ 61]:=$00;  Am[ 62]:=$FF;  Am[ 63]:=$FF;   Am[ 64]:=$00;  Am[ 65]:=$00;  Am[ 66]:=$7F;  Am[ 67]:=$FF;   Am[ 68]:=$00;  Am[ 69]:=$00;  Am[ 70]:=$3F;  Am[ 71]:=$FF;   Am[ 72]:=$00;  Am[ 73]:=$00;  Am[ 74]:=$1F;  Am[ 75]:=$FF;   Am[ 76]:=$00;  Am[ 77]:=$00;  Am[ 78]:=$0F;  Am[ 79]:=$FF;   Am[ 80]:=$00;  Am[ 81]:=$00;  Am[ 82]:=$07;  Am[ 83]:=$FF;   Am[ 84]:=$00;  Am[ 85]:=$00;  Am[ 86]:=$03;  Am[ 87]:=$FF;   Am[ 88]:=$00;  Am[ 89]:=$00;  Am[ 90]:=$01;  Am[ 91]:=$FF;   Am[ 92]:=$00;  Am[ 93]:=$7F;  Am[ 94]:=$FF;  Am[ 95]:=$FF;   Am[ 96]:=$00;  Am[ 97]:=$FF;  Am[ 98]:=$FF;  Am[ 99]:=$FF;   Am[100]:=$01;  Am[101]:=$FF;  Am[102]:=$FF;  Am[103]:=$FF;   Am[104]:=$03;  Am[105]:=$FF;  Am[106]:=$FF;  Am[107]:=$FF;   Am[108]:=$07;  Am[109]:=$FF;  Am[110]:=$FF;  Am[111]:=$FF;   Am[112]:=$0F;  Am[113]:=$FF;  Am[114]:=$FF;  Am[115]:=$FF;   Am[116]:=$1F;  Am[117]:=$FF;  Am[118]:=$FF;  Am[119]:=$FF;   Am[120]:=$3F;  Am[121]:=$FF;  Am[122]:=$FF;  Am[123]:=$FF;   Am[124]:=$7F;  Am[125]:=$FF;  Am[126]:=$FF;  Am[127]:=$FF;   Xm[  0]:=$00;  Xm[  1]:=$00;  Xm[  2]:=$00;  Xm[  3]:=$00;   Xm[  4]:=$00;  Xm[  5]:=$00;  Xm[  6]:=$00;  Xm[  7]:=$00;   Xm[  8]:=$40;  Xm[  9]:=$00;  Xm[ 10]:=$00;  Xm[ 11]:=$00;   Xm[ 12]:=$60;  Xm[ 13]:=$00;  Xm[ 14]:=$00;  Xm[ 15]:=$00;   Xm[ 16]:=$70;  Xm[ 17]:=$00;  Xm[ 18]:=$00;  Xm[ 19]:=$00;   Xm[ 20]:=$78;  Xm[ 21]:=$00;  Xm[ 22]:=$00;  Xm[ 23]:=$00;   Xm[ 24]:=$7C;  Xm[ 25]:=$00;  Xm[ 26]:=$00;  Xm[ 27]:=$00;   Xm[ 28]:=$7E;  Xm[ 29]:=$00;  Xm[ 30]:=$00;  Xm[ 31]:=$00;   Xm[ 32]:=$7F;  Xm[ 33]:=$00;  Xm[ 34]:=$00;  Xm[ 35]:=$00;   Xm[ 36]:=$7F;  Xm[ 37]:=$80;  Xm[ 38]:=$00;  Xm[ 39]:=$00;   Xm[ 40]:=$7F;  Xm[ 41]:=$C0;  Xm[ 42]:=$00;  Xm[ 43]:=$00;   Xm[ 44]:=$7F;  Xm[ 45]:=$E0;  Xm[ 46]:=$00;  Xm[ 47]:=$00;   Xm[ 48]:=$7F;  Xm[ 49]:=$F0;  Xm[ 50]:=$00;  Xm[ 51]:=$00;   Xm[ 52]:=$7F;  Xm[ 53]:=$F8;  Xm[ 54]:=$00;  Xm[ 55]:=$00;   Xm[ 56]:=$7F;  Xm[ 57]:=$FC;  Xm[ 58]:=$00;  Xm[ 59]:=$00;   Xm[ 60]:=$7F;  Xm[ 61]:=$FE;  Xm[ 62]:=$00;  Xm[ 63]:=$00;   Xm[ 64]:=$7F;  Xm[ 65]:=$FF;  Xm[ 66]:=$00;  Xm[ 67]:=$00;   Xm[ 68]:=$7F;  Xm[ 69]:=$FF;  Xm[ 70]:=$80;  Xm[ 71]:=$00;   Xm[ 72]:=$7F;  Xm[ 73]:=$FF;  Xm[ 74]:=$C0;  Xm[ 75]:=$00;   Xm[ 76]:=$7F;  Xm[ 77]:=$FF;  Xm[ 78]:=$E0;  Xm[ 79]:=$00;   Xm[ 80]:=$7F;  Xm[ 81]:=$FF;  Xm[ 82]:=$F0;  Xm[ 83]:=$00;   Xm[ 84]:=$7F;  Xm[ 85]:=$FF;  Xm[ 86]:=$F8;  Xm[ 87]:=$00;   Xm[ 88]:=$7F;  Xm[ 89]:=$80;  Xm[ 90]:=$00;  Xm[ 91]:=$00;   Xm[ 92]:=$7F;  Xm[ 93]:=$00;  Xm[ 94]:=$00;  Xm[ 95]:=$00;   Xm[ 96]:=$7E;  Xm[ 97]:=$00;  Xm[ 98]:=$00;  Xm[ 99]:=$00;   Xm[100]:=$7C;  Xm[101]:=$00;  Xm[102]:=$00;  Xm[103]:=$00;   Xm[104]:=$78;  Xm[105]:=$00;  Xm[106]:=$00;  Xm[107]:=$00;   Xm[108]:=$70;  Xm[109]:=$00;  Xm[110]:=$00;  Xm[111]:=$00;   Xm[112]:=$60;  Xm[113]:=$00;  Xm[114]:=$00;  Xm[115]:=$00;   Xm[116]:=$40;  Xm[117]:=$00;  Xm[118]:=$00;  Xm[119]:=$00;   Xm[120]:=$00;  Xm[121]:=$00;  Xm[122]:=$00;  Xm[123]:=$00;   Xm[124]:=$00;  Xm[125]:=$00;  Xm[126]:=$00;  Xm[127]:=$00;      cur := CreateCursor(hInstance, 1, 2, 32, 32, @Am[0], @Xm[0]);   Screen.Cursors[MyCursor] := cur;   Form1.Cursor := MyCursor;    End;