8 Font.Charset = DEFAULT_CHARSET
9 Font.Color = clWindowText
13 OldCreateOrder = False
17 object SpeedButton1: TSpeedButton
22 OnClick = SpeedButton1Click
24 object MediaPlayer1: TMediaPlayer
29 VisibleButtons = [btPlay, btPause, btStop]
31 DeviceType = dtWaveAudio
33 ParentDoubleBuffered = False
35 OnMouseEnter = MediaPlayer1MouseEnter
44 object Button1: TButton
51 OnClick = Button1Click
53 object ListBox1: TListBox
67 'import pyaudio #'#37682#38899#27231#33021#12434#20351#12358#12383#12417#12398#12521#12452#12502#12521#12522
68 'import wave #wav'#12501#12449#12452#12523#12434#25201#12358#12383#12417#12398#12521#12452#12502#12521#12522
71 'RECORD_SECONDS = 10 #'#37682#38899#12377#12427#26178#38291#12398#38263#12373#65288#31186#65289
72 'WAVE_OUTPUT_FILENAME = "temp.wav" #'#38899#22768#12434#20445#23384#12377#12427#12501#12449#12452#12523#21517
73 'iDeviceIndex = 0 #'#37682#38899#12487#12496#12452#12473#12398#12452#12531#12487#12483#12463#12473#30058#21495
75 '#'#22522#26412#24773#22577#12398#35373#23450
76 'FORMAT = pyaudio.paInt16 #'#38899#22768#12398#12501#12457#12540#12510#12483#12488
77 'CHANNELS = 2 #'#12473#12486#12524#12458
78 'RATE = 44100 #'#12469#12531#12503#12523#12524#12540#12488
79 'CHUNK = 2**11 #'#12487#12540#12479#28857#25968
80 'audio = pyaudio.PyAudio() #pyaudio.PyAudio()'
82 'stream = audio.open(format=FORMAT, channels=CHANNELS,'
83 ' rate=RATE, input=True,'
84 ' input_device_index = iDeviceIndex, #'#37682#38899#12487#12496#12452#12473#12398#12452#12531#12487#12483#12463#12473#30058#21495
85 ' frames_per_buffer=CHUNK)'
87 '#--------------'#37682#38899#38283#22987'---------------'
89 'print ("recording...")'
91 '#for i in range(0, int(RATE / CHUNK * RECORD_SECONDS)):'
92 'while not varname1.Value:'
93 ' data = stream.read(CHUNK)'
94 ' frames.append(data)'
98 'print ("finished recording")'
100 '#--------------'#37682#38899#32066#20102'---------------'
102 'stream.stop_stream()'
106 'waveFile = wave.open(WAVE_OUTPUT_FILENAME, '#39'wb'#39')'
107 'waveFile.setnchannels(CHANNELS)'
108 'waveFile.setsampwidth(audio.get_sample_size(FORMAT))'
109 'waveFile.setframerate(RATE)'
110 'waveFile.writeframes(b'#39#39'.join(frames))'
116 object Button2: TButton
121 Caption = 'record/Stop'
123 OnClick = Button2Click
125 object OpenDialog1: TOpenDialog
126 Filter = 'wav file|*.wav'
130 object SaveDialog1: TSaveDialog
132 Filter = 'wav file|*.wav'
136 object PythonEngine1: TPythonEngine
137 DllPath = 'C:\Users\yamat\Anaconda2'
138 IO = PythonInputOutput1
142 object PythonInputOutput1: TPythonInputOutput
143 OnSendData = PythonInputOutput1SendData
149 object PythonModule1: TPythonModule
150 Engine = PythonEngine1
151 OnInitialization = PythonModule1Initialization
157 object PythonDelphiVar1: TPythonDelphiVar
158 Engine = PythonEngine1
161 OnGetData = PythonDelphiVar1GetData