File: ROIfilt.lfm

package info (click to toggle)
mricron 0.20140804.1~dfsg.1-3
  • links: PTS, VCS
  • area: main
  • in suites: buster, sid
  • size: 13,508 kB
  • sloc: pascal: 114,876; sh: 49; makefile: 35
file content (93 lines) | stat: -rwxr-xr-x 2,000 bytes parent folder | download | duplicates (4)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
object FilterROIform: TFilterROIform
  Left = 569
  Height = 190
  Top = 107
  Width = 240
  HorzScrollBar.Page = 209
  VertScrollBar.Page = 196
  ActiveControl = MinROIfilt
  BorderIcons = [biSystemMenu]
  BorderStyle = bsToolWindow
  Caption = 'Intensity filter'
  ClientHeight = 190
  ClientWidth = 240
  Constraints.MaxHeight = 190
  Constraints.MaxWidth = 240
  Constraints.MinHeight = 190
  Font.Name = 'MS Sans Serif'
  OnClose = FormClose
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '0.9.29'
  object Label42: TLabel
    Left = 4
    Height = 17
    Top = 14
    Width = 89
    Caption = 'Min. Threshold'
    ParentColor = False
  end
  object FilterROIBtn: TSpeedButton
    Left = 4
    Height = 25
    Top = 143
    Width = 221
    Caption = 'Filter VOI with highlighted'
    Color = clBtnFace
    NumGlyphs = 0
    OnClick = FilterROIBtnClick
    ShowHint = True
    ParentShowHint = False
  end
  object Label43: TLabel
    Left = 4
    Height = 14
    Top = 49
    Width = 75
    Caption = 'Max. Threshold'
    Font.CharSet = 13
    ParentColor = False
    ParentFont = False
  end
  object Filter2NIfTIBtn: TSpeedButton
    Tag = 128
    Left = 4
    Height = 25
    Top = 107
    Width = 221
    Caption = 'Save highlighted as NIfTI or VOI'
    Color = clBtnFace
    NumGlyphs = 0
    OnClick = Filter2NIfTIBtnClick
    ShowHint = True
    ParentShowHint = False
  end
  object FiltROILabel: TLabel
    Left = 8
    Height = 17
    Top = 81
    Width = 22
    Caption = '       '
    ParentColor = False
  end
  object MinROIfilt: TSpinEdit
    Left = 120
    Height = 24
    Top = 7
    Width = 52
    MaxValue = 254
    OnChange = MinROIfiltChange
    TabOrder = 0
    Value = 100
  end
  object MaxROIfilt: TSpinEdit
    Left = 120
    Height = 24
    Top = 42
    Width = 52
    MaxValue = 255
    OnChange = MinROIfiltChange
    TabOrder = 1
    Value = 255
  end
end