home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 June / ccd0605.iso / Software / Shareware / Multimedia / waveflow / waveflow.exe / 0 / RCDATA / TRECORDNEWSOUNDFRM / TRECORDNEWSOUNDFRM.txt
Text File  |  2005-05-01  |  11KB  |  368 lines
  1. object RecordNewSoundfrm: TRecordNewSoundfrm
  2.   Left = 397
  3.   Top = 209
  4.   Width = 324
  5.   Height = 342
  6.   Caption = 'Record New Sound'
  7.   Color = clBtnFace
  8.   Font.Charset = DEFAULT_CHARSET
  9.   Font.Color = clWindowText
  10.   Font.Height = -11
  11.   Font.Name = 'MS Sans Serif'
  12.   Font.Style = []
  13.   OldCreateOrder = False
  14.   OnClose = FormClose
  15.   OnCreate = FormCreate
  16.   PixelsPerInch = 96
  17.   TextHeight = 13
  18.   object Label1: TLabel
  19.     Left = 8
  20.     Top = 8
  21.     Width = 167
  22.     Height = 24
  23.     Caption = 'Record New Sound'
  24.     Font.Charset = DEFAULT_CHARSET
  25.     Font.Color = clNavy
  26.     Font.Height = -19
  27.     Font.Name = 'MS Sans Serif'
  28.     Font.Style = []
  29.     ParentFont = False
  30.   end
  31.   object Label2: TLabel
  32.     Left = 8
  33.     Top = 40
  34.     Width = 54
  35.     Height = 13
  36.     Caption = 'Output file :'
  37.   end
  38.   object SpeedButton1: TSpeedButton
  39.     Left = 256
  40.     Top = 56
  41.     Width = 23
  42.     Height = 22
  43.     Flat = True
  44.     Glyph.Data = {
  45.       76010000424D7601000000000000760000002800000020000000100000000100
  46.       04000000000000010000120B0000120B00001000000000000000000000000000
  47.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  48.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  49.       333333FFFFFFFFFFFFF33000077777770033377777777777773F000007888888
  50.       00037F3337F3FF37F37F00000780088800037F3337F77F37F37F000007800888
  51.       00037F3337F77FF7F37F00000788888800037F3337777777337F000000000000
  52.       00037F3FFFFFFFFFFF7F00000000000000037F77777777777F7F000FFFFFFFFF
  53.       00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
  54.       00037F7F333333337F7F000FFFFFFFFF00037F7F333333337F7F000FFFFFFFFF
  55.       00037F7F333333337F7F000FFFFFFFFF07037F7F33333333777F000FFFFFFFFF
  56.       0003737FFFFFFFFF7F7330099999999900333777777777777733}
  57.     NumGlyphs = 2
  58.     OnClick = SpeedButton1Click
  59.   end
  60.   object gravar: TSpeedButton
  61.     Left = 201
  62.     Top = 118
  63.     Width = 80
  64.     Height = 25
  65.     Hint = 'Start Recording'
  66.     Caption = 'Record'
  67.     Flat = True
  68.     Font.Charset = DEFAULT_CHARSET
  69.     Font.Color = clBlack
  70.     Font.Height = -11
  71.     Font.Name = 'MS Sans Serif'
  72.     Font.Style = []
  73.     Glyph.Data = {
  74.       76010000424D7601000000000000760000002800000020000000100000000100
  75.       04000000000000010000120B0000120B00001000000000000000000000000000
  76.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  77.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  78.       3333333333FFFFF3333333333000003333333333F777773FF333333008877700
  79.       33333337733FFF773F33330887000777033333733F777FFF73F330880F9F9F07
  80.       703337F37733377FF7F33080F00000F07033373733777337F73F087F0091100F
  81.       77037F3737333737FF7F08090919110907037F737F3333737F7F0F0F0999910F
  82.       07037F737F3333737F7F0F090F99190908037F737FF33373737F0F7F00FF900F
  83.       780373F737FFF737F3733080F00000F0803337F73377733737F330F80F9F9F08
  84.       8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
  85.       3333333773FFFF77333333333000003333333333377777333333}
  86.     NumGlyphs = 2
  87.     ParentFont = False
  88.     ParentShowHint = False
  89.     ShowHint = True
  90.     Spacing = 18
  91.     OnClick = gravarClick
  92.   end
  93.   object parar: TSpeedButton
  94.     Left = 201
  95.     Top = 143
  96.     Width = 80
  97.     Height = 25
  98.     Hint = 'Stop Recording'
  99.     Caption = 'Stop'
  100.     Flat = True
  101.     Font.Charset = DEFAULT_CHARSET
  102.     Font.Color = clBlack
  103.     Font.Height = -11
  104.     Font.Name = 'MS Sans Serif'
  105.     Font.Style = []
  106.     Glyph.Data = {
  107.       76010000424D7601000000000000760000002800000020000000100000000100
  108.       04000000000000010000120B0000120B00001000000000000000000000000000
  109.       80000080000000808000800000008000800080800000C0C0C000808080000000
  110.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  111.       333333333333333333333333333333333333333FFFFFFFFFFFF3330000000000
  112.       003333888888888888F33300000000000033338F3333333338F3330000000000
  113.       0033338F3333333338F33300000000000033338F3333333338F3330000000000
  114.       0033338F3333333338F33300000000000033338F3333333338F3330000000000
  115.       0033338F3333333338F33300000000000033338F3333333338F3330000000000
  116.       0033338F3333333338F33300000000000033338F3333333338F3330000000000
  117.       0033338FFFFFFFFFF8F333000000000000333388888888888833333333333333
  118.       3333333333333333333333333333333333333333333333333333}
  119.     NumGlyphs = 2
  120.     ParentFont = False
  121.     ParentShowHint = False
  122.     ShowHint = True
  123.     Spacing = 31
  124.     OnClick = pararClick
  125.   end
  126.   object marxar: TSpeedButton
  127.     Left = 201
  128.     Top = 191
  129.     Width = 80
  130.     Height = 25
  131.     Hint = 'Exit'
  132.     Caption = 'Exit'
  133.     Flat = True
  134.     Font.Charset = DEFAULT_CHARSET
  135.     Font.Color = clBlack
  136.     Font.Height = -11
  137.     Font.Name = 'MS Sans Serif'
  138.     Font.Style = []
  139.     Glyph.Data = {
  140.       76010000424D7601000000000000760000002800000020000000100000000100
  141.       04000000000000010000120B0000120B00001000000000000000000000000000
  142.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  143.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  144.       03333377777777777F333301111111110333337F333333337F33330111111111
  145.       0333337F333333337F333301111111110333337F333333337F33330111111111
  146.       0333337F333333337F333301111111110333337F333333337F33330111111111
  147.       0333337F3333333F7F333301111111B10333337F333333737F33330111111111
  148.       0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
  149.       0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
  150.       0333337F377777337F333301111111110333337F333333337F33330111111111
  151.       0333337FFFFFFFFF7F3333000000000003333377777777777333}
  152.     NumGlyphs = 2
  153.     ParentFont = False
  154.     ParentShowHint = False
  155.     ShowHint = True
  156.     Spacing = 32
  157.     OnClick = marxarClick
  158.   end
  159.   object SpeedButton2: TSpeedButton
  160.     Left = 8
  161.     Top = 242
  162.     Width = 185
  163.     Height = 25
  164.     Hint = 'Check Windows  Volume Setup'
  165.     Caption = 'Windows Volume Control Panel'
  166.     Flat = True
  167.     Glyph.Data = {
  168.       76010000424D7601000000000000760000002800000020000000100000000100
  169.       04000000000000010000120B0000120B00001000000000000000000000000000
  170.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  171.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  172.       33333333333FFF3333F333333300033339333333337773F33733333330008033
  173.       933333333737F7F37333333307078733333933337337373F3337333077088803
  174.       33933337F37F337F3373333077088803393333F7337FF37F3733300777008803
  175.       9333377F33773F7F733307088808087333337F7F337F7F7F3FFF070777080873
  176.       99997F7F337F7F7F77770808880808733333737F337F737F3F33300888008803
  177.       93333773F377337F73F333308807880339333337F37F337F373F333088077803
  178.       339333373F73F37333733333087777333339333373F7F7F33F37333330807033
  179.       933333333737F73373F333333300033339333333337773333733}
  180.     NumGlyphs = 2
  181.     ParentShowHint = False
  182.     ShowHint = True
  183.     OnClick = SpeedButton2Click
  184.   end
  185.   object test: TSpeedButton
  186.     Left = 201
  187.     Top = 93
  188.     Width = 80
  189.     Height = 25
  190.     Hint = 'Use Vumeters to Test Input Signal'
  191.     Caption = 'Test Input'
  192.     Flat = True
  193.     Font.Charset = DEFAULT_CHARSET
  194.     Font.Color = clBlack
  195.     Font.Height = -11
  196.     Font.Name = 'MS Sans Serif'
  197.     Font.Style = []
  198.     Glyph.Data = {
  199.       76010000424D7601000000000000760000002800000020000000100000000100
  200.       04000000000000010000120B0000120B00001000000000000000000000000000
  201.       800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  202.       FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  203.       3333333333FFFFF3333333333000003333333333F777773FF333333008877700
  204.       33333337733FFF773F33330887000777033333733F777FFF73F330880FAFAF07
  205.       703337F37733377FF7F33080F00000F07033373733777337F73F087F00A2200F
  206.       77037F3737333737FF7F080A0A2A220A07037F737F3333737F7F0F0F0AAAA20F
  207.       07037F737F3333737F7F0F0A0FAA2A0A08037F737FF33373737F0F7F00FFA00F
  208.       780373F737FFF737F3733080F00000F0803337F73377733737F330F80FAFAF08
  209.       8033373F773337733733330F8700078803333373FF77733F733333300FFF8800
  210.       3333333773FFFF77333333333000003333333333377777333333}
  211.     NumGlyphs = 2
  212.     ParentFont = False
  213.     ParentShowHint = False
  214.     ShowHint = True
  215.     Spacing = -1
  216.     OnClick = testClick
  217.   end
  218.   object Edit1: TEdit
  219.     Left = 8
  220.     Top = 56
  221.     Width = 247
  222.     Height = 21
  223.     TabOrder = 0
  224.   end
  225.   object RadioGroup1: TRadioGroup
  226.     Left = 8
  227.     Top = 88
  228.     Width = 89
  229.     Height = 129
  230.     Caption = 'Frequency'
  231.     ItemIndex = 0
  232.     Items.Strings = (
  233.       '11025'
  234.       '22050'
  235.       '44100'
  236.       'Other')
  237.     TabOrder = 1
  238.     OnClick = RadioGroup1Click
  239.   end
  240.   object RadioGroup2: TRadioGroup
  241.     Left = 104
  242.     Top = 88
  243.     Width = 89
  244.     Height = 65
  245.     Caption = 'Channels'
  246.     ItemIndex = 0
  247.     Items.Strings = (
  248.       'Mono'
  249.       'Stereo')
  250.     TabOrder = 2
  251.     OnClick = RadioGroup2Click
  252.   end
  253.   object RadioGroup3: TRadioGroup
  254.     Left = 104
  255.     Top = 152
  256.     Width = 89
  257.     Height = 65
  258.     Caption = 'Bits'
  259.     ItemIndex = 0
  260.     Items.Strings = (
  261.       '8'
  262.       '16')
  263.     TabOrder = 3
  264.     OnClick = RadioGroup3Click
  265.   end
  266.   object StatusBar1: TStatusBar
  267.     Left = 0
  268.     Top = 289
  269.     Width = 316
  270.     Height = 19
  271.     Panels = <
  272.       item
  273.         Alignment = taCenter
  274.         Text = '0 Bytes'
  275.         Width = 300
  276.       end>
  277.     SimplePanel = False
  278.   end
  279.   object Edit2: TEdit
  280.     Left = 32
  281.     Top = 186
  282.     Width = 41
  283.     Height = 21
  284.     MaxLength = 5
  285.     TabOrder = 5
  286.     Text = '11025'
  287.     Visible = False
  288.     OnEnter = Edit2Enter
  289.     OnExit = Edit2Exit
  290.     OnKeyPress = Edit2KeyPress
  291.   end
  292.   object StatusBar2: TStatusBar
  293.     Left = 0
  294.     Top = 270
  295.     Width = 316
  296.     Height = 19
  297.     Panels = <
  298.       item
  299.         Alignment = taCenter
  300.         Text = '00:00:00'
  301.         Width = 300
  302.       end>
  303.     SimplePanel = False
  304.   end
  305.   object VumeterPanel: TPanel
  306.     Left = 289
  307.     Top = 0
  308.     Width = 27
  309.     Height = 270
  310.     Align = alRight
  311.     BevelInner = bvLowered
  312.     TabOrder = 7
  313.     object LabelVumeter: TLabel
  314.       Left = 4
  315.       Top = 234
  316.       Width = 21
  317.       Height = 13
  318.       Caption = 'L R'
  319.       Font.Charset = DEFAULT_CHARSET
  320.       Font.Color = clNavy
  321.       Font.Height = -11
  322.       Font.Name = 'MS Sans Serif'
  323.       Font.Style = [fsBold]
  324.       ParentFont = False
  325.     end
  326.     object Gauge1: TGauge
  327.       Left = 3
  328.       Top = 3
  329.       Width = 10
  330.       Height = 230
  331.       ForeColor = clBlue
  332.       Kind = gkVerticalBar
  333.       Progress = 0
  334.       ShowText = False
  335.     end
  336.     object Gauge2: TGauge
  337.       Left = 14
  338.       Top = 3
  339.       Width = 10
  340.       Height = 230
  341.       ForeColor = clRed
  342.       Kind = gkVerticalBar
  343.       Progress = 0
  344.       ShowText = False
  345.     end
  346.   end
  347.   object ObriraWF: TCheckBox
  348.     Left = 8
  349.     Top = 221
  350.     Width = 257
  351.     Height = 17
  352.     Caption = 'Open automatically in Wave Flow after recording'
  353.     TabOrder = 8
  354.   end
  355.   object SaveDialog1: TSaveDialog
  356.     Filter = 'RIFF Wave Audio Files (.wav)|.wav'
  357.     Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
  358.     Left = 280
  359.     Top = 24
  360.   end
  361.   object Timer1: TTimer
  362.     Enabled = False
  363.     OnTimer = Timer1Timer
  364.     Left = 248
  365.     Top = 4
  366.   end
  367. end
  368.