Commit a282100f7dbc9581897c20040158fd88544b6984

Authored by Carlos Picanco
1 parent d9ce2dcf
Exists in master

runner: change default of open dialog to ini

Showing 1 changed file with 87 additions and 86 deletions   Show diff stats
experiment_runner/form_matrixgame.lfm
@@ -7,7 +7,7 @@ object FormMatrixGame: TFormMatrixGame @@ -7,7 +7,7 @@ object FormMatrixGame: TFormMatrixGame
7 VertScrollBar.Page = 542 7 VertScrollBar.Page = 542
8 AutoScroll = True 8 AutoScroll = True
9 Caption = 'Matrix' 9 Caption = 'Matrix'
10 - ClientHeight = 616 10 + ClientHeight = 609
11 ClientWidth = 1167 11 ClientWidth = 1167
12 Font.Name = 'Monospace' 12 Font.Name = 'Monospace'
13 OnActivate = FormActivate 13 OnActivate = FormActivate
@@ -16,24 +16,24 @@ object FormMatrixGame: TFormMatrixGame @@ -16,24 +16,24 @@ object FormMatrixGame: TFormMatrixGame
16 AnchorSideLeft.Control = GBIndividualAB 16 AnchorSideLeft.Control = GBIndividualAB
17 AnchorSideTop.Control = GBIndividualAB 17 AnchorSideTop.Control = GBIndividualAB
18 Left = 800 18 Left = 800
19 - Height = 122 19 + Height = 131
20 Top = 8 20 Top = 8
21 - Width = 170 21 + Width = 162
22 AutoSize = True 22 AutoSize = True
23 Caption = 'Pontuação Individual' 23 Caption = 'Pontuação Individual'
24 ChildSizing.LeftRightSpacing = 35 24 ChildSizing.LeftRightSpacing = 35
25 ChildSizing.TopBottomSpacing = 45 25 ChildSizing.TopBottomSpacing = 45
26 ChildSizing.Layout = cclLeftToRightThenTopToBottom 26 ChildSizing.Layout = cclLeftToRightThenTopToBottom
27 ChildSizing.ControlsPerLine = 1 27 ChildSizing.ControlsPerLine = 1
28 - ClientHeight = 105  
29 - ClientWidth = 166 28 + ClientHeight = 108
  29 + ClientWidth = 158
30 TabOrder = 7 30 TabOrder = 7
31 Visible = False 31 Visible = False
32 object LabelIndCount: TLabel 32 object LabelIndCount: TLabel
33 Left = 35 33 Left = 35
34 - Height = 15 34 + Height = 18
35 Top = 45 35 Top = 45
36 - Width = 96 36 + Width = 88
37 Align = alClient 37 Align = alClient
38 Alignment = taCenter 38 Alignment = taCenter
39 AutoSize = False 39 AutoSize = False
@@ -71,9 +71,9 @@ object FormMatrixGame: TFormMatrixGame @@ -71,9 +71,9 @@ object FormMatrixGame: TFormMatrixGame
71 end 71 end
72 object GBIndividualAB: TGroupBox 72 object GBIndividualAB: TGroupBox
73 Left = 800 73 Left = 800
74 - Height = 122 74 + Height = 135
75 Top = 8 75 Top = 8
76 - Width = 170 76 + Width = 162
77 AutoSize = True 77 AutoSize = True
78 Caption = 'Pontuação Individual' 78 Caption = 'Pontuação Individual'
79 ChildSizing.LeftRightSpacing = 10 79 ChildSizing.LeftRightSpacing = 10
@@ -83,14 +83,14 @@ object FormMatrixGame: TFormMatrixGame @@ -83,14 +83,14 @@ object FormMatrixGame: TFormMatrixGame
83 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 83 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
84 ChildSizing.Layout = cclLeftToRightThenTopToBottom 84 ChildSizing.Layout = cclLeftToRightThenTopToBottom
85 ChildSizing.ControlsPerLine = 2 85 ChildSizing.ControlsPerLine = 2
86 - ClientHeight = 105  
87 - ClientWidth = 166 86 + ClientHeight = 112
  87 + ClientWidth = 158
