Form - Carregar arquivos ANI

const

  cnCursorID1 = 1;

begin

  Screen.Cursors[ cnCursorID1 ] :=

    LoadCursorFromFile('c:\win95\cursors\cavalo.ani' );

  Cursor := cnCursorID1;

end;