File: MultiSlice.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 (171 lines) | stat: -rwxr-xr-x 4,263 bytes parent folder | download | duplicates (3)
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
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
object MultiSliceForm: TMultiSliceForm
  Left = 493
  Height = 242
  Top = 292
  Width = 745
  Caption = 'MultiSlice'
  ClientHeight = 242
  ClientWidth = 745
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Menu = MainMenu1
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  Position = poScreenCenter
  LCLVersion = '0.9.30.2'
  object MultiPanel: TScrollBox
    Left = 0
    Height = 242
    Top = 0
    Width = 745
    Align = alClient
    ClientHeight = 242
    ClientWidth = 745
    TabOrder = 0
    object MultiImage: TImage
      Tag = 2
      Cursor = crCross
      Left = 2
      Height = 12
      Top = 2
      Width = 12
      AutoSize = True
      Stretch = True
    end
  end
  object MainMenu1: TMainMenu
    left = 40
    top = 8
    object File1: TMenuItem
      Caption = 'File'
      object Settings1: TMenuItem
        Caption = 'Open settings'
        OnClick = Settings1Click
      end
      object Savesettings1: TMenuItem
        Caption = 'Save settings'
        ShortCut = 16467
        OnClick = Savesettings1Click
      end
      object Saveasbitmap1: TMenuItem
        Caption = 'Save as bitmap...'
        OnClick = Saveasbitmap1Click
      end
      object Closewindow1: TMenuItem
        Caption = 'Close window'
        ShortCut = 16471
        OnClick = Closewindow1Click
      end
    end
    object Edit1: TMenuItem
      Caption = 'Edit'
      object Copy1: TMenuItem
        Caption = 'Copy'
        ShortCut = 16451
        OnClick = Copy1Click
      end
    end
    object View1: TMenuItem
      Caption = 'View'
      object OrientMenu: TMenuItem
        Caption = 'Orient'
        object Sagittal1: TMenuItem
          Tag = 2
          Caption = 'Sagittal'
          GroupIndex = 129
          RadioItem = True
          OnClick = OrientClick
        end
        object Coronal1: TMenuItem
          Tag = 3
          Caption = 'Coronal'
          GroupIndex = 129
          RadioItem = True
          OnClick = OrientClick
        end
        object Axial1: TMenuItem
          Tag = 1
          Caption = 'Axial'
          Checked = True
          GroupIndex = 129
          RadioItem = True
          OnClick = OrientClick
        end
      end
      object OversliceMenu: TMenuItem
        Caption = 'Overslice'
        object N501: TMenuItem
          Tag = -50
          Caption = '-50%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N331: TMenuItem
          Tag = -35
          Caption = '-35%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N201: TMenuItem
          Tag = -20
          Caption = '-20%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N01: TMenuItem
          Caption = '0%'
          Checked = True
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N202: TMenuItem
          Tag = 20
          Caption = '20%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N351: TMenuItem
          Tag = 35
          Caption = '35%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
        object N502: TMenuItem
          Tag = 50
          Caption = '50%'
          GroupIndex = 158
          RadioItem = True
          OnClick = OverlsiceClick
        end
      end
      object Orthoview: TMenuItem
        Caption = 'Orthogonal view'
        Checked = True
        OnClick = OrthoviewClick
      end
      object SliceLabelCheck: TMenuItem
        Caption = 'Show slice label'
        Checked = True
        OnClick = SliceLabelCheckClick
      end
      object Slices1: TMenuItem
        Caption = 'Slices...'
        OnClick = Slices1Click
      end
    end
  end
  object MultiSaveDialog: TSaveDialog
    DefaultExt = '.ini'
    Filter = 'Settings file|*.ini'
    FilterIndex = 0
    left = 97
    top = 11
  end
end