home *** CD-ROM | disk | FTP | other *** search
- inherited TimeWarpForm: TTimeWarpForm
- Caption = 'Time Warp'
- ClientHeight = 291
- ClientWidth = 407
- OldCreateOrder = True
- PixelsPerInch = 96
- TextHeight = 13
- object SpeedGroup: TGroupBox
- Left = 6
- Top = 4
- Width = 395
- Height = 107
- Caption = ' Specify new relative change or length '
- TabOrder = 0
- object SpeedAxis: TDogAxis
- Left = 87
- Top = 40
- Width = 232
- Height = 16
- Associate = SpeedFader
- Min = 25
- Max = 400
- Border = 22
- end
- object TimeAxis: TDogAxis
- Left = 87
- Top = 77
- Width = 232
- Height = 16
- Associate = TimeFader
- Min = 50
- Max = 1000000
- Border = 22
- Time = True
- end
- object BySpeed: TRadioButton
- Left = 7
- Top = 24
- Width = 77
- Height = 17
- Caption = 'Change (%):'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = ByChange
- end
- object ByLength: TRadioButton
- Left = 7
- Top = 61
- Width = 77
- Height = 17
- Caption = 'Length (s):'
- TabOrder = 1
- OnClick = ByChange
- end
- object Speed: TNumEdit
- Left = 324
- Top = 24
- Width = 61
- Height = 21
- TabStop = True
- Value = 100
- Min = 25
- Max = 400
- Decimal = 1
- PageChange = 10
- LineChange = 1
- Label = 'Change'
- Buddy = SpeedFader
- Caption = '100.0'
- TabOrder = 3
- MaxLength = 8
- end
- object SpeedFader: TFader
- Left = 87
- Top = 24
- Width = 232
- Height = 16
- TabOrder = 2
- Associate = Speed
- Line = 1
- Page = 10
- Min = 25
- Max = 400
- Position = 100
- Stripe = True
- end
- object Time: TTimeEdit
- Left = 324
- Top = 61
- Width = 61
- Height = 21
- TabStop = True
- Value = 50
- Min = 50
- Max = 1000000
- Decimal = -3
- PageChange = 10
- LineChange = 1
- Label = 'Length'
- Buddy = TimeFader
- Caption = '50.000'
- TabOrder = 5
- MaxLength = 25
- end
- object TimeFader: TFader
- Left = 87
- Top = 61
- Width = 232
- Height = 16
- TabOrder = 4
- Associate = Time
- Line = 1
- Page = 10
- Min = 50
- Max = 1000000
- Position = 50
- Stripe = True
- end
- end
- object AlgorithmGroup: TGroupBox
- Left = 6
- Top = 116
- Width = 395
- Height = 171
- Caption = ' Algorithm '
- TabOrder = 1
- object Algorithm: TPageControl
- Left = 5
- Top = 15
- Width = 387
- Height = 150
- ActivePage = FFT
- Style = tsButtons
- TabOrder = 0
- TabWidth = 125
- object Rate: TTabSheet
- Caption = 'Rate'
- object RateDescription: TStaticText
- Left = 50
- Top = 2
- Width = 279
- Height = 31
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Changes the sampling rate. Pitch is changed. Gives best qualit' +
- 'y. Processing is fast.'
- TabOrder = 0
- end
- end
- object Similarity: TTabSheet
- Caption = 'Similarity'
- ImageIndex = 1
- object WindowAxis: TDogAxis
- Left = 104
- Top = 68
- Width = 205
- Height = 16
- Associate = WindowFader
- Min = 0.100000000000000000
- Max = 300
- Border = 22
- end
- object RangeAxis: TDogAxis
- Left = 104
- Top = 103
- Width = 205
- Height = 16
- Associate = RangeFader
- Min = 0.010000000000000000
- Max = 100
- Border = 22
- end
- object SimilarityDescription: TStaticText
- Left = 42
- Top = 2
- Width = 295
- Height = 43
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Overlaps or replicates small similar sections of audio to change' +
- ' the length. Pitch does not change. Gives good quality for voi' +
- 'ce and simple sounds. Processing is slower. '
- TabOrder = 0
- end
- object WindowLabel: TStaticText
- Left = 9
- Top = 52
- Width = 89
- Height = 17
- Alignment = taRightJustify
- Caption = 'Window size (ms):'
- TabOrder = 1
- end
- object Window: TNumEdit
- Left = 314
- Top = 52
- Width = 62
- Height = 21
- TabStop = True
- Value = 30
- Min = 0.100000000000000000
- Max = 300
- Decimal = 1
- PageChange = 10
- LineChange = 1
- Label = 'Window size'
- Buddy = WindowFader
- Caption = '30.0'
- TabOrder = 3
- MaxLength = 7
- end
- object WindowFader: TFader
- Left = 104
- Top = 52
- Width = 205
- Height = 16
- Caption = 'WindowFader'
- TabOrder = 2
- Associate = Window
- Line = 1
- Page = 10
- Min = 0.100000000000000000
- Max = 300
- Position = 30
- Stripe = True
- end
- object RangeLabel: TStaticText
- Left = 5
- Top = 87
- Width = 93
- Height = 17
- Alignment = taRightJustify
- Caption = 'Search range (ms):'
- TabOrder = 4
- end
- object Range: TNumEdit
- Left = 314
- Top = 87
- Width = 62
- Height = 21
- TabStop = True
- Value = 5
- Min = 0.010000000000000000
- Max = 100
- Decimal = 2
- PageChange = 10
- LineChange = 1
- Label = 'Search range'
- Buddy = RangeFader
- Caption = '5.00'
- TabOrder = 6
- MaxLength = 7
- end
- object RangeFader: TFader
- Left = 104
- Top = 87
- Width = 205
- Height = 16
- Caption = 'RangeFader'
- TabOrder = 5
- Associate = Range
- Line = 1
- Page = 10
- Min = 0.010000000000000000
- Max = 100
- Position = 5
- Stripe = True
- end
- end
- object FFT: TTabSheet
- Caption = 'FFT'
- ImageIndex = 2
- object FFTDescription: TStaticText
- Left = 44
- Top = 2
- Width = 291
- Height = 42
- Alignment = taCenter
- AutoSize = False
- Caption =
- 'Applies a frequency transform and interpolation to change the le' +
- 'ngth. Pitch does not change. Gives good quality for music. Pr' +
- 'ocessing is slowest when using oscillator synthesis.'
- TabOrder = 0
- end
- object OverlapLabel: TStaticText
- Left = 35
- Top = 92
- Width = 61
- Height = 17
- Alignment = taRightJustify
- Caption = 'Overlap (%):'
- TabOrder = 4
- end
- object Overlap: TComboBox
- Left = 101
- Top = 88
- Width = 59
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 5
- Items.Strings = (
- '75'
- '88'
- '90'
- '95')
- end
- object FFTSizeLabel: TStaticText
- Left = 43
- Top = 59
- Width = 53
- Height = 17
- Alignment = taRightJustify
- Caption = '&FFT size:'
- TabOrder = 1
- end
- object FFTSize: TNumEdit
- Left = 101
- Top = 56
- Width = 43
- Height = 21
- TabStop = True
- Value = 8
- Min = 8
- Max = 14
- PageChange = 10
- LineChange = 1
- Label = 'FFT size'
- Caption = '1'
- TabOrder = 2
- MaxLength = 4
- end
- object FFTSizeBuddy: TBuddyUpDown
- Left = 144
- Top = 56
- Width = 15
- Height = 21
- Associate = FFTSize
- TabOrder = 3
- end
- object Synthesis: TCheck
- Left = 223
- Top = 74
- Width = 115
- Height = 17
- TabStop = True
- Caption = 'Oscillator synthesis'
- TabOrder = 6
- end
- end
- end
- end
- end
-