ResetVR Example for Delphi
{ Clear all items from the VR Table }
LEADDicom1.
ResetVR