Subversion Repositories plumbers

Rev

Rev 6 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 daniel-mar 1
object Form1: TForm1
2
  Left = 0
3
  Top = 0
4
  BorderIcons = [biSystemMenu, biMinimize]
5
  BorderStyle = bsSingle
6
  Caption = 'ShowTime Editor'
7
  ClientHeight = 628
8
  ClientWidth = 1043
9
  Color = clBtnFace
10
  Font.Charset = DEFAULT_CHARSET
11
  Font.Color = clWindowText
12
  Font.Height = -11
13
  Font.Name = 'Tahoma'
14
  Font.Style = []
15
  Menu = MainMenu1
16
  OldCreateOrder = False
17
  Position = poScreenCenter
18
  OnCreate = FormCreate
19
  OnShow = FormShow
20
  DesignSize = (
21
    1043
22
    628)
23
  PixelsPerInch = 96
24
  TextHeight = 13
25
  object ListBox1: TListBox
26
    Left = 8
27
    Top = 8
28
    Width = 209
29
    Height = 466
30
    ItemHeight = 13
31
    Items.Strings = (
32
      'SC99'
33
      'SC00'
34
      'SC01'
35
      'SC02')
36
    TabOrder = 0
37
    OnClick = ListBox1Click
38
    OnDblClick = ListBox1DblClick
39
  end
40
  object Button1: TButton
41
    Left = 97
42
    Top = 485
43
    Width = 33
44
    Height = 25
45
    Caption = '+'
46
    TabOrder = 3
47
    OnClick = Button1Click
48
  end
49
  object Button2: TButton
50
    Left = 136
51
    Top = 485
52
    Width = 33
53
    Height = 25
54
    Caption = '-'
55
    TabOrder = 4
56
    OnClick = Button2Click
57
  end
58
  object Button3: TButton
59
    Left = 8
60
    Top = 574
61
    Width = 105
62
    Height = 46
63
    Anchors = [akLeft, akBottom]
64
    Caption = 'Save'
65
    TabOrder = 6
66
    OnClick = Button3Click
67
  end
68
  object Button4: TButton
69
    Left = 8
70
    Top = 485
71
    Width = 33
72
    Height = 25
73
    Caption = '^'
74
    TabOrder = 1
75
    OnClick = Button4Click
76
  end
77
  object Button5: TButton
78
    Left = 47
79
    Top = 485
80
    Width = 33
81
    Height = 25
82
    Caption = 'v'
83
    TabOrder = 2
84
    OnClick = Button5Click
85
  end
86
  object Button10: TButton
87
    Left = 112
88
    Top = 574
89
    Width = 105
90
    Height = 46
91
    Anchors = [akLeft, akBottom]
92
    Caption = 'Save + Test'
93
    TabOrder = 7
94
    OnClick = Button10Click
95
  end
96
  object PageControl2: TPageControl
97
    Left = 223
98
    Top = 8
99
    Width = 812
100
    Height = 612
101
    ActivePage = TabSheet4
102
    Anchors = [akLeft, akTop, akRight, akBottom]
103
    TabOrder = 8
104
    object TabSheet4: TTabSheet
105
      Caption = 'Pictures'
106
      DesignSize = (
107
        804
108
        584)
109
      object Label1: TLabel
110
        Left = 16
111
        Top = 24
112
        Width = 77
113
        Height = 13
114
        Caption = 'SceneID (0-99):'
115
      end
116
      object Label2: TLabel
117
        Left = 15
118
        Top = 63
119
        Width = 79
120
        Height = 13
121
        Caption = 'Sound playback:'
122
      end
123
      object Image2: TImage
124
        Left = 272
125
        Top = 190
126
        Width = 305
127
        Height = 211
128
        Stretch = True
129
        OnMouseMove = Image1MouseMove
130
      end
131
      object Label12: TLabel
132
        Left = 272
133
        Top = 127
134
        Width = 67
135
        Height = 13
136
        Caption = 'Duration [ds]:'
137
      end
138
      object Label16: TLabel
139
        Left = 368
140
        Top = 124
141
        Width = 46
142
        Height = 13
143
        Caption = 'Filename:'
144
      end
145
      object Label17: TLabel
