delphi 播放语音

在 Delphi 中，你可以使用 TMediaPlayer 控件来播放语音。以下是一个简单的示例：

1. 首先，将 TMediaPlayer 控件添加到你的 Delphi 窗体上。

2. 在窗体的 OnCreate 事件中，设置 MediaPlayer 的 FileName 属性为你要播放的语音文件路径：

procedure TForm1.FormCreate(Sender: TObject);
begin
  MediaPlayer1.FileName := 'C:\example.wav'; // 替换为你的语音文件路径
end;

3. 添加一个按钮控件，并在其 OnClick 事件中调用 MediaPlayer 的 Play 方法来播放语音：

procedure TForm1.Button1Click(Sender: TObject);
begin
  MediaPlayer1.Play;
end;

这样，当你点击按钮时，就会播放指定的语音文件。你还可以在 MediaPlayer 控件中设置其他属性，例如 Volume（音量）、Position（播放位置）等。