88 TabOrder = 1 88 TabOrder = 1
89 object LabelIndA: TLabel 89 object LabelIndA: TLabel
90 Left = 10 90 Left = 10
91 - Height = 15 91 + Height = 19
92 Top = 30 92 Top = 30
93 - Width = 63 93 + Width = 59
94 Alignment = taCenter 94 Alignment = taCenter
95 AutoSize = False 95 AutoSize = False
96 Caption = 'A' 96 Caption = 'A'
@@ -103,10 +103,10 @@ object FormMatrixGame: TFormMatrixGame @@ -103,10 +103,10 @@ object FormMatrixGame: TFormMatrixGame
103 Transparent = False 103 Transparent = False
104 end 104 end
105 object LabelIndB: TLabel 105 object LabelIndB: TLabel
106 - Left = 93  
107 - Height = 15 106 + Left = 89
  107 + Height = 19
108 Top = 30 108 Top = 30
109 - Width = 63 109 + Width = 59
110 Alignment = taCenter 110 Alignment = taCenter
111 AutoSize = False 111 AutoSize = False
112 Caption = 'B' 112 Caption = 'B'
@@ -120,9 +120,9 @@ object FormMatrixGame: TFormMatrixGame @@ -120,9 +120,9 @@ object FormMatrixGame: TFormMatrixGame
120 end 120 end
121 object LabelIndACount: TLabel 121 object LabelIndACount: TLabel
122 Left = 10 122 Left = 10
123 - Height = 15  
124 - Top = 60  
125 - Width = 63 123 + Height = 18
  124 + Top = 64
  125 + Width = 59
126 Alignment = taCenter 126 Alignment = taCenter
127 AutoSize = False 127 AutoSize = False
128 Caption = '0' 128 Caption = '0'
@@ -131,10 +131,10 @@ object FormMatrixGame: TFormMatrixGame @@ -131,10 +131,10 @@ object FormMatrixGame: TFormMatrixGame
131 Transparent = False 131 Transparent = False
132 end 132 end
133 object LabelIndBCount: TLabel 133 object LabelIndBCount: TLabel
134 - Left = 93  
135 - Height = 15  
136 - Top = 60  
137 - Width = 63 134 + Left = 89
  135 + Height = 18
  136 + Top = 64
  137 + Width = 59
138 Alignment = taCenter 138 Alignment = taCenter
139 AutoSize = False 139 AutoSize = False
140 Caption = '0' 140 Caption = '0'
@@ -147,10 +147,10 @@ object FormMatrixGame: TFormMatrixGame @@ -147,10 +147,10 @@ object FormMatrixGame: TFormMatrixGame
147 AnchorSideLeft.Control = GBIndividualAB 147 AnchorSideLeft.Control = GBIndividualAB
148 AnchorSideLeft.Side = asrBottom 148 AnchorSideLeft.Side = asrBottom
149 AnchorSideTop.Control = GBIndividualAB 149 AnchorSideTop.Control = GBIndividualAB
150 - Left = 980  
151 - Height = 122 150 + Left = 972
  151 + Height = 131
152 Top = 8 152 Top = 8
153 - Width = 170 153 + Width = 171
154 AutoSize = True 154 AutoSize = True
155 BorderSpacing.Left = 10 155 BorderSpacing.Left = 10
156 Caption = ' Pontuação do Grupo ' 156 Caption = ' Pontuação do Grupo '
@@ -158,14 +158,14 @@ object FormMatrixGame: TFormMatrixGame @@ -158,14 +158,14 @@ object FormMatrixGame: TFormMatrixGame
158 ChildSizing.TopBottomSpacing = 45 158 ChildSizing.TopBottomSpacing = 45
159 ChildSizing.Layout = cclLeftToRightThenTopToBottom 159 ChildSizing.Layout = cclLeftToRightThenTopToBottom
160 ChildSizing.ControlsPerLine = 1 160 ChildSizing.ControlsPerLine = 1
161 - ClientHeight = 105  
162 - ClientWidth = 166 161 + ClientHeight = 108
  162 + ClientWidth = 167