146
        Left = 162
147
        Top = 24
148
        Width = 126
149
        Height = 13
150
        Caption = 'Attention: ID exists twice!'
151
        Font.Charset = DEFAULT_CHARSET
152
        Font.Color = clRed
153
        Font.Height = -11
154
        Font.Name = 'Tahoma'
155
        Font.Style = []
156
        ParentFont = False
157
        Visible = False
158
      end
159
      object Label19: TLabel
160
        Left = 272
161
        Top = 432
162
        Width = 62
163
        Height = 13
164
        Caption = 'Unused files:'
165
      end
166
      object Label24: TLabel
167
        Left = 247
168
        Top = 63
169
        Width = 118
170
        Height = 13
171
        Caption = 'Attention: File not found'
172
        Font.Charset = DEFAULT_CHARSET
173
        Font.Color = clRed
174
        Font.Height = -11
175
        Font.Name = 'Tahoma'
176
        Font.Style = []
177
        ParentFont = False
178
        Visible = False
179
      end
180
      object Label25: TLabel
181
        Left = 247
182
        Top = 82
183
        Width = 222
184
        Height = 13
185
        Caption = 'Attention: Low Quality file (E*.wav) not found'
186
        Font.Charset = DEFAULT_CHARSET
187
        Font.Color = clRed
188
        Font.Height = -11
189
        Font.Name = 'Tahoma'
190
        Font.Style = []
191
        ParentFont = False
192
        Visible = False
193
      end
194
      object Label26: TLabel
195
        Left = 368
196
        Top = 170
197
        Width = 118
198
        Height = 13
199
        Caption = 'Attention: File not found'
200
        Font.Charset = DEFAULT_CHARSET
201
        Font.Color = clRed
202
        Font.Height = -11
203
        Font.Name = 'Tahoma'
204
        Font.Style = []
205
        ParentFont = False
206
        Visible = False
207
      end
208
      object SpinEdit1: TSpinEdit
209
        Left = 99
210
        Top = 21
211
        Width = 57
212
        Height = 22
213
        MaxValue = 99
214
        MinValue = 0
215
        TabOrder = 0
216
        Value = 0
217
        OnChange = SpinEdit1Change
218
      end
219
      object Edit1: TEdit
220
        Left = 100
221
        Top = 60
222
        Width = 104
223
        Height = 21
224
        MaxLength = 13
225
        TabOrder = 1
226
        OnChange = Edit1Change
227
      end
228
      object Button6: TButton
229
        Left = 100
230
        Top = 453
231
        Width = 33
232
        Height = 25
233
        Caption = '+'
234
        TabOrder = 6
235
        OnClick = Button6Click
236
      end
237
      object Button7: TButton
238
        Left = 139
239
        Top = 453
240
        Width = 33
241
        Height = 25
242
        Caption = '-'
243
        TabOrder = 7
244
        OnClick = Button7Click
245
      end
246
      object Button8: TButton
247
        Left = 11
248
        Top = 453
249
        Width = 33
250
        Height = 25
251
        Caption = '^'
252
        TabOrder = 4
253
        OnClick = Button8Click
254
      end
255
      object Button9: TButton
256
        Left = 50
257
        Top = 453
258
        Width = 33
259
        Height = 25
260
        Caption = 'v'
261
        TabOrder = 5
262
        OnClick = Button9Click
263
      end
264
      object ListBox2: TListBox
265
        Left = 10
266
        Top = 127
267
        Width = 239
268
        Height = 306
269
        ItemHeight = 13
270
        TabOrder = 3
271
        OnClick = ListBox2Click
272
        OnDblClick = ListBox2DblClick
273
      end
274
      object Edit3: TEdit
275
        Left = 368
276
        Top = 143
277
        Width = 137
278
        Height = 21
279
        TabOrder = 9
280
        OnChange = Edit3Change
281
      end
282
      object SpinEdit13: TSpinEdit
283
        Left = 272
284
        Top = 143
285
        Width = 65
286
        Height = 22
287
        MaxValue = 0
288
        MinValue = 0
289
        TabOrder = 8
290
        Value = 0
291
        OnChange = SpinEdit13Change
292
      end
293
      object Button13: TButton
