Subversion Repositories plumbers

Rev

Rev 7 | Rev 10 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 7 Rev 8
Line 35... Line 35...
35
      'SC01'
35
      'SC01'
36
      'SC02')
36
      'SC02')
37
    TabOrder = 0
37
    TabOrder = 0
38
    OnClick = ListBox1Click
38
    OnClick = ListBox1Click
39
    OnDblClick = ListBox1DblClick
39
    OnDblClick = ListBox1DblClick
40
    ExplicitHeight = 466
-
 
41
  end
40
  end
42
  object Button1: TButton
41
  object Button1: TButton
43
    Left = 145
42
    Left = 145
44
    Top = 492
43
    Top = 492
45
    Width = 33
44
    Width = 33
46
    Height = 25
45
    Height = 25
47
    Anchors = [akLeft, akBottom]
46
    Anchors = [akLeft, akBottom]
48
    Caption = '+'
47
    Caption = '+'
49
    TabOrder = 3
48
    TabOrder = 3
50
    OnClick = Button1Click
49
    OnClick = Button1Click
51
    ExplicitTop = 488
-
 
52
  end
50
  end
53
  object Button2: TButton
51
  object Button2: TButton
54
    Left = 184
52
    Left = 184
55
    Top = 492
53
    Top = 492
56
    Width = 33
54
    Width = 33
57
    Height = 25
55
    Height = 25
58
    Anchors = [akLeft, akBottom]
56
    Anchors = [akLeft, akBottom]
59
    Caption = '-'
57
    Caption = '-'
60
    TabOrder = 4
58
    TabOrder = 4
61
    OnClick = Button2Click
59
    OnClick = Button2Click
62
    ExplicitTop = 488
-
 
63
  end
60
  end
64
  object Button3: TButton
61
  object Button3: TButton
65
    Left = 8
62
    Left = 8
66
    Top = 565
63
    Top = 565
67
    Width = 105
64
    Width = 105
68
    Height = 46
65
    Height = 46
69
    Anchors = [akLeft, akBottom]
66
    Anchors = [akLeft, akBottom]
70
    Caption = 'Save'
67
    Caption = 'Save'
71
    TabOrder = 6
68
    TabOrder = 6
72
    OnClick = Button3Click
69
    OnClick = Button3Click
73
    ExplicitTop = 534
-
 
74
  end
70
  end
75
  object Button4: TButton
71
  object Button4: TButton
76
    Left = 8
72
    Left = 8
77
    Top = 492
73
    Top = 492
78
    Width = 33
74
    Width = 33
79
    Height = 25
75
    Height = 25
80
    Anchors = [akLeft, akBottom]
76
    Anchors = [akLeft, akBottom]
81
    Caption = '^'
77
    Caption = '^'
82
    TabOrder = 1
78
    TabOrder = 1
83
    OnClick = Button4Click
79
    OnClick = Button4Click
84
    ExplicitTop = 488
-
 
85
  end
80
  end
86
  object Button5: TButton
81
  object Button5: TButton
87
    Left = 47
82
    Left = 47
88
    Top = 492
83
    Top = 492
89
    Width = 33
84
    Width = 33
90
    Height = 25
85
    Height = 25
91
    Anchors = [akLeft, akBottom]
86
    Anchors = [akLeft, akBottom]
92
    Caption = 'v'
87
    Caption = 'v'
93
    TabOrder = 2
88
    TabOrder = 2
94
    OnClick = Button5Click
89
    OnClick = Button5Click
95
    ExplicitTop = 488
-
 
96
  end
90
  end
97
  object Button10: TButton
91
  object Button10: TButton
98
    Left = 112
92
    Left = 112
99
    Top = 565
93
    Top = 565
100
    Width = 105
94
    Width = 105
101
    Height = 46
95
    Height = 46
102
    Anchors = [akLeft, akBottom]
96
    Anchors = [akLeft, akBottom]
103
    Caption = 'Save + Test'
97
    Caption = 'Save + Test'
104
    TabOrder = 7
98
    TabOrder = 7
105
    OnClick = Button10Click
99
    OnClick = Button10Click
106
    ExplicitTop = 534
-
 
107
  end
100
  end
108
  object PageControl2: TPageControl
101
  object PageControl2: TPageControl
109
    Left = 223