163 TabOrder = 2 163 TabOrder = 2
164 object LabelGroupCount: TLabel 164 object LabelGroupCount: TLabel
165 Left = 35 165 Left = 35
166 - Height = 15 166 + Height = 18
167 Top = 45 167 Top = 45
168 - Width = 96 168 + Width = 97
169 Align = alClient 169 Align = alClient
170 Alignment = taCenter 170 Alignment = taCenter
171 AutoSize = False 171 AutoSize = False
@@ -183,9 +183,9 @@ object FormMatrixGame: TFormMatrixGame @@ -183,9 +183,9 @@ object FormMatrixGame: TFormMatrixGame
183 AnchorSideBottom.Control = Owner 183 AnchorSideBottom.Control = Owner
184 AnchorSideBottom.Side = asrBottom 184 AnchorSideBottom.Side = asrBottom
185 Left = 0 185 Left = 0
186 - Height = 17  
187 - Top = 599  
188 - Width = 1632 186 + Height = 22
  187 + Top = 587
  188 + Width = 1625
189 Anchors = [akLeft, akRight, akBottom] 189 Anchors = [akLeft, akRight, akBottom]
190 AutoSize = True 190 AutoSize = True
191 Caption = 'Escolhas na última jogada' 191 Caption = 'Escolhas na última jogada'
@@ -200,21 +200,21 @@ object FormMatrixGame: TFormMatrixGame @@ -200,21 +200,21 @@ object FormMatrixGame: TFormMatrixGame
200 AnchorSideLeft.Control = GBGrupo 200 AnchorSideLeft.Control = GBGrupo
201 AnchorSideLeft.Side = asrBottom 201 AnchorSideLeft.Side = asrBottom
202 AnchorSideTop.Control = GBGrupo 202 AnchorSideTop.Control = GBGrupo
203 - Left = 1160 203 + Left = 1153
204 Height = 486 204 Height = 486
205 Top = 8 205 Top = 8
206 Width = 472 206 Width = 472
207 BorderSpacing.Left = 10 207 BorderSpacing.Left = 10
208 Caption = 'Pesquisador' 208 Caption = 'Pesquisador'
209 - ClientHeight = 469 209 + ClientHeight = 463
210 ClientWidth = 468 210 ClientWidth = 468
211 TabOrder = 4 211 TabOrder = 4
212 Visible = False 212 Visible = False
213 object GBExperiment: TGroupBox 213 object GBExperiment: TGroupBox
214 Left = 16 214 Left = 16
215 - Height = 197 215 + Height = 221
216 Top = 60 216 Top = 60
217 - Width = 228 217 + Width = 220
218 AutoSize = True 218 AutoSize = True
219 Caption = 'Experimento' 219 Caption = 'Experimento'
220 ChildSizing.LeftRightSpacing = 10 220 ChildSizing.LeftRightSpacing = 10
@@ -224,102 +224,102 @@ object FormMatrixGame: TFormMatrixGame @@ -224,102 +224,102 @@ object FormMatrixGame: TFormMatrixGame
224 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize 224 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
225 ChildSizing.Layout = cclLeftToRightThenTopToBottom 225 ChildSizing.Layout = cclLeftToRightThenTopToBottom
226 ChildSizing.ControlsPerLine = 2 226 ChildSizing.ControlsPerLine = 2
227 - ClientHeight = 180  
228 - ClientWidth = 224 227 + ClientHeight = 198
  228 + ClientWidth = 216
229 TabOrder = 0 229 TabOrder = 0
230 object LabelExpCond: TLabel 230 object LabelExpCond: TLabel
231 Left = 10 231 Left = 10
232 - Height = 15 232 + Height = 18
233 Top = 20 233 Top = 20
234 - Width = 168 234 + Width = 154
235 Caption = 'Condição:' 235 Caption = 'Condição:'
236 ParentColor = False 236 ParentColor = False
237 end 237 end
238 object LabelExpCountCondition: TLabel 238 object LabelExpCountCondition: TLabel
239 - Left = 198  
240 - Height = 15 239 + Left = 184
  240 + Height = 18
