[Trainer] Grid 2 v1.0.82.5097 +3

[maluc]

(29.05.2013, 09:59)sILeNt heLLsCrEAm schrieb: Für sowas nehm ich das hier...
Text-To-Speech

Man bräuchte zwar dann noch nen Audioprogramm zum aufnehmen und eventuell nachbearbeiten, aber auf dieser Seite kann man eine Fülle an Sounds generieren.
Und auch noch verschiedene Effekte drüberlegen...

Gibt es das auch für Windows? (Als Dll/Lib?)

MfG

[iNvIcTUs oRCuS]

Naja... Zumindest in den Ultimate Varianten von Windows 7 vielleicht aber auch schon in der Professional Version von Windows XP wird die Funktion Microsoft Speech mitinstalliert/mitgeliefert.
Einfach mal per Google nach Microsoft Speech suchen sollte entsprechende Ergebnisse liefern.

Gesendet von meinem Galaxy S4 mit Tapatalk 4

[maluc]

Hm, ja das kennt man ja.
Ist aber schlechter wie das von der Seite.
Das ist leider nur für Webseiten.
Schade!

MfG

[iNvIcTUs oRCuS]

Ja das Microsoft Speech nutze ich auch nicht.
Wie Du schon sagst - Die Quali is da ein bissl mies.
Zudem muss diese auch auf dem Zielrechner installiert sein.

Die einzigen Komponenten die ich gefunden hab benutzen das Microsoft SAPI System innerhalb einer DLL. Aber wie gesagt bauen diese ebenfalls nur auf der SAPI Engine auf.
Wenns Dich doch interessiert Google -> Active TTS Component...

[BlIzZaRd]

Also ich hab einfach ein bereits erstelltes Projekt genutzt wie z.B.
http://www.codeproject.com/Articles/1828...-to-Speech

Die Qualität ist nicht so gut wie von der Seite, aber es klappt ^^

[iNvIcTUs oRCuS]

Das ist auch das besagte Microsoft Text to Speech bzw. baut darauf auf. Deswegen auch, wie schon weiter oben geschrieben wurde, die geringere Qualität der Ausgabe...
Sowas kann man dann auch einfacher implementieren.

Das ist jetzt einfach ein Codeschnipsel den ich per Google gefunden hab:
[code=VB] Private Sub btnSpeak_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnSpeak.Click
Me.Cursor = Cursors.WaitCursor
Dim oVoice As New SpeechLib.SpVoice
Dim cpFileStream As New SpeechLib.SpFileStream

oVoice.Voice = oVoice.GetVoices.Item(cmbVoices.SelectedIndex)
oVoice.Volume = trVolume.Value
oVoice.Speak(txtSpeach.Text, _
SpeechLib.SpeechVoiceSpeakFlags.SVSFDefault)
oVoice = Nothing
Me.Cursor = Cursors.Arrow
End Sub[/code]