DefaultVR Example for Delphi
Screen.Cursor:= crHourglass; LEADDicomDS1.DefaultVR (); Screen.Cursor:= crDefault;