241 Top = 20 241 Top = 20
242 - Width = 16 242 + Width = 22
243 Caption = 'NA' 243 Caption = 'NA'
244 ParentColor = False 244 ParentColor = False
245 end 245 end
246 object LabelExpGen: TLabel 246 object LabelExpGen: TLabel
247 Left = 10 247 Left = 10
248 - Height = 15  
249 - Top = 45  
250 - Width = 168 248 + Height = 18
  249 + Top = 48
  250 + Width = 154
251 Caption = 'Geração:' 251 Caption = 'Geração:'
252 ParentColor = False 252 ParentColor = False
253 end 253 end
254 object LabelExpCountGeneration: TLabel 254 object LabelExpCountGeneration: TLabel
255 - Left = 198  
256 - Height = 15  
257 - Top = 45  
258 - Width = 16 255 + Left = 184
  256 + Height = 18
  257 + Top = 48
  258 + Width = 22
259 Caption = 'NA' 259 Caption = 'NA'
260 ParentColor = False 260 ParentColor = False
261 end 261 end
262 object LabelExpCycle: TLabel 262 object LabelExpCycle: TLabel
263 Left = 10 263 Left = 10
264 - Height = 15  
265 - Top = 70  
266 - Width = 168 264 + Height = 18
  265 + Top = 76
  266 + Width = 154
267 Caption = 'Ciclo:' 267 Caption = 'Ciclo:'
268 ParentColor = False 268 ParentColor = False
269 end 269 end
270 object LabelExpCountCycle: TLabel 270 object LabelExpCountCycle: TLabel
271 - Left = 198  
272 - Height = 15  
273 - Top = 70  
274 - Width = 16 271 + Left = 184
  272 + Height = 18
  273 + Top = 76
  274 + Width = 22
275 Caption = 'NA' 275 Caption = 'NA'
276 ParentColor = False 276 ParentColor = False
277 end 277 end
278 object LabelExpTurn: TLabel 278 object LabelExpTurn: TLabel
279 Left = 10 279 Left = 10
280 - Height = 15  
281 - Top = 95  
282 - Width = 168 280 + Height = 18
  281 + Top = 104
  282 + Width = 154
283 Caption = 'Turno:' 283 Caption = 'Turno:'
284 ParentColor = False 284 ParentColor = False
285 end 285 end
286 object LabelExpCountTurn: TLabel 286 object LabelExpCountTurn: TLabel
287 - Left = 198  
288 - Height = 15  
289 - Top = 95  
290 - Width = 16 287 + Left = 184
  288 + Height = 18
  289 + Top = 104
  290 + Width = 22
291 Caption = 'NA' 291 Caption = 'NA'
292 ParentColor = False 292 ParentColor = False
293 end 293 end
294 object LabelExpInterlocks: TLabel 294 object LabelExpInterlocks: TLabel
295 Left = 10 295 Left = 10
296 - Height = 15  
297 - Top = 120  
298 - Width = 168 296 + Height = 18
  297 + Top = 132
  298 + Width = 154
299 Caption = 'Entrelaçamentos:' 299 Caption = 'Entrelaçamentos:'
300 ParentColor = False 300 ParentColor = False
301 end 301 end
302 object LabelExpCountInterlocks: TLabel 302 object LabelExpCountInterlocks: TLabel
303 - Left = 198  
304 - Height = 15  
305 - Top = 120  
306 - Width = 16 303 + Left = 184
  304 + Height = 18
  305 + Top = 132
  306 + Width = 22
307 Caption = 'NA' 307 Caption = 'NA'
308 ParentColor = False 308 ParentColor = False
309 end 309 end
310 object LabelExpTInterlocks: TLabel 310 object LabelExpTInterlocks: TLabel
311 Left = 10 311 Left = 10
312 - Height = 15  
313 - Top = 145  
314 - Width = 168 312 + Height = 18
  313 + Top = 160
  314 + Width = 154