294
        Left = 664
295
        Top = 19
296
        Width = 120
297
        Height = 25
298
        Anchors = [akTop, akRight]
299
        Caption = 'Open scene folder'
300
        TabOrder = 12
301
        OnClick = Button13Click
302
      end
303
      object MediaPlayer1: TMediaPlayer
304
        Left = 684
305
        Top = 371
306
        Width = 29
307
        Height = 30
308
        ColoredButtons = []
309
        VisibleButtons = [btPlay]
310
        DoubleBuffered = True
311
        Visible = False
312
        ParentDoubleBuffered = False
313
        TabOrder = 14
314
      end
315
      object GroupBox1: TGroupBox
316
        Left = 591
317
        Top = 63
318
        Width = 185
319
        Height = 121
320
        Caption = 'Scene length'
321
        TabOrder = 15
322
        object Label20: TLabel
323
          Left = 16
324
          Top = 24
325
          Width = 119
326
          Height = 13
327
          Caption = 'Picture sequence length:'
328
        end
329
        object Label21: TLabel
330
          Left = 16
331
          Top = 43
332
          Width = 37
333
          Height = 13
334
          Caption = 'Label21'
335
        end
336
        object Label22: TLabel
337
          Left = 16
338
          Top = 72
339
          Width = 91
340
          Height = 13
341
          Caption = 'Soundtrack length:'
342
        end
343
        object Label23: TLabel
344
          Left = 16
345
          Top = 91
346
          Width = 37
347
          Height = 13
348
          Caption = 'Label23'
349
        end
350
      end
351
      object GroupBox2: TGroupBox
352
        Left = 591
353
        Top = 190
354
        Width = 185
355
        Height = 167
356
        Caption = 'Playback'
357
        TabOrder = 13
358
        object Label18: TLabel
359
          Left = 14
360
          Top = 128
361
          Width = 153
362
          Height = 24
363
          Alignment = taCenter
364
          AutoSize = False
365
          Caption = 'Label18'
366
          Font.Charset = DEFAULT_CHARSET
367
          Font.Color = clWindowText
368
          Font.Height = -20
369
          Font.Name = 'Tahoma'
370
          Font.Style = []
371
          ParentFont = False
372
        end
373
        object Button15: TButton
374
          Left = 23
375
          Top = 27
376
          Width = 137
377
          Height = 25
378
          Caption = 'Start from here'
379
          TabOrder = 0
380
          OnClick = Button15Click
381
        end
382
        object Button17: TButton
383
          Left = 22
384
          Top = 89
385
          Width = 137
386
          Height = 25
387
          Caption = 'Stop'
388
          TabOrder = 2
389
          OnClick = Button17Click
390
        end
391
        object Button16: TButton
392
          Left = 23
393
          Top = 58
394
          Width = 137
395
          Height = 25
396
          Caption = 'Start from beginning'
397
          TabOrder = 1
398
          OnClick = Button16Click
399
        end
400
      end
401
      object ListBox3: TListBox
402
        Left = 272
403
        Top = 453
404
        Width = 225
405
        Height = 97
406
        ItemHeight = 13
407
        PopupMenu = PopupMenu1
408
        TabOrder = 11
409
        OnDblClick = ListBox3DblClick
410
        OnMouseDown = ListBox3MouseDown
411
      end
412
      object Button12: TButton
413
        Left = 511
414
        Top = 143
415
        Width = 26
416
        Height = 21
417
        Caption = '1'
418
        Font.Charset = DEFAULT_CHARSET
419
        Font.Color = clWindowText
420
        Font.Height = -15
421
        Font.Name = 'Wingdings'
422
        Font.Style = []
423
        ParentFont = False
424
        TabOrder = 10
425
        Visible = False
426
        OnClick = Button12Click
427
      end
428
      object Button18: TButton
429
        Left = 210
430
        Top = 60
431
        Width = 31
432
        Height = 21
433
        Caption = '1'
434
        Font.Charset = DEFAULT_CHARSET
435
        Font.Color = clWindowText
436
        Font.Height = -15
437
        Font.Name = 'Wingdings'
438
        Font.Style = []
439
        ParentFont = False
440
        TabOrder = 2
441
        Visible = False
