Asi funciona el cursor para todo el form pero no me funciona el del TLabel:
Código PHP:
//Pongo los cursores deseados para mi aplicacion
CursorOriginalDefault = ::GetCursor(); // Salvas tu cursor original
CursorOriginalLabelURL = Screen->Cursors[CUR_LINK];
crOriginalLabelURL = LabelURL->Cursor;
Screen->Cursors[CUR_DEFAULT] = LoadCursor(HInstance, "ARROW");
Screen->Cursor = (TCursor)CUR_DEFAULT;
Screen->Cursors[CUR_LINK] = LoadCursor(HInstance, "LINK");
LabelURL->Cursor = (TCursor)CUR_LINK;
Ya no se que mas probar.
Por otro lado veo que para los scrolls de los TListBox me sigue mostrando el cursor por defecto en vez del mio y en los PopupMenus igual ¿como hago para que muestre el mio?