296______________________________________________ 4

  crDefault,      
   ,   Screen.   
   ,        
  -  .    
:

Screen->Cursor = crHourGlass;

try
{

   

}
catch (...)
{

Screen->Cursor = crDefault; //  

throw;

)
Screen->Cursor = crDefault;

     (.  4.9)  
        .

    -     
crDefault   ,     ,  
      :

TCursor Save_Cursor = Screen-cursor;

Screen->Cursor = crHourGlass;

try
(

   
}

catch (...)
(

Screen->Cursor = Save_Cursor;

throw;

}
Screen->Cursor = Save_Cursor;

   Cursors[ I ],     -
  .       
 .        
 C++Builder   (Image Editor).     -
    5.1.2.4.       -
  LoadCursor.     .

, ,          -
   NEWCURSOR.        -
 ,   . :

const crMyCursor = 1;

        -32768  32767. 
,        
,     0  -21.

   OnCreate     , -
     Cursors:

Screen->Cursors[crMyCursor]=LoadCursor(HInstance,"NEWCURSOR");

   ,      
,          .

           -
 

Screen->Cursor = crMyCursor;