Subversion Repositories plumbers

Rev

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