DefaultTag Example for Delphi

{ Restore default Tag values }
Screen.Cursor := crHourGlass;
LEADDicom1.DefaultTag();
Screen.Cursor := crDefault;