102
    Left = 223
110
    Top = 8
103
    Top = 8
111
    Width = 799
104
    Width = 799
112
    Height = 603
105
    Height = 603
113
    ActivePage = TabSheet5
106
    ActivePage = TabSheet4
114
    Anchors = [akLeft, akTop, akRight, akBottom]
107
    Anchors = [akLeft, akTop, akRight, akBottom]
115
    TabOrder = 8
108
    TabOrder = 8
116
    ExplicitWidth = 812
-
 
117
    ExplicitHeight = 572
-
 
118
    object TabSheet4: TTabSheet
109
    object TabSheet4: TTabSheet
119
      Caption = 'Pictures'
110
      Caption = 'Pictures'
120
      ExplicitWidth = 804
-
 
121
      ExplicitHeight = 544
-
 
122
      DesignSize = (
111
      DesignSize = (
123
        791
112
        791
124
        575)
113
        575)
125
      object Label1: TLabel
114
      object Label1: TLabel
126
        Left = 16
115
        Left = 16
Line 240... Line 229...
240
        Height = 25
229
        Height = 25
241
        Anchors = [akLeft, akBottom]
230
        Anchors = [akLeft, akBottom]
242
        Caption = '+'
231
        Caption = '+'
243
        TabOrder = 6
232
        TabOrder = 6
244
        OnClick = Button6Click
233
        OnClick = Button6Click
245
        ExplicitTop = 517
-
 
246
      end
234
      end
247
      object Button7: TButton
235
      object Button7: TButton
248
        Left = 216
236
        Left = 216
249
        Top = 533
237
        Top = 533
250
        Width = 33
238
        Width = 33
251
        Height = 25
239
        Height = 25
252
        Anchors = [akLeft, akBottom]
240
        Anchors = [akLeft, akBottom]
253
        Caption = '-'
241
        Caption = '-'
254
        TabOrder = 7
242
        TabOrder = 7
255
        OnClick = Button7Click
243
        OnClick = Button7Click
256
        ExplicitTop = 517
-
 
257
      end
244
      end
258
      object Button8: TButton
245
      object Button8: TButton
259
        Left = 11
246
        Left = 11
260
        Top = 533
247
        Top = 533
261
        Width = 33
248
        Width = 33
262
        Height = 25
249
        Height = 25
263
        Anchors = [akLeft, akBottom]
250
        Anchors = [akLeft, akBottom]
264
        Caption = '^'
251
        Caption = '^'
265
        TabOrder = 4
252
        TabOrder = 4
266
        OnClick = Button8Click
253
        OnClick = Button8Click
267
        ExplicitTop = 517
-
 
268
      end
254
      end
269
      object Button9: TButton
255
      object Button9: TButton
270
        Left = 50
256
        Left = 50
271
        Top = 533
257
        Top = 533
272
        Width = 33
258
        Width = 33
273
        Height = 25
259
        Height = 25
274
        Anchors = [akLeft, akBottom]
260
        Anchors = [akLeft, akBottom]
275
        Caption = 'v'
261
        Caption = 'v'
276
        TabOrder = 5
262
        TabOrder = 5
277
        OnClick = Button9Click
263
        OnClick = Button9Click
278
        ExplicitTop = 517
-
 
279
      end
264
      end
280
      object ListBox2: TListBox
265
      object ListBox2: TListBox
281
        Left = 10
266
        Left = 10
282
        Top = 127
267
        Top = 127
283
        Width = 239
268
        Width = 239
Line 285... Line 270...
285
        Anchors = [akLeft, akTop, akBottom]
270
        Anchors = [akLeft, akTop, akBottom]
286
        ItemHeight = 13
271
        ItemHeight = 13
287
        TabOrder = 3
272
        TabOrder = 3
288
        OnClick = ListBox2Click
273
        OnClick = ListBox2Click
289
        OnDblClick = ListBox2DblClick
274
        OnDblClick = ListBox2DblClick
290
        ExplicitHeight = 396
-
 
291
      end
275
      end
292
      object Edit3: TEdit
276
      object Edit3: TEdit
293
        Left = 368
277
        Left = 368
294
        Top = 143
278
        Top = 143
295
        Width = 137
279
        Width = 137
Line 422... Line 406...
422
        Height = 125
406
        Height = 125
