title: Delphi: Screen.Cursor not working and can't figure out Windows.SetCursor(crHourGlass)
body: <p>In my app I have</p>
  
  <pre><code>Screen.Cursor := crHourGlass;
  Application.ProcessMessages;
  try
  ...
  
  finally
    Screen.Cursor := crDefault;
    Application.ProcessMessages;
  end;
  </code></pre>
  
  <p>But this simply isn't working as expected. It seems to immediately change back to crDefault when it is processing.</p>
  
  <p>After some Googling I decided to try Windows.SetCursor() - but I've searched the MSDN and I can't find the list of cursor types.</p>
  
  <p><strong>Update</strong> 
  I thought I found the solution (using   SetSystemCursor(Screen.Cursors[crHourGlass], OCR_NORMAL);) but I can't seem to then change the cursor back to normal :(.</p>