home *** CD-ROM | disk | FTP | other *** search
- object nuevoson: Tnuevoson
- Left = 211
- Top = 98
- BorderIcons = []
- BorderStyle = bsToolWindow
- Caption = 'New sound'
- ClientHeight = 230
- ClientWidth = 202
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = True
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object RadioGroup1: TRadioGroup
- Left = 8
- Top = 8
- Width = 89
- Height = 121
- Caption = 'Frequency'
- Items.Strings = (
- '11025'
- '22050'
- '44100'
- 'Other')
- TabOrder = 0
- OnClick = RadioGroup1Click
- end
- object RadioGroup2: TRadioGroup
- Left = 8
- Top = 136
- Width = 89
- Height = 65
- Caption = 'Channels'
- Items.Strings = (
- 'Mono'
- 'Stereo')
- TabOrder = 1
- OnClick = RadioGroup2Click
- end
- object RadioGroup3: TRadioGroup
- Left = 104
- Top = 136
- Width = 89
- Height = 65
- Caption = 'Bits'
- Items.Strings = (
- '8'
- '16')
- TabOrder = 2
- OnClick = RadioGroup3Click
- end
- object Button1: TButton
- Left = 112
- Top = 16
- Width = 75
- Height = 25
- Caption = '&Record'
- TabOrder = 3
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 112
- Top = 96
- Width = 75
- Height = 25
- Cancel = True
- Caption = '&Cancel'
- TabOrder = 4
- OnClick = Button2Click
- end
- object StatusBar1: TStatusBar
- Left = 0
- Top = 211
- Width = 202
- Height = 19
- Panels = <
- item
- Alignment = taCenter
- Text = '0 Bytes'
- Width = 300
- end>
- SimplePanel = False
- end
- object Edit1: TEdit
- Left = 32
- Top = 100
- Width = 41
- Height = 21
- MaxLength = 5
- TabOrder = 6
- Text = '11025'
- Visible = False
- OnEnter = Edit1Enter
- OnExit = Edit1Exit
- OnKeyPress = Edit1KeyPress
- end
- object parar: TButton
- Left = 112
- Top = 56
- Width = 75
- Height = 25
- Caption = '&Stop'
- TabOrder = 7
- OnClick = pararClick
- end
- object Timer1: TTimer
- Enabled = False
- OnTimer = Timer1Timer
- Left = 168
- Top = 112
- end
- end
-