Cursor propio en delphi
 

Como cambio el cursor en una aplicacion en delphi, no con la propiedad cursor sino yo tengo mi fichero con extension .cur y quiero que sea mi cursor de la aplicacion. gracias de antemano.

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 ;).