442
        OnClick = Button18Click
443
      end
444
    end
445
    object TabSheet5: TTabSheet
446
      Caption = 'Decision'
447
      ImageIndex = 1
448
      object Label3: TLabel
449
        Left = 16
450
        Top = 16
451
        Width = 80
452
        Height = 13
453
        Caption = 'Decision-Picture:'
454
      end
455
      object Image1: TImage
456
        Left = 12
457
        Top = 255
458
        Width = 409
459
        Height = 290
460
        Cursor = crCross
461
        Stretch = True
462
        OnMouseDown = Image1MouseDown
463
        OnMouseEnter = Image1MouseEnter
464
        OnMouseLeave = Image1MouseLeave
465
        OnMouseMove = Image1MouseMove
466
      end
467
      object Label10: TLabel
468
        Left = 12
469
        Top = 552
470
        Width = 37
471
        Height = 13
472
        Caption = 'Label10'
473
      end
474
      object Label11: TLabel
475
        Left = 320
476
        Top = 17
477
        Width = 39
478
        Height = 13
479
        Caption = 'Actions:'
480
      end
481
      object Label27: TLabel
482
        Left = 183
483
        Top = 38
484
        Width = 118
485
        Height = 13
486
        Caption = 'Attention: File not found'
487
        Font.Charset = DEFAULT_CHARSET
488
        Font.Color = clRed
489
        Font.Height = -11
490
        Font.Name = 'Tahoma'
491
        Font.Style = []
492
        ParentFont = False
493
        Visible = False
494
      end
495
      object Label28: TLabel
496
        Left = 427
497
        Top = 509
498
        Width = 180
499
        Height = 13
500
        Caption = 'Left mouse button: Set top-left coord'
501
        Visible = False
502
      end
503
      object Label29: TLabel
504
        Left = 427
505
        Top = 528
506
        Width = 210
507
        Height = 13
508
        Caption = 'Right mouse button: Set bottom-right coord'
509
        Visible = False
510
      end
511
      object Edit2: TEdit
512
        Left = 12
513
        Top = 35
514
        Width = 134
515
        Height = 21
516
        MaxLength = 13
517
        TabOrder = 0
518
        OnChange = Edit2Change
519
      end
520
      object PageControl1: TPageControl
521
        Left = 12
522
        Top = 64
523
        Width = 365
524
        Height = 185
525
        ActivePage = TabSheet3
526
        TabOrder = 3
527
        object TabSheet1: TTabSheet
528
          Caption = 'Action 1 (Red)'
529
          ExplicitWidth = 333
530
          object Label5: TLabel
531
            Left = 171
532
            Top = 72
533
            Width = 29
534
            Height = 13
535
            Caption = 'Points'
536
          end
537
          object Label4: TLabel
538
            Left = 16
539
            Top = 72
540
            Width = 116
541
            Height = 13
542
            Caption = 'Grid corner coordinates:'
543
          end
544
          object Label6: TLabel
545
            Left = 16
546
            Top = 16
547
            Width = 36
548
            Height = 13
549
            Caption = 'Target:'
550
          end
551
          object SpinEdit6: TSpinEdit
552
            Left = 171
553
            Top = 94
554
            Width = 126
555
            Height = 22
556
            MaxValue = 0
557
            MinValue = 0
558
            TabOrder = 5
559
            Value = 0
560
            OnChange = ActionSpinEditsChange
561
          end
562
          object SpinEdit2: TSpinEdit
563
            Left = 79
564
            Top = 91
565
            Width = 57
566
            Height = 22
567
            MaxValue = 0
568
            MinValue = 0
569
            TabOrder = 2
570
            Value = 0
571
            OnChange = ActionSpinEditsChange
572
          end
573
          object SpinEdit3: TSpinEdit
574
            Left = 16
575
            Top = 91
576
            Width = 57
577
            Height = 22
578
            MaxValue = 0
579
            MinValue = 0
580
            TabOrder = 1
581
            Value = 0
582
            OnChange = ActionSpinEditsChange
583
          end
584
          object SpinEdit4: TSpinEdit
585
            Left = 16
586
            Top = 119
587
            Width = 57
588
            Height = 22
589
            MaxValue = 0
