Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Test to Speech ohne Gespräch.


ardely - Di 25.06.13 14:54
Titel: Test to Speech ohne Gespräch.
Hallo,
Ich möchte gern fragen ob es möglich ist am ende des Textes, zusätzlich ein paar Sekunden (ein totes Gespräch) noch mit zuspeichern?

Ich habe versucht am ende der Zeile viele Spaces hinzuzufügen, aber der nimmt das nicht an, springt sofort auf die dritte Zeile.

Beispiel:


Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
  ....
   WaveFileStream.Open('c:\Audio.wav', SSFMCreateForWrite ,false);
  SpVoice1.AudioOutputStream := WaveFileStream.DefaultInterface;
  // Zeile 1
  SpVoice1.Speak('Das ist meine erste Zeile.'1);
  SpVoice1.WaitUntilDone(2000);
  // Ich möchte gern hier 2 Sekunden Aufzeichnung aber mit keinem Gespräch.
  SpVoice1.Speak('                               '1); 
  SpVoice1.WaitUntilDone(2000);
  // Zeile 3
  SpVoice1.Speak('Das ist meine dritte Zeile.'1);
  SpVoice1.WaitUntilDone(2000);
  WaveFileStream.Close;
  ....


Sehr vielen Dank für ihre Infos.


ardely - Mi 26.06.13 09:20

Hallo,

Eine Alternative...

Ist es vielleicht möglich die Wartezeit in einer Zeile, bei einem Punkt oder Komma zu verlängern z.b. auf 2 Sekunden.
Wenn dass geht, wo kann ich diese Einstellung machen.
Danke für ihre Hilfe.