315 Caption = 'Entrelaçamentos Alvo:' 315 Caption = 'Entrelaçamentos Alvo:'
316 ParentColor = False 316 ParentColor = False
317 end 317 end
318 object LabelExpCountTInterlocks: TLabel 318 object LabelExpCountTInterlocks: TLabel
319 - Left = 198  
320 - Height = 15  
321 - Top = 145  
322 - Width = 16 319 + Left = 184
  320 + Height = 18
  321 + Top = 160
  322 + Width = 22
323 Caption = 'NA' 323 Caption = 'NA'
324 ParentColor = False 324 ParentColor = False
325 end 325 end
@@ -372,19 +372,19 @@ object FormMatrixGame: TFormMatrixGame @@ -372,19 +372,19 @@ object FormMatrixGame: TFormMatrixGame
372 AnchorSideRight.Side = asrBottom 372 AnchorSideRight.Side = asrBottom
373 Left = 800 373 Left = 800
374 Height = 354 374 Height = 354
375 - Top = 140  
376 - Width = 350 375 + Top = 153
  376 + Width = 343
377 Anchors = [akTop, akLeft, akRight] 377 Anchors = [akTop, akLeft, akRight]
378 BorderSpacing.Top = 10 378 BorderSpacing.Top = 10
379 ClientHeight = 354 379 ClientHeight = 354
380 - ClientWidth = 350 380 + ClientWidth = 343
381 TabOrder = 6 381 TabOrder = 6
382 object ChatMemoRecv: TMemo 382 object ChatMemoRecv: TMemo
383 AnchorSideBottom.Control = ChatSplitter 383 AnchorSideBottom.Control = ChatSplitter
384 Left = 6 384 Left = 6
385 Height = 221 385 Height = 221
386 Top = 6 386 Top = 6
387 - Width = 338 387 + Width = 331
388 Align = alTop 388 Align = alTop
389 Anchors = [akTop, akLeft, akRight, akBottom] 389 Anchors = [akTop, akLeft, akRight, akBottom]
390 BorderSpacing.Left = 5 390 BorderSpacing.Left = 5
@@ -405,7 +405,7 @@ object FormMatrixGame: TFormMatrixGame @@ -405,7 +405,7 @@ object FormMatrixGame: TFormMatrixGame
405 Left = 0 405 Left = 0
406 Height = 5 406 Height = 5
407 Top = 232 407 Top = 232
408 - Width = 348 408 + Width = 341
409 Align = alNone 409 Align = alNone
410 Anchors = [akLeft, akRight] 410 Anchors = [akLeft, akRight]
411 ResizeAnchor = akTop 411 ResizeAnchor = akTop
@@ -416,7 +416,7 @@ object FormMatrixGame: TFormMatrixGame @@ -416,7 +416,7 @@ object FormMatrixGame: TFormMatrixGame
416 Left = 6 416 Left = 6
417 Height = 106 417 Height = 106
418 Top = 242 418 Top = 242
419 - Width = 338 419 + Width = 331
420 Align = alBottom 420 Align = alBottom
421 Anchors = [akTop, akLeft, akRight, akBottom] 421 Anchors = [akTop, akLeft, akRight, akBottom]
422 BorderSpacing.Around = 5 422 BorderSpacing.Around = 5
@@ -430,8 +430,9 @@ object FormMatrixGame: TFormMatrixGame @@ -430,8 +430,9 @@ object FormMatrixGame: TFormMatrixGame
430 Width = 862 430 Width = 862
431 Height = 434 431 Height = 434
432 Title = 'Abrir Experimento' 432 Title = 'Abrir Experimento'
433 - DefaultExt = '.txt' 433 + DefaultExt = '.ini'
434 Filter = 'txt|*.txt|ini|*.ini' 434 Filter = 'txt|*.txt|ini|*.ini'
  435 + FilterIndex = 2
435 InitialDir = 'Pesquisadores' 436 InitialDir = 'Pesquisadores'
436 Options = [ofNoChangeDir, ofFileMustExist, ofNoNetworkButton, ofEnableSizing, ofDontAddToRecent] 437 Options = [ofNoChangeDir, ofFileMustExist, ofNoNetworkButton, ofEnableSizing, ofDontAddToRecent]
437 left = 24 438 left = 24