590
            MinValue = 0
591
            TabOrder = 3
592
            Value = 0
593
            OnChange = ActionSpinEditsChange
594
          end
595
          object SpinEdit5: TSpinEdit
596
            Left = 79
597
            Top = 119
598
            Width = 57
599
            Height = 22
600
            MaxValue = 0
601
            MinValue = 0
602
            TabOrder = 4
603
            Value = 0
604
            OnChange = ActionSpinEditsChange
605
          end
606
          object ComboBox1: TComboBox
607
            Left = 16
608
            Top = 35
609
            Width = 145
610
            Height = 21
611
            Style = csDropDownList
612
            TabOrder = 0
613
            OnChange = ActionTargetChange
614
          end
615
        end
616
        object TabSheet2: TTabSheet
617
          Caption = 'Action 2 (Green)'
618
          ImageIndex = 1
619
          ExplicitWidth = 333
620
          object Label13: TLabel
621
            Left = 16
622
            Top = 16
623
            Width = 36
624
            Height = 13
625
            Caption = 'Target:'
626
          end
627
          object Label14: TLabel
628
            Left = 16
629
            Top = 72
630
            Width = 116
631
            Height = 13
632
            Caption = 'Grid corner coordinates:'
633
          end
634
          object Label15: TLabel
635
            Left = 171
636
            Top = 72
637
            Width = 29
638
            Height = 13
639
            Caption = 'Points'
640
          end
641
          object ComboBox2: TComboBox
642
            Left = 16
643
            Top = 35
644
            Width = 145
645
            Height = 21
646
            Style = csDropDownList
647
            TabOrder = 0
648
            OnChange = ActionTargetChange
649
          end
650
          object SpinEdit17: TSpinEdit
651
            Left = 16
652
            Top = 91
653
            Width = 57
654
            Height = 22
655
            MaxValue = 0
656
            MinValue = 0
657
            TabOrder = 1
658
            Value = 0
659
            OnChange = ActionSpinEditsChange
660
          end
661
          object SpinEdit18: TSpinEdit
662
            Left = 79
663
            Top = 91
664
            Width = 57
665
            Height = 22
666
            MaxValue = 0
667
            MinValue = 0
668
            TabOrder = 2
669
            Value = 0
670
            OnChange = ActionSpinEditsChange
671
          end
672
          object SpinEdit19: TSpinEdit
673
            Left = 16
674
            Top = 119
675
            Width = 57
676
            Height = 22
677
            MaxValue = 0
678
            MinValue = 0
679
            TabOrder = 3
680
            Value = 0
681
            OnChange = ActionSpinEditsChange
682
          end
683
          object SpinEdit20: TSpinEdit
684
            Left = 79
685
            Top = 119
686
            Width = 57
687
            Height = 22
688
            MaxValue = 0
689
            MinValue = 0
690
            TabOrder = 4
691
            Value = 0
692
            OnChange = ActionSpinEditsChange
693
          end
694
          object SpinEdit21: TSpinEdit
695
            Left = 171
696
            Top = 94
697
            Width = 126
698
            Height = 22
699
            MaxValue = 0
700
            MinValue = 0
701
            TabOrder = 5
702
            Value = 0
703
            OnChange = ActionSpinEditsChange
704
          end
705
        end
706
        object TabSheet3: TTabSheet
707
          Caption = 'Action 3 (Blue)'
708
          ImageIndex = 2
709
          ExplicitWidth = 333
710
          object Label7: TLabel
711
            Left = 16
712
            Top = 16
713
            Width = 36
714
            Height = 13
715
            Caption = 'Target:'
716
          end
717
          object Label8: TLabel
718
            Left = 16
719
            Top = 72
720
            Width = 116
721
            Height = 13
722
            Caption = 'Grid corner coordinates:'
723
          end
724
          object Label9: TLabel
725
            Left = 171
726
            Top = 72
727
            Width = 29
728
            Height = 13
729
            Caption = 'Points'
730
          end
731
          object ComboBox3: TComboBox
732
            Left = 16
733
            Top = 35
734
            Width = 145
735
            Height = 21
736
            Style = csDropDownList
737
            TabOrder = 0
738
            OnChange = ActionTargetChange
