xue@0
|
1 object EventBox: TEventBox
|
xue@0
|
2 Left = 963
|
xue@0
|
3 Top = 83
|
xue@0
|
4 Caption = 'EventBox'
|
xue@0
|
5 ClientHeight = 511
|
xue@0
|
6 ClientWidth = 160
|
xue@0
|
7 Color = clBtnFace
|
xue@0
|
8 Font.Charset = DEFAULT_CHARSET
|
xue@0
|
9 Font.Color = clWindowText
|
xue@0
|
10 Font.Height = -11
|
xue@0
|
11 Font.Name = 'MS Sans Serif'
|
xue@0
|
12 Font.Style = []
|
xue@0
|
13 FormStyle = fsStayOnTop
|
xue@0
|
14 OldCreateOrder = False
|
xue@0
|
15 OnClick = FormClick
|
xue@0
|
16 DesignSize = (
|
xue@0
|
17 160
|
xue@0
|
18 511)
|
xue@0
|
19 PixelsPerInch = 96
|
xue@0
|
20 TextHeight = 13
|
xue@0
|
21 object SpeedButton1: TSpeedButton
|
xue@0
|
22 Left = 0
|
xue@0
|
23 Top = 455
|
xue@0
|
24 Width = 81
|
xue@0
|
25 Height = 25
|
xue@0
|
26 Anchors = [akLeft, akBottom]
|
xue@0
|
27 Caption = 'Save'
|
xue@0
|
28 Flat = True
|
xue@0
|
29 OnClick = Save
|
xue@0
|
30 ExplicitTop = 418
|
xue@0
|
31 end
|
xue@0
|
32 object SpeedButton2: TSpeedButton
|
xue@0
|
33 Left = 80
|
xue@0
|
34 Top = 455
|
xue@0
|
35 Width = 81
|
xue@0
|
36 Height = 25
|
xue@0
|
37 Anchors = [akLeft, akBottom]
|
xue@0
|
38 Caption = 'Load'
|
xue@0
|
39 Flat = True
|
xue@0
|
40 OnClick = Load
|
xue@0
|
41 ExplicitTop = 418
|
xue@0
|
42 end
|
xue@0
|
43 object ListBox1: TListBox
|
xue@0
|
44 Left = 0
|
xue@0
|
45 Top = 0
|
xue@0
|
46 Width = 161
|
xue@0
|
47 Height = 449
|
xue@0
|
48 Anchors = [akLeft, akTop, akBottom]
|
xue@0
|
49 ItemHeight = 13
|
xue@0
|
50 PopupMenu = PopupMenu1
|
xue@0
|
51 TabOrder = 0
|
xue@0
|
52 OnDblClick = ListBox1DblClick
|
xue@0
|
53 OnKeyUp = ListBox1KeyUp
|
xue@0
|
54 OnMouseDown = ListBox1MouseDown
|
xue@0
|
55 end
|
xue@0
|
56 object CheckBox1: TCheckBox
|
xue@0
|
57 Left = 32
|
xue@0
|
58 Top = 486
|
xue@0
|
59 Width = 97
|
xue@0
|
60 Height = 17
|
xue@0
|
61 Anchors = [akLeft, akBottom]
|
xue@0
|
62 Caption = 'Locate event'
|
xue@0
|
63 TabOrder = 1
|
xue@0
|
64 end
|
xue@0
|
65 object PopupMenu1: TPopupMenu
|
xue@0
|
66 OnPopup = PopupMenu1Popup
|
xue@0
|
67 Left = 32
|
xue@0
|
68 Top = 80
|
xue@0
|
69 object Vibratowizard1: TMenuItem
|
xue@0
|
70 Caption = 'Vibrato...'
|
xue@0
|
71 OnClick = Vibratowizard1Click
|
xue@0
|
72 end
|
xue@0
|
73 object Sourcefilter1: TMenuItem
|
xue@0
|
74 Caption = 'Source-filter...'
|
xue@0
|
75 OnClick = Sourcefilter1Click
|
xue@0
|
76 end
|
xue@0
|
77 object Cut1: TMenuItem
|
xue@0
|
78 Caption = 'Cut'
|
xue@0
|
79 OnClick = Cut1Click
|
xue@0
|
80 end
|
xue@0
|
81 object Extract1: TMenuItem
|
xue@0
|
82 Caption = 'Extract'
|
xue@0
|
83 OnClick = Extract1Click
|
xue@0
|
84 end
|
xue@0
|
85 end
|
xue@0
|
86 end
|