Hi.
Ich habe nun 3 Buttons.
1 Nimt auf, der andere stoppt und der andere spielt es ab.
Code:
Nun möchte ich, dass er immer kurz aufnimmt auf einem Timer, und ein anderer das gleichzeitig immer abspielt.
Sozusagen etwas wie Skype oder TS.
Danke
Ich habe nun 3 Buttons.
1 Nimt auf, der andere stoppt und der andere spielt es ab.
Code:
VB.NET-Quellcode
- Public Class Form1
- Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As String, ByVal lpstrreturnString As String, ByVal uReturnLength As Integer, ByVal hvndCallback As Integer) As Integer
- Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
- My.Computer.Audio.Play("sound.wav", AudioPlayMode.WaitToComplete) 'Hier ist wieder der Pfad D:\sound.wav angegeben um natürlich die erstellte Datei abzuspielen
- End Sub
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
- mciSendString("open new Type waveaudio Alias recsound", "", 0, 0)
- mciSendString("record recsound", "", 0, 0) 'Ab jetzt wird das Mikro aufgenommen
- End Sub
- Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
- mciSendString("stop recsound", "", 0, 0) 'Aufnahme wird gestoppt
- mciSendString("save recsound sound.wav", "", 0, 0)
- mciSendString("close recsound", "", 0, 0)
- End Sub
- End Class
Nun möchte ich, dass er immer kurz aufnimmt auf einem Timer, und ein anderer das gleichzeitig immer abspielt.
Sozusagen etwas wie Skype oder TS.
Danke