mainunit.lfm

object GLForm1: TGLForm1
  Left = 438
  Height = 584
  Top = 102
  Width = 624
  ActiveControl = ToolPanel
  AllowDropFiles = True
  Caption = 'MRIcroGL'
  ClientHeight = 584
  ClientWidth = 624
  KeyPreview = True
  Menu = MainMenu1
  OnChangeBounds = FormChangeBounds
  OnClose = FormClose
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnDropFiles = FormDropFiles
  OnKeyDown = FormKeyDown
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '2.1.0.0'
  object ToolPanel: TPanel
    Left = 0
    Height = 584
    Top = 0
    Width = 216
    Align = alLeft
    BevelOuter = bvNone
    ClientHeight = 584
    ClientWidth = 216
    ParentFont = False
    TabOrder = 0
    OnClick = ToolPanelClick
    object ClipBox: TGroupBox
      Left = 0
      Height = 92
      Top = 124
      Width = 216
      Align = alTop
      Caption = 'Clipping'
      ClientHeight = 73
      ClientWidth = 206
      ParentFont = False
      TabOrder = 4
      object Label4: TLabel
        Left = 3
        Height = 16
        Top = 2
        Width = 37
        Caption = 'Depth'
        ParentColor = False
        ParentFont = False
        OnClick = Label4Click
      end
      object Label5: TLabel
        Left = 3
        Height = 16
        Top = 24
        Width = 50
        Caption = 'Azimuth'
        ParentColor = False
        ParentFont = False
        OnClick = Label5Click
      end
      object Label6: TLabel
        Left = 3
        Height = 16
        Top = 46
        Width = 55
        Caption = 'Elevation'
        ParentColor = False
        ParentFont = False
        OnClick = Label6Click
      end
      object ClipTrack: TTrackBar
        Left = 86
        Height = 30
        Top = 0
        Width = 116
        Max = 1000
        OnChange = ClipTrackChange
        Position = 0
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 0
      end
      object AziTrack1: TTrackBar
        Left = 86
        Height = 30
        Top = 22
        Width = 116
        Max = 360
        OnChange = ClipTrackChange
        Position = 180
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 1
      end
      object ElevTrack1: TTrackBar
        Left = 86
        Height = 30
        Top = 45
        Width = 116
        Max = 180
        Min = -180
        OnChange = ClipTrackChange
        Position = 0
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 2
      end
    end
    object ShaderBox: TGroupBox
      Left = 0
      Height = 0
      Top = 584
      Width = 216
      Align = alClient
      Caption = 'Shader'
      ClientHeight = 0
      ClientWidth = 206
      ParentFont = False
      TabOrder = 9
      OnResize = ShaderBoxResize
      object ShaderMemo: TMemo
        Left = 0
        Height = 0
        Top = 0
        Width = 206
        Align = alClient
        Lines.Strings = (
          'Memo1'
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
          ''
        )
        ParentFont = False
        TabOrder = 1
        TabStop = False
      end
      object ShaderPanel: TPanel
        Left = 0
        Height = 120
        Top = 0
        Width = 206
        Align = alTop
        BevelOuter = bvNone
        ClientHeight = 120
        ClientWidth = 206
        ParentFont = False
        TabOrder = 0
        object ShaderDrop: TComboBox
          Left = 2
          Height = 20
          Top = 0
          Width = 110
          DropDownCount = 24
          ItemHeight = 26
          OnChange = ShaderDropChange
          ParentFont = False
          Style = csDropDownList
          TabOrder = 0
          Text = '0'
        end
        object Label1: TLabel
          Left = 117
          Height = 16
          Hint = 'Lower quality renders faster, higher quality looks better'
          Top = 9
          Width = 10
          Caption = 'Q'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
        end
        object QualityTrack: TTrackBar
          Left = 132
          Height = 30
          Top = 0
          Width = 66
          Min = 1
          OnChange = QualityTrackChange
          Position = 3
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 1
        end
        object Label2: TLabel
          Left = 3
          Height = 16
          Hint = 'Set the elevation and azimuth of the illumination'
          Top = 35
          Width = 31
          Caption = 'Light'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
        end
        object LightElevTrack: TTrackBar
          Left = 46
          Height = 30
          Top = 30
          Width = 66
          Max = 90
          Min = -90
          OnChange = AziElevChange
          Position = 5
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 2
        end
        object LightAziTrack: TTrackBar
          Left = 132
          Height = 30
          Top = 30
          Width = 66
          Max = 180
          Min = -180
          OnChange = AziElevChange
          Position = 0
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 3
        end
        object S1Label: TLabel
          Tag = 1
          Left = 4
          Height = 16
          Top = 62
          Width = 14
          Caption = 'S1'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S2Label: TLabel
          Tag = 2
          Left = 4
          Height = 16
          Top = 92
          Width = 16
          Caption = 'S2'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S3Label: TLabel
          Tag = 3
          Left = 4
          Height = 16
          Top = 122
          Width = 16
          Caption = 'S3'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S4Label: TLabel
          Tag = 4
          Left = 4
          Height = 16
          Top = 152
          Width = 16
          Caption = 'S4'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S5Label: TLabel
          Tag = 5
          Left = 4
          Height = 16
          Top = 182
          Width = 16
          Caption = 'S5'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S6Label: TLabel
          Tag = 6
          Left = 4
          Height = 16
          Top = 212
          Width = 16
          Caption = 'S6'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S7Label: TLabel
          Tag = 7
          Left = 4
          Height = 16
          Top = 242
          Width = 16
          Caption = 'S7'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S8Label: TLabel
          Tag = 8
          Left = 4
          Height = 16
          Top = 272
          Width = 16
          Caption = 'S8'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S9Label: TLabel
          Tag = 9
          Left = 4
          Height = 16
          Top = 302
          Width = 16
          Caption = 'S9'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S10Label: TLabel
          Tag = 10
          Left = 4
          Height = 16
          Top = 332
          Width = 22
          Caption = 'S10'
          ParentColor = False
          ParentFont = False
          ParentShowHint = False
        end
        object S1Track: TTrackBar
          Tag = 1
          Left = 132
          Height = 30
          Top = 60
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 4
        end
        object S2Track: TTrackBar
          Tag = 2
          Left = 132
          Height = 30
          Top = 90
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 5
        end
        object S3Track: TTrackBar
          Tag = 3
          Left = 132
          Height = 30
          Top = 120
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 6
        end
        object S4Track: TTrackBar
          Tag = 4
          Left = 132
          Height = 30
          Top = 150
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 7
        end
        object S5Track: TTrackBar
          Tag = 5
          Left = 132
          Height = 30
          Top = 180
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 8
        end
        object S6Track: TTrackBar
          Tag = 6
          Left = 132
          Height = 30
          Top = 210
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 9
        end
        object S7Track: TTrackBar
          Tag = 7
          Left = 132
          Height = 30
          Top = 240
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 10
        end
        object S8Track: TTrackBar
          Tag = 8
          Left = 132
          Height = 30
          Top = 270
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 11
        end
        object S9Track: TTrackBar
          Tag = 9
          Left = 132
          Height = 30
          Top = 300
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 12
        end
        object S10Track: TTrackBar
          Tag = 10
          Left = 132
          Height = 30
          Top = 330
          Width = 66
          Max = 100
          OnChange = UniformChange
          Position = 50
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 13
        end
        object S1Check: TCheckBox
          Tag = 1
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 62
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 14
        end
        object S2Check: TCheckBox
          Tag = 2
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 92
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 15
        end
        object S3Check: TCheckBox
          Tag = 3
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 122
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 16
        end
        object S4Check: TCheckBox
          Tag = 4
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 152
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 17
        end
        object S5Check: TCheckBox
          Tag = 5
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 182
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 18
        end
        object S6Check: TCheckBox
          Tag = 6
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 212
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 19
        end
        object S7Check: TCheckBox
          Tag = 7
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 242
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 20
        end
        object S8Check: TCheckBox
          Tag = 8
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 272
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 21
        end
        object S9Check: TCheckBox
          Tag = 9
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 302
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 22
        end
        object S10Check: TCheckBox
          Tag = 10
          Left = 141
          Height = 18
          Hint = 'If checked, edge color varies'
          Top = 332
          Width = 22
          Checked = True
          OnChange = UniformChange
          ParentFont = False
          ParentShowHint = False
          ShowHint = True
          State = cbChecked
          TabOrder = 23
        end
      end
    end
    object IntensityBox: TGroupBox
      Tag = 270
      Left = 0
      Height = 50
      Top = 0
      Width = 216
      Align = alTop
      Caption = 'Intensity Range'
      ClientHeight = 31
      ClientWidth = 206
      ParentFont = False
      TabOrder = 2
      object MinEdit: TEdit
        Left = 3
        Height = 22
        Hint = 'Adjust image brightness and contrast'
        Top = 1
        Width = 90
        AutoSize = False
        OnKeyPress = MinMaxEditKeyPress
        OnKeyUp = MinMaxEditKeyUp
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 0
        Text = 'MinEdit'
      end
      object MaxEdit: TEdit
        Left = 104
        Height = 22
        Top = 1
        Width = 90
        AutoSize = False
        OnExit = MinMaxEditExit
        OnKeyPress = MinMaxEditKeyPress
        OnKeyUp = MinMaxEditKeyUp
        ParentFont = False
        TabOrder = 1
        Text = 'MaxEdit'
      end
    end
    object CutoutBox: TGroupBox
      Left = 0
      Height = 92
      Top = 584
      Width = 216
      Align = alTop
      Caption = 'Cutout'
      ClientHeight = 73
      ClientWidth = 206
      ParentFont = False
      TabOrder = 5
      object Xx: TLabel
        Left = 3
        Height = 16
        Top = 3
        Width = 9
        Caption = 'X'
        ParentColor = False
        ParentFont = False
      end
      object Yy: TLabel
        Left = 3
        Height = 16
        Top = 25
        Width = 8
        Caption = 'Y'
        ParentColor = False
        ParentFont = False
      end
      object Zz: TLabel
        Left = 3
        Height = 16
        Top = 47
        Width = 9
        Caption = 'Z'
        ParentColor = False
        ParentFont = False
      end
      object XTrackBar: TTrackBar
        Left = 14
        Height = 30
        Top = 0
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 0
      end
      object X2TrackBar: TTrackBar
        Left = 84
        Height = 30
        Top = 0
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 1
      end
      object YTrackBar: TTrackBar
        Left = 14
        Height = 30
        Top = 22
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 2
      end
      object Y2TrackBar: TTrackBar
        Left = 84
        Height = 30
        Top = 22
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 3
      end
      object ZTrackBar: TTrackBar
        Left = 14
        Height = 30
        Top = 45
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 4
      end
      object Z2TrackBar: TTrackBar
        Left = 84
        Height = 30
        Top = 45
        Width = 66
        Max = 1000
        OnChange = CutoutChange
        Position = 1000
        TickStyle = tsNone
        ParentFont = False
        TabOrder = 5
      end
      object NearBtn: TButton
        Left = 150
        Height = 22
        Top = 9
        Width = 52
        Caption = 'Near'
        OnClick = CutoutNearestSector
        ParentFont = False
        TabOrder = 6
      end
      object NoneBtn: TButton
        Left = 150
        Height = 22
        Top = 36
        Width = 52
        Caption = 'None'
        OnClick = HideBtnClick
        ParentFont = False
        TabOrder = 7
      end
    end
    object CollapseToolPanelBtn: TButton
      Left = 199
      Height = 12
      Hint = 'Click here to hide the tool panel'
      Top = 1
      Width = 12
      OnClick = CollapsedToolPanelClick
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 1
    end
    object MosaicBox: TGroupBox
      Left = 0
      Height = 259
      Top = 216
      Width = 216
      Align = alTop
      Caption = 'Mosaic'
      ClientHeight = 240
      ClientWidth = 206
      ParentFont = False
      TabOrder = 6
      Visible = False
      object MosaicText: TMemo
        Left = 0
        Height = 124
        Top = 116
        Width = 206
        Align = alClient
        Lines.Strings = (
          'MosaicText'
        )
        OnChange = MosaicTextChange
        ParentFont = False
        TabOrder = 1
      end
      object MosaicPanel: TPanel
        Left = 0
        Height = 116
        Top = 0
        Width = 206
        Align = alTop
        BevelOuter = bvNone
        ClientHeight = 116
        ClientWidth = 206
        ParentFont = False
        TabOrder = 0
        object ColOverlap: TTrackBar
          Left = 126
          Height = 30
          Top = 0
          Width = 66
          Max = 9
          Min = -9
          OnChange = UpdateMosaic
          Position = -1
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 1
        end
        object ColEdit: TSpinEdit
          Left = 64
          Height = 21
          Top = 2
          Width = 54
          MaxValue = 20
          MinValue = 1
          OnChange = UpdateMosaic
          ParentFont = False
          TabOrder = 0
          Value = 3
        end
        object Label7: TLabel
          Left = 3
          Height = 16
          Top = 2
          Width = 53
          Caption = 'Columns'
          ParentColor = False
          ParentFont = False
        end
        object Label3: TLabel
          Left = 3
          Height = 16
          Top = 26
          Width = 32
          Caption = 'Rows'
          ParentColor = False
          ParentFont = False
        end
        object RowEdit: TSpinEdit
          Left = 64
          Height = 21
          Top = 26
          Width = 54
          MaxValue = 20
          MinValue = 1
          OnChange = UpdateMosaic
          ParentFont = False
          TabOrder = 2
          Value = 2
        end
        object RowOverlap: TTrackBar
          Left = 126
          Height = 30
          Top = 26
          Width = 66
          Max = 9
          Min = -9
          OnChange = UpdateMosaic
          Position = 0
          TickStyle = tsNone
          ParentFont = False
          TabOrder = 3
        end
        object OrientDrop: TComboBox
          Left = 104
          Height = 20
          Top = 48
          Width = 93
          ItemHeight = 26
          ItemIndex = 0
          Items.Strings = (
            'Axial'
            'Coronal'
            'Sagittal+'
            'Sagittal-'
          )
          OnChange = UpdateMosaic
          ParentFont = False
          Style = csDropDownList
          TabOrder = 4
          Text = 'Axial'
        end
        object Label8: TLabel
          Left = 3
          Height = 16
          Top = 50
          Width = 67
          Caption = 'Orientation'
          ParentColor = False
          ParentFont = False
        end
        object CrossCheck: TCheckBox
          Left = 3
          Height = 18
          Top = 70
          Width = 84
          Caption = 'Cross slice'
          Checked = True
          OnChange = UpdateMosaic
          ParentFont = False
          State = cbChecked
          TabOrder = 5
        end
        object CopyScriptBtn: TButton
          Left = 6
          Height = 22
          Top = 90
          Width = 92
          Caption = 'Copy Script'
          OnClick = CopyScriptClick
          ParentFont = False
          TabOrder = 7
        end
        object RunScriptBtn: TButton
          Left = 110
          Height = 22
          Top = 90
          Width = 92
          Caption = 'Run Script'
          OnClick = RunScriptClick
          ParentFont = False
          TabOrder = 8
          Visible = False
        end
        object LabelCheck: TCheckBox
          Left = 104
          Height = 18
          Top = 70
          Width = 89
          Caption = 'Label slices'
          Checked = True
          OnChange = UpdateMosaic
          ParentFont = False
          State = cbChecked
          TabOrder = 6
        end
      end
    end
    object OverlayBox: TGroupBox
      Left = 0
      Height = 74
      Top = 50
      Width = 216
      Align = alTop
      Caption = 'Overlays'
      ClientHeight = 55
      ClientWidth = 206
      ParentFont = False
      TabOrder = 3
      Visible = False
      object StringGrid1: TStringGrid
        Left = 0
        Height = 55
        Top = 0
        Width = 206
        Align = alClient
        AutoEdit = False
        BorderStyle = bsNone
        ColCount = 4
        DefaultColWidth = 50
        DefaultRowHeight = 23
        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goDrawFocusSelected, goEditing, goTabs, goAlwaysShowEditor, goSmoothScroll]
        ParentFont = False
        ParentShowHint = False
        RowCount = 33
        ScrollBars = ssNone
        ShowHint = True
        TabOrder = 0
        OnDrawCell = StringGrid1DrawCell
        OnEditingDone = StringGrid1Exit
        OnExit = StringGrid1Exit
        OnKeyPress = StringGrid1KeyPress
        OnMouseDown = StringGrid1MouseDown
        OnSelectCell = StringGrid1SelectCell
      end
      object LUTdrop: TComboBox
        Left = 66
        Height = 20
        Top = 30
        Width = 55
        DropDownCount = 22
        ItemHeight = 26
        ItemIndex = 0
        Items.Strings = (
          'a'
          'b'
          'c'
          'd'
          'e'
          'f'
          'g'
        )
        OnChange = LUTdropChange
        ParentFont = False
        Style = csDropDownList
        TabOrder = 1
        Text = 'a'
      end
    end
    object HideRenderToolsBtn: TButton
      Left = 184
      Height = 12
      Hint = 'Click to hide/show render tools (useful for small screens)'
      Top = 1
      Width = 12
      OnClick = HideRenderToolsBtnClick
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
    object LineBox: TGroupBox
      Left = 0
      Height = 50
      Top = 584
      Width = 216
      Align = alTop
      Caption = 'Lines'
      ClientHeight = 31
      ClientWidth = 206
      ParentFont = False
      TabOrder = 8
      object LineWidthLabel: TLabel
        Left = 3
        Height = 16
        Top = 2
        Width = 36
        Caption = 'Width'
        ParentColor = False
        ParentFont = False
      end
      object LineColorBtn: TButton
        Left = 124
        Height = 22
        Top = 2
        Width = 78
        Caption = 'Color'
        OnClick = LineColorBtnClick
        ParentFont = False
        TabOrder = 1
      end
      object LineWidthEdit: TSpinEdit
        Left = 48
        Height = 21
        Top = 2
        Width = 70
        MaxValue = 7
        OnChange = LineWidthEditChange
        ParentFont = False
        TabOrder = 0
        Value = 3
      end
    end
    object Slice2DBox: TGroupBox
      Left = 0
      Height = 132
      Top = 475
      Width = 216
      Align = alTop
      Caption = '2D Slice Selection'
      ClientHeight = 113
      ClientWidth = 206
      ParentFont = False
      TabOrder = 7
      object LeftBtn: TButton
        Left = 4
        Height = 20
        Top = 18
        Width = 40
        Caption = 'L'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 0
      end
      object SuperiorBtn: TButton
        Tag = 5
        Left = 148
        Height = 20
        Top = 2
        Width = 40
        Caption = 'S'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 4
      end
      object InferiorBtn: TButton
        Tag = 4
        Left = 148
        Height = 20
        Top = 34
        Width = 40
        Caption = 'I'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 5
      end
      object AnteriorBtn: TButton
        Tag = 3
        Left = 48
        Height = 20
        Top = 2
        Width = 40
        Caption = 'A'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 1
      end
      object PosteriorBtn: TButton
        Tag = 2
        Left = 48
        Height = 20
        Top = 34
        Width = 40
        Caption = 'P'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 2
      end
      object RightBtn: TButton
        Tag = 1
        Left = 92
        Height = 20
        Top = 16
        Width = 40
        Caption = 'R'
        OnClick = OrientBtnClick
        ParentFont = False
        TabOrder = 3
      end
      object CoordLabel: TLabel
        Left = 3
        Height = 16
        Top = 58
        Width = 118
        Caption = 'Coordinates (X,Y,Z)'
        ParentColor = False
        ParentFont = False
      end
      object XCoordEdit: TEdit
        Left = 2
        Height = 22
        Top = 80
        Width = 66
        AutoSize = False
        OnChange = CoordEditChange
        OnKeyPress = MinMaxEditKeyPress
        OnKeyUp = MinMaxEditKeyUp
        ParentFont = False
        TabOrder = 6
        Text = '0'
      end
      object YCoordEdit: TEdit
        Left = 70
        Height = 22
        Top = 80
        Width = 66
        AutoSize = False
        OnChange = CoordEditChange
        OnKeyPress = MinMaxEditKeyPress
        OnKeyUp = MinMaxEditKeyUp
        ParentFont = False
        TabOrder = 7
        Text = '0'
      end
      object ZCoordEdit: TEdit
        Left = 138
        Height = 22
        Top = 80
        Width = 66
        AutoSize = False
        OnChange = CoordEditChange
        OnKeyPress = MinMaxEditKeyPress
        OnKeyUp = MinMaxEditKeyUp
        ParentFont = False
        TabOrder = 8
        Text = '0'
      end
    end
  end
  object CollapsedToolPanel: TPanel
    Left = 216
    Height = 584
    Top = 0
    Width = 5
    Align = alLeft
    ParentFont = False
    TabOrder = 1
    Visible = False
    OnClick = CollapsedToolPanelClick
  end
  object MainMenu1: TMainMenu
    left = 320
    top = 536
    object AppleMenu: TMenuItem
      Caption = ''
      object AppleAbout: TMenuItem
        Caption = 'About MRIcroGL'
        OnClick = About1Click
      end
      object ApplePreferences: TMenuItem
        Caption = 'Preferences'
        OnClick = Preferences1Click
      end
    end
    object File1: TMenuItem
      Caption = 'File'
      object NewWindow1: TMenuItem
        Caption = 'New window'
        OnClick = NewWindow1Click
      end
      object Open1: TMenuItem
        Caption = 'Open'
        ShortCut = 16463
        OnClick = Open1Click
      end
      object Save1: TMenuItem
        Caption = 'Save'
        OnClick = Save1Click
      end
      object Exit1: TMenuItem
        Caption = 'Exit'
        ShortCut = 16472
        OnClick = Exit1Click
      end
      object MenuSep1: TMenuItem
        Caption = '-'
      end
      object MRU1: TMenuItem
        Caption = 'MRU1'
      end
      object MRU2: TMenuItem
        Caption = 'MRU2'
      end
      object MRU3: TMenuItem
        Caption = 'MRU3'
      end
      object MRU4: TMenuItem
        Caption = 'MRU4'
      end
      object MRU5: TMenuItem
        Caption = 'MRU5'
      end
      object MRU6: TMenuItem
        Caption = 'MRU6'
      end
      object MRU7: TMenuItem
        Caption = 'MRU7'
      end
      object MRU8: TMenuItem
        Caption = 'MRU8'
      end
      object MRU9: TMenuItem
        Caption = 'MRU9'
      end
      object MRU10: TMenuItem
        Caption = 'MRU10'
      end
    end
    object Edit1: TMenuItem
      Caption = 'Edit'
      object Copy1: TMenuItem
        Caption = 'Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
    end
    object Overlays1: TMenuItem
      Caption = 'Overlays'
      object Addoverlay1: TMenuItem
        Caption = 'Add overlay'
        OnClick = Addoverlay1Click
      end
      object Thresholdmenu: TMenuItem
        Caption = 'Add overlay (remove small clusters)'
        OnClick = ThresholdMenuClick
      end
      object Closeoverlays1: TMenuItem
        Caption = 'Close overlays'
        OnClick = Closeoverlays1Click
      end
      object Onbackground1: TMenuItem
        Caption = 'Transparency on background'
        object N0Opaque1: TMenuItem
          AutoCheck = True
          Caption = '0% Opaque'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N201: TMenuItem
          Tag = 20
          AutoCheck = True
          Caption = '20%'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N401: TMenuItem
          Tag = 40
          AutoCheck = True
          Caption = '40%'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N501: TMenuItem
          Tag = 50
          AutoCheck = True
          Caption = '50%'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N601: TMenuItem
          Tag = 60
          AutoCheck = True
          Caption = '60%'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N801: TMenuItem
          Tag = 80
          AutoCheck = True
          Caption = '80%'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object N100transparent1: TMenuItem
          Tag = 100
          AutoCheck = True
          Caption = '100% transparent'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object Additive1: TMenuItem
          Tag = -1
          AutoCheck = True
          Caption = 'Additive'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
        object ModulateMenu: TMenuItem
          Tag = -2
          AutoCheck = True
          Caption = 'Modulate'
          GroupIndex = 123
          RadioItem = True
          OnClick = SetBackgroundAlpha
        end
      end
      object Onotheroverlays1: TMenuItem
        Caption = 'Transparency on other overlays'
        object N0opaque2: TMenuItem
          AutoCheck = True
          Caption = '0% opaque'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N202: TMenuItem
          Tag = 20
          AutoCheck = True
          Caption = '20%'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N402: TMenuItem
          Tag = 40
          AutoCheck = True
          Caption = '40%'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N502: TMenuItem
          Tag = 50
          AutoCheck = True
          Caption = '50%'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N602: TMenuItem
          Tag = 60
          AutoCheck = True
          Caption = '60%'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N802: TMenuItem
          Tag = 80
          AutoCheck = True
          Caption = '80%'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object N100transparent2: TMenuItem
          Tag = 100
          AutoCheck = True
          Caption = '100% transparent'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
        object Additive2: TMenuItem
          Tag = -1
          AutoCheck = True
          Caption = 'Additive'
          GroupIndex = 133
          RadioItem = True
          OnClick = SetOverlayAlpha
        end
      end
      object InterpolateMenu: TMenuItem
        AutoCheck = True
        Caption = 'Smooth when loading'
        Checked = True
        OnClick = InterpolateMenuClick
      end
      object BackgroundMaskMenu: TMenuItem
        AutoCheck = True
        Caption = 'Background masks overlays'
        Checked = True
        OnClick = BackgroundMaskMenuClick
      end
      object OverlayColorFromZeroMenu: TMenuItem
        AutoCheck = True
        Caption = 'Overlay color from zero'
        OnClick = OverlayColorFromZeroMenuClick
      end
      object OverlayHideZerosMenu: TMenuItem
        AutoCheck = True
        Caption = 'Overlay hide zeros'
        OnClick = OverlayColorFromZeroMenuClick
      end
    end
    object Import1: TMenuItem
      Caption = 'Import'
      object ConvertDicom1: TMenuItem
        Caption = 'Convert DICOM to NIfTI'
        OnClick = ConvertDicom1Click
      end
      object ConvertForeign1: TMenuItem
        Caption = 'Convert foreign to NIfTI'
        Hint = 'Convert MGH, LSM,  NRRD, PIC, TIFF'
        OnClick = ConvertForeign1Click
      end
      object ReorientMenu: TMenuItem
        Caption = 'Rotate volume'
        Hint = 'Reorient image to standard space'
        OnClick = ReorientMenuClick
      end
    end
    object Draw1: TMenuItem
      Caption = 'Draw'
      object OpenVOI1: TMenuItem
        Caption = 'Open VOI'
        OnClick = OpenVOI1Click
      end
      object SaveVOI1: TMenuItem
        Caption = 'Save VOI'
        OnClick = SaveVOI1Click
      end
      object CloseVOI1: TMenuItem
        Caption = 'Close VOI'
        OnClick = CloseVOI1Click
      end
      object UndoVOI1: TMenuItem
        Caption = 'Undo'
        ShortCut = 16474
        OnClick = UndoVOI1Click
      end
      object Transparency1: TMenuItem
        Caption = 'Transparency'
        object HideVOI1: TMenuItem
          AutoCheck = True
          Caption = 'Hide/Unhide'
          ShortCut = 16456
          OnClick = TransparencyVOIClick
        end
        object TransparencyVOIhi: TMenuItem
          Tag = 64
          AutoCheck = True
          Caption = '25%'
          GroupIndex = 121
          RadioItem = True
          OnClick = TransparencyVOIClick
        end
        object TransparencyVOImid: TMenuItem
          Tag = 128
          AutoCheck = True
          Caption = '50%'
          Checked = True
          GroupIndex = 121
          RadioItem = True
          OnClick = TransparencyVOIClick
        end
        object TransparencyVOIlo: TMenuItem
          Tag = 230
          AutoCheck = True
          Caption = '90%'
          GroupIndex = 121
          RadioItem = True
          OnClick = TransparencyVOIClick
        end
      end
      object DrawTool1: TMenuItem
        Caption = 'Draw color'
        object NoDraw1: TMenuItem
          Tag = -1
          AutoCheck = True
          Caption = 'None (disable: draw mode off)'
          Checked = True
          GroupIndex = 189
          RadioItem = True
          ShortCut = 16452
          OnClick = DrawTool1Click
        end
        object Eraser1: TMenuItem
          AutoCheck = True
          Caption = 'Erase'
          GroupIndex = 189
          RadioItem = True
          ShortCut = 16453
          OnClick = DrawTool1Click
        end
      end
      object Advanced1: TMenuItem
        Caption = 'Advanced'
        object OverwriteDrawColor1: TMenuItem
          AutoCheck = True
          Caption = 'Overwrite draw colors'
          Checked = True
        end
        object PasteSlice1: TMenuItem
          Caption = 'Clone slice'
          ShortCut = 16470
          OnClick = PasteSlice1Click
        end
        object CustomDrawColors1: TMenuItem
          Caption = 'Custom draw colors'
          OnClick = CustomDrawColors1Click
        end
        object Smooth1: TMenuItem
          Caption = 'Smooth and refine drawing'
          OnClick = Smooth1Click
        end
        object AutoRoi1: TMenuItem
          Caption = 'Automatic VOI'
          OnClick = AutoRoi1Click
        end
        object voiBinarize1: TMenuItem
          Caption = 'Binarize (make entire drawing red)'
          Hint = 'Make entire drawing red'
          OnClick = voiBinarize1Click
        end
        object InterpolateDrawMenu: TMenuItem
          Caption = 'Interpolate between slices'
          object InterpolateRecentMenu: TMenuItem
            Caption = 'Last two slices'
            ShortCut = 16472
            OnClick = InterpolateDrawMenuClick
          end
          object InterpolateAxialMenu: TMenuItem
            Tag = 1
            Caption = 'All axial gaps'
            OnClick = InterpolateDrawMenuClick
          end
          object InterpolateCoronalMenu: TMenuItem
            Tag = 2
            Caption = 'All coronal gaps'
            OnClick = InterpolateDrawMenuClick
          end
          object InterpolateSagittalMenu: TMenuItem
            Tag = 3
            Caption = 'All sagittal gaps'
            OnClick = InterpolateDrawMenuClick
          end
        end
        object voiDescriptives1: TMenuItem
          Caption = 'Descriptives'
          OnClick = voiDescriptives1Click
        end
      end
    end
    object Display1: TMenuItem
      Caption = 'Display'
      object Render1: TMenuItem
        AutoCheck = True
        Caption = 'Render'
        Checked = True
        GroupIndex = 212
        RadioItem = True
        ShortCut = 16466
        OnClick = SetViewClick
      end
      object Axial1: TMenuItem
        Tag = 1
        AutoCheck = True
        Caption = 'Axial'
        GroupIndex = 212
        RadioItem = True
        ShortCut = 16449
        OnClick = SetViewClick
      end
      object Coronal1: TMenuItem
        Tag = 2
        AutoCheck = True
        Caption = 'Coronal'
        GroupIndex = 212
        RadioItem = True
        OnClick = SetViewClick
      end
      object Sagittal1: TMenuItem
        Tag = 3
        AutoCheck = True
        Caption = 'Sagittal'
        GroupIndex = 212
        RadioItem = True
        ShortCut = 16467
        OnClick = SetViewClick
      end
      object MPR1: TMenuItem
        Tag = 4
        AutoCheck = True
        Caption = 'Multi planar (A+C+S)'
        GroupIndex = 212
        RadioItem = True
        ShortCut = 16461
        OnClick = SetViewClick
      end
      object Mosaic1: TMenuItem
        Tag = 5
        AutoCheck = True
        Caption = 'Mosaic'
        GroupIndex = 212
        RadioItem = True
        OnClick = Mosaic1Click
      end
      object YokeSepMenu: TMenuItem
        Caption = '-'
        Visible = False
      end
      object YokeMenu: TMenuItem
        AutoCheck = True
        Caption = 'Yoke'
        ShortCut = 16473
        Visible = False
        OnClick = YokeMenuClick
      end
      object ViewSepMenu: TMenuItem
        Caption = '-'
      end
      object LeftMenu: TMenuItem
        Caption = 'Left'
        ShortCut = 76
        OnClick = OrientMenuClick
      end
      object RightMenu: TMenuItem
        Tag = 1
        Caption = 'Right'
        ShortCut = 82
        OnClick = OrientMenuClick
      end
      object PosteriorMenu: TMenuItem
        Tag = 2
        Caption = 'Posterior'
        ShortCut = 80
        OnClick = OrientMenuClick
      end
      object AnteriorMenu: TMenuItem
        Tag = 3
        Caption = 'Anterior'
        ShortCut = 65
        OnClick = OrientMenuClick
      end
      object InferiorMenu: TMenuItem
        Tag = 4
        Caption = 'Inferior'
        ShortCut = 73
        OnClick = OrientMenuClick
      end
      object SuperiorMenu: TMenuItem
        Tag = 5
        Caption = 'Superior'
        ShortCut = 83
        OnClick = OrientMenuClick
      end
      object RadiologicalMenu: TMenuItem
        AutoCheck = True
        Caption = 'Radiological (flip LR)'
        OnClick = RadiologicalMenuClick
      end
    end
    object View1: TMenuItem
      Caption = 'View'
      object ResetDefaults1: TMenuItem
        Caption = 'Reset defaults'
        OnClick = ResetDefaults1Click
      end
      object Tool1: TMenuItem
        AutoCheck = True
        Caption = 'Tool panel'
        ShortCut = 16468
        OnClick = Tool1Click
      end
      object Orient1: TMenuItem
        AutoCheck = True
        Caption = 'Text and orientation cube'
        ShortCut = 112
        OnClick = Orient1Click
      end
      object Scripting1: TMenuItem
        Caption = 'Scripting'
        OnClick = Scripting1Click
      end
      object Extract1: TMenuItem
        Caption = 'Extract object[s]'
        OnClick = Extract1Click
      end
      object BET1: TMenuItem
        Caption = 'Extract brain'
        OnClick = BET1Click
      end
      object Sharpen1: TMenuItem
        Caption = 'Sharpen'
        OnClick = Sharpen1Click
      end
    end
    object Colors1: TMenuItem
      Caption = 'Color'
      object Scheme1: TMenuItem
        Caption = 'Scheme'
      end
      object ToggleTransparency1: TMenuItem
        AutoCheck = True
        Caption = 'Color editor'
        OnClick = ToggleTransparency1Click
      end
      object ClrbarMenu: TMenuItem
        Caption = 'Colorbar'
        object VisibleClrbarMenu: TMenuItem
          AutoCheck = True
          Caption = 'Visible'
          Checked = True
          OnClick = ClrbarMenu1Click
        end
        object ClrbarSep: TMenuItem
          Caption = '-'
        end
        object WhiteClrbarMenu: TMenuItem
          Tag = 1
          AutoCheck = True
          Caption = 'White'
          GroupIndex = 193
          RadioItem = True
          OnClick = ClrbarMenuClick
        end
        object TransWhiteClrbarMenu: TMenuItem
          Tag = 2
          Caption = 'Translucent White'
          GroupIndex = 193
          RadioItem = True
          OnClick = ClrbarMenuClick
        end
        object BlackClrbarMenu: TMenuItem
          Tag = 3
          AutoCheck = True
          Caption = 'Black'
          GroupIndex = 193
          RadioItem = True
          OnClick = ClrbarMenuClick
        end
        object TransBlackClrbarMenu: TMenuItem
          Tag = 4
          AutoCheck = True
          Caption = 'Translucent Black'
          Checked = True
          GroupIndex = 193
          RadioItem = True
          OnClick = ClrbarMenuClick
        end
      end
      object Backcolor1: TMenuItem
        Caption = 'Back color'
        OnClick = Backcolor1Click
      end
    end
    object Help1: TMenuItem
      Caption = 'Help'
      object About1: TMenuItem
        Caption = 'About'
        OnClick = About1Click
      end
      object Preferences1: TMenuItem
        Caption = 'Preferences'
        OnClick = Preferences1Click
      end
      object OnlineHelpMenu: TMenuItem
        Caption = 'Online help'
        OnClick = OnlineHelpMenuClick
      end
    end
  end
  object OpenDialog1: TOpenDialog
    FileName = '/Users/rorden/Documents/pas'
    Filter = 'NIfTI|*.nii;*.hdr;*.nii.gz|PIC|*.PIC'
    InitialDir = '/Users/rorden/Documents/'
    left = 320
    top = 16
  end
  object ColorDialog1: TColorDialog
    Color = clBlack
    CustomColors.Strings = (
      'ColorA=000000'
      'ColorB=000080'
      'ColorC=008000'
      'ColorD=008080'
      'ColorE=800000'
      'ColorF=800080'
      'ColorG=808000'
      'ColorH=808080'
      'ColorI=C0C0C0'
      'ColorJ=0000FF'
      'ColorK=00FF00'
      'ColorL=00FFFF'
      'ColorM=FF0000'
      'ColorN=FF00FF'
      'ColorO=FFFF00'
      'ColorP=FFFFFF'
      'ColorQ=C0DCC0'
      'ColorR=F0CAA6'
      'ColorS=F0FBFF'
      'ColorT=A4A0A0'
    )
    left = 432
    top = 16
  end
  object UpdateTimer: TTimer
    Enabled = False
    Interval = 150
    OnTimer = UpdateTimerTimer
    left = 320
    top = 80
  end
  object SaveDialog1: TSaveDialog
    DefaultExt = '.png'
    Filter = 'PNG lossless|*.png'
    left = 320
    top = 144
  end
  object AutoRunTimer1: TTimer
    Enabled = False
    Interval = 250
    OnTimer = AutoRunTimer1Timer
    left = 320
    top = 208
  end
  object GradientsIdleTimer: TTimer
    Enabled = False
    OnTimer = GradientsIdleTimerTimer
    left = 320
    top = 280
  end
  object SaveDialogVoi: TSaveDialog
    Title = 'Save drawing as'
    Filter = 'Volume of Interest (.voi)|.voi|FSL (.nii.gz)|.nii.gz|SPM/FSL (.nii)|.nii'
    left = 320
    top = 344
  end
  object OpenDialogVoi: TOpenDialog
    left = 320
    top = 408
  end
  object OpenDialogTxt: TOpenDialog
    Filter = 'ITK-SnAP Label Description (txt)|*.txt'
    left = 320
    top = 472
  end
  object ErrorTimer: TTimer
    Enabled = False
    Interval = 50
    OnTimer = ErrorTimerTimer
    left = 432
    top = 72
  end
  object YokeTimer: TTimer
    Enabled = False
    Interval = 200
    OnTimer = YokeTimerTimer
    left = 429
    top = 151
  end
end