Aug 22
Cambia el cursor de Windows a uno especificando el nombre de este.
- LOCAL lcNewCursor
tcCursorFile = "c:windowscursorsglobe.ANI"
tnCursorType = 32513
IF INLIST( JUSTEXT( tcCursorFile ), _CUR_, _ANI_ )
- IF FILE( tcCursorFile )
DECLARE INTEGER LoadCursorFromFile in Win32Api String
DECLARE SetSystemCursor in Win32Api Integer, Integer
-
lcNewCursor = LoadCursorFromFile( tcCursorFile )
Lt = SetSystemCursor( lcNewCursor, tnCursorType )
ELSE
=MESSAGEBOX("No se encuentra el cursor")
ENDIF
ELSE
=MESSAGEBOX("No es del tipo cursor")
ENDIF
Si tienes inquietudes, sígueme en Twitter para contactarme.
Seguir a @davamadort¿Deseas que tu sitio web aparezca en buscadores como google, yahoo, msn?
Contrata un plan de hosting en www.winnethost.com y recibes totalmente gratis el registro de tu sitio web en más de 24 buscadores, entre ellos google, yahoo, msn
El Sitio La Web de Davphantom se encuentra hospedado en WinNetHost.com
