-
Notifications
You must be signed in to change notification settings - Fork 25
/
graphx.lfm
executable file
·265 lines (265 loc) · 6.37 KB
/
graphx.lfm
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
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
object Graph4DForm: TGraph4DForm
Left = 233
Height = 429
Top = 287
Width = 1097
ActiveControl = TREdit
Caption = '4D Timeline Viewer'
ClientHeight = 429
ClientWidth = 1097
Menu = MainMenu1
OnClose = FormClose
OnCreate = FormCreate
OnHide = FormHide
OnResize = FormResize
OnShow = FormShow
Position = poScreenCenter
LCLVersion = '2.1.0.0'
object Image1: TImage
Left = 0
Height = 371
Top = 40
Width = 1097
Align = alClient
end
object FourDBar: TPanel
Left = 0
Height = 40
Top = 0
Width = 1097
Align = alTop
AutoSize = True
BevelOuter = bvNone
ClientHeight = 40
ClientWidth = 1097
TabOrder = 0
object OpenDataBtn: TSpeedButton
AnchorSideLeft.Control = FourDBar
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 4
Height = 25
Top = 6
Width = 95
BorderSpacing.Left = 4
Caption = 'Open Data'
OnClick = OpenDataClick
end
object TRLabel: TLabel
AnchorSideLeft.Control = RefreshToolbar
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 149
Height = 16
Top = 10
Width = 51
BorderSpacing.Left = 4
Caption = 'TR (sec)'
ParentColor = False
end
object PlotBtn: TSpeedButton
AnchorSideLeft.Control = HSpeedDrop
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 418
Height = 25
Top = 6
Width = 63
BorderSpacing.Left = 6
Caption = 'Plot'
OnClick = PSPlotClick
end
object TextBtn: TSpeedButton
AnchorSideLeft.Control = PlotBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 487
Height = 25
Top = 6
Width = 80
BorderSpacing.Left = 6
Caption = 'Text'
OnClick = PSTextClick
end
object TREdit: TFloatSpinEdit
AnchorSideLeft.Control = TRLabel
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 204
Height = 21
Top = 8
Width = 82
BorderSpacing.Left = 4
DecimalPlaces = 4
MaxValue = 100000000
MinValue = 0
TabOrder = 0
Value = 0
end
object HSpeedDrop: TComboBox
AnchorSideLeft.Control = TREdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 292
Height = 20
Top = 8
Width = 120
BorderSpacing.Left = 6
ItemHeight = 26
Items.Strings = (
'To Fit'
'x1'
'x2'
'x3'
'x4'
'x5'
'x6'
'x7'
'x8'
'x9'
'x10'
)
OnChange = TrackBar1Change
Style = csDropDownList
TabOrder = 1
Text = '0'
end
object MinEdit: TFloatSpinEdit
AnchorSideLeft.Control = TextBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 573
Height = 21
Top = 8
Width = 82
BorderSpacing.Left = 6
DecimalPlaces = 4
MaxValue = 100000
MinValue = 0
TabOrder = 2
Value = 0
end
object MaxEdit: TFloatSpinEdit
AnchorSideLeft.Control = MinEdit
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = RefreshToolbar
AnchorSideTop.Side = asrCenter
Left = 659
Height = 21
Top = 8
Width = 82
BorderSpacing.Left = 4
DecimalPlaces = 4
MaxValue = 100000
MinValue = 0
TabOrder = 3
Value = 0
end
object TrackBar1: TTrackBar
AnchorSideLeft.Control = MaxEdit
AnchorSideLeft.Side = asrBottom
Left = 747
Height = 38
Top = 2
Width = 204
OnChange = TrackBar1Change
Position = 0
BorderSpacing.Left = 6
TabOrder = 4
Visible = False
end
object RefreshToolbar: TToolBar
AnchorSideLeft.Control = OpenDataBtn
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = FourDBar
Left = 103
Height = 36
Top = 0
Width = 42
Align = alNone
BorderSpacing.Left = 4
ButtonHeight = 32
ButtonWidth = 32
Caption = 'RefreshToolbar'
Images = ImgForm.ImageList1
ImagesWidth = 28
TabOrder = 5
object RefreshBtn: TToolButton
Left = 1
Top = 2
ImageIndex = 10
OnClick = RefreshBtnClick
OnMouseDown = RefreshBtnMouseDown
end
end
end
object StatusBar1: TStatusBar
Left = 0
Height = 18
Top = 411
Width = 1097
Panels = <
item
Width = 250
end
item
Width = 50
end>
SimplePanel = False
end
object MainMenu1: TMainMenu
left = 14
top = 5
object MenuItem1: TMenuItem
Caption = 'File'
object OpenMenu: TMenuItem
Caption = 'Open data'
ShortCut = 16463
OnClick = OpenDataClick
end
object FFTMenu: TMenuItem
Caption = 'Power spectrum'
Visible = False
OnClick = FFTitemClick
end
object SaveMenu: TMenuItem
Caption = 'Save as bitmap'
OnClick = SaveasEMF1Click
end
object Extract4Drois: TMenuItem
Caption = 'Create resting state ROIs'
OnClick = Extract4DroisClick
end
object BatchMenu: TMenuItem
Caption = 'Batch process data'
OnClick = Batchdata1Click
end
object FSLBatchMenu: TMenuItem
Caption = 'FSL batch process'
OnClick = FSLbatch1Click
end
object CloseMenu: TMenuItem
Caption = 'Close window'
ShortCut = 16471
OnClick = Closewindow1Click
end
end
object Edit1: TMenuItem
Caption = 'Edit'
object CopyMenu: TMenuItem
Caption = 'Copy'
OnClick = Copy1Click
end
end
end
object SelectDirectoryDialog1: TSelectDirectoryDialog
left = 96
top = 48
end
end