739
          end
740
          object SpinEdit7: TSpinEdit
741
            Left = 16
742
            Top = 91
743
            Width = 57
744
            Height = 22
745
            MaxValue = 0
746
            MinValue = 0
747
            TabOrder = 1
748
            Value = 0
749
            OnChange = ActionSpinEditsChange
750
          end
751
          object SpinEdit8: TSpinEdit
752
            Left = 79
753
            Top = 91
754
            Width = 57
755
            Height = 22
756
            MaxValue = 0
757
            MinValue = 0
758
            TabOrder = 2
759
            Value = 0
760
            OnChange = ActionSpinEditsChange
761
          end
762
          object SpinEdit9: TSpinEdit
763
            Left = 79
764
            Top = 119
765
            Width = 57
766
            Height = 22
767
            MaxValue = 0
768
            MinValue = 0
769
            TabOrder = 3
770
            Value = 0
771
            OnChange = ActionSpinEditsChange
772
          end
773
          object SpinEdit10: TSpinEdit
774
            Left = 16
775
            Top = 119
776
            Width = 57
777
            Height = 22
778
            MaxValue = 0
779
            MinValue = 0
780
            TabOrder = 4
781
            Value = 0
782
            OnChange = ActionSpinEditsChange
783
          end
784
          object SpinEdit11: TSpinEdit
785
            Left = 171
786
            Top = 94
787
            Width = 126
788
            Height = 22
789
            MaxValue = 0
790
            MinValue = 0
791
            TabOrder = 5
792
            Value = 0
793
            OnChange = ActionSpinEditsChange
794
          end
795
        end
796
      end
797
      object SpinEdit12: TSpinEdit
798
        Left = 320
799
        Top = 36
800
        Width = 57
801
        Height = 22
802
        MaxValue = 3
803
        MinValue = 1
804
        TabOrder = 2
805
        Value = 1
806
        OnChange = SpinEdit12Change
807
      end
808
      object Button11: TButton
809
        Left = 147
810
        Top = 35
811
        Width = 30
812
        Height = 21
813
        Caption = '1'
814
        Font.Charset = DEFAULT_CHARSET
815
        Font.Color = clWindowText
816
        Font.Height = -15
817
        Font.Name = 'Wingdings'
818
        Font.Style = []
819
        ParentFont = False
820
        TabOrder = 1
821
        Visible = False
822
        OnClick = Button11Click
823
      end
824
    end
825
  end
826
  object Button14: TButton
827
    Left = 8
828
    Top = 529
829
    Width = 75
830
    Height = 25
831
    Caption = 'New'
832
    TabOrder = 5
833
    OnClick = Button14Click
834
  end
835
  object Timer1: TTimer
836
    Enabled = False
837
    Interval = 100
838
    OnTimer = Timer1Timer
839
    Left = 955
840
    Top = 408
841
  end
842
  object MainMenu1: TMainMenu
843
    Left = 963
844
    Top = 496
845
    object File1: TMenuItem
846
      Caption = 'File'
847
      object Newfile1: TMenuItem
848
        Caption = 'New file'
849
        OnClick = Button14Click
850
      end
851
      object N2: TMenuItem
852
        Caption = '-'
853
      end
854
      object Savetogamebin1: TMenuItem
855
        Caption = 'Save to GAME.BIN'
856
        OnClick = Button3Click
857
      end
858
      object Saveandtest1: TMenuItem
859
        Caption = 'Save to GAME.BIN and Test'
860
        OnClick = Button10Click
861
      end
862
      object N1: TMenuItem
863
        Caption = '-'
864
      end
865
      object Close1: TMenuItem
866
        Caption = 'Terminate program'
867
        OnClick = Close1Click
868
      end
869
    end
870
    object Help1: TMenuItem
871
      Caption = 'Help'
872
      object About1: TMenuItem
873
        Caption = 'About'
874
        OnClick = About1Click
875
      end
876
    end
877
  end
878
  object PopupMenu1: TPopupMenu
879
    Left = 763
880
    Top = 496
881
    object Addtoscene1: TMenuItem
882
      Caption = 'Add to scene'
883
      OnClick = Addtoscene1Click
884
    end
885
  end
886
end