C
carnation
Unregistered / Unconfirmed
GUEST, unregistred user!
我想用mediaplayer进行录音,录成Mid只是为了使文件小。
看过前面的例子,有一个例子说:
procedure TForm1.Button1Click(Sender: TObject);
begin
With MediaPlayer1do
begin
FileName :='e:/aa.wav';
open;
StartRecording
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
with mediaplayer1do
begin
Stop
filename:='e:/1.wav';
Save;
end;
end;
这样可以录制Wav,可是我试验没有成功,?
(其中的AA.wav和1.wav是什么关系?)
看过前面的例子,有一个例子说:
procedure TForm1.Button1Click(Sender: TObject);
begin
With MediaPlayer1do
begin
FileName :='e:/aa.wav';
open;
StartRecording
end;
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
with mediaplayer1do
begin
Stop
filename:='e:/1.wav';
Save;
end;
end;
这样可以录制Wav,可是我试验没有成功,?
(其中的AA.wav和1.wav是什么关系?)