Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   TTS in Windows? (https://www.delphipraxis.net/201687-tts-windows.html)

TurboMagic 15. Aug 2019 19:31

TTS in Windows?
 
Hallo,

welche Möglichkeiten zur Sprachausgabe durch ein Windows Programm gibt es?
Welche davon gelten noch als aktuell und zukunftsfähig?

Grüße

TurboMagic

peterbelow 16. Aug 2019 10:00

AW: TTS in Windows?
 
Zitat:

Zitat von TurboMagic (Beitrag 1441543)
Hallo,

welche Möglichkeiten zur Sprachausgabe durch ein Windows Programm gibt es?
Welche davon gelten noch als aktuell und zukunftsfähig?

Grüße

TurboMagic

Siehe Speech_Application_Programming_Interface

SAPI 5.1 scheint immer noch die letzte Version zu sein, den SDK dazu gibt es hier

Windows 10 hat aber offenbar auch eingebauten Support zum Vorlesen von Textpassagen, siehe https://www.askdavetaylor.com/enable...eech-in-win10/

TurboMagic 16. Aug 2019 11:46

AW: TTS in Windows?
 
Danke schon mal!
Dann werde ich wohl bei Gelegenheit eine SAPI 5.1 Delphi Demo suchen...

ZYLAGON 16. Aug 2019 18:25

AW: TTS in Windows?
 
Die SAPI 5.4 weicht gar nicht so stark von der SAPI 5.1 ab.
Habe einfach mal mit meiner 10.3.1 Community Edition die Typbibliothek SAPI 5.4 importiert.
Zu ca. 90% konnte ich den Code (SAPI 5.1) für meine Translator-APP verwenden.
Aber mit SAPI 5.1 liegt man auf alle Fälle richtig.

VG ZYL

jus 18. Aug 2019 01:33

AW: TTS in Windows?
 
Hallo,

ich habe mich vor paar Wochen auch mit Windows TextToSpeech beschäftig. Bei meinem Windows 7 Pro Deutsch war nur eine englische Stimme drauf. Falls du unter Windows 7 eine deutsche TTS Stimme haben willst, würde ich dir die "Steffi" TTS Stimme empfehlen. Habe es von dieser Seite die "RSSolo4GermanSteffi.exe" runtergeladen, da angeblich Microsoft die Steffi aus Lizenzgründen von Netz genommen hat.
Unter meinem Windows 10 Pro Deutsch war eine deutsche TTS Stimme von Haus aus dabei, so dass ich nichts mehr nachinstallieren mußte.

Damit du die SAPI als Delphi Komponente nutzen kannst, muß man wie ZYLAGON bereits schrieb die SAPI 5.4 importieren und als Komponente installieren. Das folgende Youtube Video fand ich recht hilfreich:
https://youtu.be/KS-fz6Y2MwA
Die die Installation verlief bei meiner Delphi 10.3 Rio Community Edition problemlos.

Das folgende Beispiel von hathor mit SpVoice und einer Listbox funktionierte bei mir auf Anhieb:
https://www.delphipraxis.net/789834-post7.html

Für detailliertere Beschreibung bzgl. Delphi mit SAPI 5.1 kann man hier nachlesen:
http://www.blong.com/Conferences/DCo...I51/SAPI51.htm

lg,
jus

TurboMagic 20. Aug 2019 16:02

AW: TTS in Windows?
 
Danke für die ganzen Links.
Habe eine erste eigene TTS Demo erstellt und die läuft soweit mal. ;-)

thomaskroger 14. Mär 2023 12:08

AW: TTS in Windows?
 
Hallo TurboMagic,
richtig toll wäre es gewesen, wenn du deine Lösung präsentiert hättest.

Alternativ hier:

Delphi-Quellcode:
procedure TFormMain.Voice(text:string);
var
  OLE_voice:OleVariant;
begin
  OLE_voice:=CreateOleObject('SAPI.SpVoice');
  OLE_voice.speak(text);
end;
Geht ab Delphi XE6 und Windows 10.

Thomas

TurboMagic 15. Mär 2023 16:45

AW: TTS in Windows?
 
Zitat:

Zitat von thomaskroger (Beitrag 1519829)
Hallo TurboMagic,
richtig toll wäre es gewesen, wenn du deine Lösung präsentiert hättest.

Da geb' ich dir recht, da das aber im Rahmen meines Angestellen verhältnisses war,
ist das nicht ganz so einfach.

Aber im wesentlichen die richtige Typbibliothek importieren und es kann los gehen.

Grüße
TurboMagic

Delphi.Narium 15. Mär 2023 17:08

AW: TTS in Windows?
 
Zitat:

Zitat von thomaskroger (Beitrag 1519829)
Hallo TurboMagic,
richtig toll wäre es gewesen, wenn du deine Lösung präsentiert hättest.

Alternativ hier:

Delphi-Quellcode:
procedure TFormMain.Voice(text:string);
var
  OLE_voice:OleVariant;
begin
  OLE_voice:=CreateOleObject('SAPI.SpVoice');
  OLE_voice.speak(text);
end;
Geht ab Delphi XE6 und Windows 10.

Thomas

Funktioniert auch mit Delphi 7 ;-)


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:29 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz