// Загружаем курсор
Screen.Cursors[1]:=LoadCursorFromFile('c:\2.cur');
Cursor := 1;