Tema: Cursor propio en delphi
Ver Mensaje Individual
  #2  
Antiguo 25-07-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
  
Registrado: may 2003
Ubicación: Colombia
Posts: 7.070
Reputación: 32
jhonny Va camino a la famajhonny Va camino a la fama
Un Ejemplo: 

Código Delphi [-]
 if FileExists('C:\WINDOWS\Cursores\3dgarro.cur') then
    Screen.Cursors[1] := LoadCursorFromFile('C:\WINDOWS\Cursores\3dgarro.cur')
  else
    ShowMessage('No existe el cursor');
  Cursor := 1;

Espero te sirva .
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"

http://www.purodelphi.com/
http://www.nosolodelphi.com/
Responder Con Cita