423
        Anchors = [akLeft, akTop, akBottom]
407
        Anchors = [akLeft, akTop, akBottom]
424
        ItemHeight = 13
408
        ItemHeight = 13
425
        PopupMenu = PopupMenu1
409
        PopupMenu = PopupMenu1
426
        TabOrder = 11
410
        TabOrder = 11
-
 
411
        OnClick = ListBox3Click
427
        OnDblClick = ListBox3DblClick
412
        OnDblClick = ListBox3DblClick
428
        OnMouseDown = ListBox3MouseDown
413
        OnMouseDown = ListBox3MouseDown
429
      end
414
      end
430
      object Button12: TButton
415
      object Button12: TButton
431
        Left = 511
416
        Left = 511
Line 470... Line 455...
470
          Left = 0
455
          Left = 0
471
          Top = 1
456
          Top = 1
472
          Width = 305
457
          Width = 305
473
          Height = 211
458
          Height = 211
474
          Stretch = True
459
          Stretch = True
475
          OnMouseMove = Image1MouseMove
460
          OnDblClick = Button12Click
-
 
461
        end
-
 
462
      end
-
 
463
      object Panel3: TPanel
-
 
464
        Left = 583
-
 
465
        Top = 439
-
 
466
        Width = 194
-
 
467
        Height = 122
-
 
468
        BevelOuter = bvNone
-
 
469
        TabOrder = 17
-
 
470
        object Image3: TImage
-
 
471
          Left = 8
-
 
472
          Top = 0
-
 
473
          Width = 177
-
 
474
          Height = 108
-
 
475
          Stretch = True
-
 
476
          OnDblClick = ListBox3DblClick
476
        end
477
        end
477
      end
478
      end
478
    end
479
    end
479
    object TabSheet5: TTabSheet
480
    object TabSheet5: TTabSheet
480
      Caption = 'Decision'
481
      Caption = 'Decision'
481
      ImageIndex = 1
482
      ImageIndex = 1
482
      ExplicitWidth = 804
-
 
483
      ExplicitHeight = 573
-
 
484
      object Label3: TLabel
483
      object Label3: TLabel
485
        Left = 16
484
        Left = 16
486
        Top = 16
485
        Top = 16
487
        Width = 80
486
        Width = 80
488
        Height = 13
487
        Height = 13
Line 785... Line 784...
785
            Top = 119
784
            Top = 119
786
            Width = 57
785
            Width = 57
787
            Height = 22
786
            Height = 22
788
            MaxValue = 0
787
            MaxValue = 0
789
            MinValue = 0
788
            MinValue = 0
790
            TabOrder = 3
789
            TabOrder = 4
791
            Value = 0
790
            Value = 0
792
            OnChange = ActionSpinEditsChange
791
            OnChange = ActionSpinEditsChange
793
          end
792
          end
794
          object SpinEdit10: TSpinEdit
793
          object SpinEdit10: TSpinEdit
795
            Left = 16
794
            Left = 16
796
            Top = 119
795
            Top = 119
797
            Width = 57
796
            Width = 57
798
            Height = 22
797
            Height = 22
799
            MaxValue = 0
798
            MaxValue = 0
800
            MinValue = 0
799
            MinValue = 0
801
            TabOrder = 4
800
            TabOrder = 3
802
            Value = 0
801
            Value = 0
803
            OnChange = ActionSpinEditsChange
802
            OnChange = ActionSpinEditsChange
804
          end
803
          end
805
          object SpinEdit11: TSpinEdit
804
          object SpinEdit11: TSpinEdit
806
            Left = 171
805
            Left = 171
Line 871... Line 870...
871
    Height = 25
870
    Height = 25
872
    Anchors = [akLeft, akBottom]
871
    Anchors = [akLeft, akBottom]
873
    Caption = 'New'
872
    Caption = 'New'
874
    TabOrder = 5
873
    TabOrder = 5
875
    OnClick = Button14Click
874
    OnClick = Button14Click
876
    ExplicitTop = 530
-
 
877
  end
875
  end
878
  object Timer1: TTimer
876
  object Timer1: TTimer
879
    Enabled = False
877
    Enabled = False
880
    Interval = 100
878
    Interval = 100
881
    OnTimer = Timer1Timer
879
    OnTimer = Timer1Timer