WindowlevelCellAction Example for Visual Basic

   LEADRasterContainerViewer.EnableMethodErrors = True

   If LEADRasterContainerViewer.WindowLevelAction.Use = False Then
      LEADRasterContainerViewer. WindowLevelAction.ActivateAction True, 0
   End If

   ' Specify Window level cell parameters. 
   LEADRasterContainerViewer.WindowLevelAction.Width = 2000
   LEADRasterContainerViewer.WindowLevelAction.Center = 1000
   LEADRasterContainerViewer.WindowLevelAction.FillType = FILLLUT_LINEAR
   
   ' Apply Window level on subcell 0 of cell 0. 
   LEADRasterContainerViewer.WindowLevelAction.SetAction 0, 0, CONVIEW_ACTIONLEVEL_CELL