Sprachausgabe Mobile XE5

[zeras]

Hat jemand einen Codeschnipsel, wie man Texte (wenn möglich deutsch) unter Mobile XE5 (Android) ausgeben kann?

[zeras]

Hab schon was gefunden.
Unter hier gibt es eine Demo.
Während das Startes wird gleich noch die deutsche Sprachdatei geladen und im Quelltext dann nur noch auf Deutsch stellen und schon kann's losgehen.

[greenmile]

Der Link funktioniert nicht, hast Du ev. einen funktionierenden?

[zeras]

Schaue mal unter hier nach.

[greenmile]

Super, danke. Hast Du auch ein Beispiel?

[zeras]

Delphi-Quellcode:

unit Sprachausgabe;

interface

uses
  Androidapi.JNI.TTS,
  FMX.Memo,
  AndroidAPI.JNIBridge,

  Androidapi.JNI.JavaTypes,
  FMX.Helpers.Android,
  Androidapi.JNI.GraphicsContentViewText,
  FMX.Dialogs;

type
    TttsOnInitListener = class(TJavaLocal, JTextToSpeech_OnInitListener)
    private
      //[weak] FParent : TForm1;
    public
      //constructor Create(AParent : TForm1);
      constructor Create;
      procedure onInit(status: Integer); cdecl;
    end;


  var
  ttsListener : TttsOnInitListener;
  tts : JTextToSpeech;

  procedure SpeakOut(s : String);


implementation


constructor TttsOnInitListener.Create;
begin

end;

procedure TttsOnInitListener.onInit(status: Integer);
var
  Result : Integer;

begin
  if (status = TJTextToSpeech.JavaClass.SUCCESS) then
  begin

   result := tts.setLanguage(TJLocale.JavaClass.GERMAN);
   if (result = TJTextToSpeech.JavaClass.LANG_MISSING_DATA) or
      (result = TJTextToSpeech.JavaClass.LANG_NOT_SUPPORTED) then
     ShowMessage('This Language is not supported')
   else
   begin

   end;
  end
  else
    ShowMessage('Initilization Failed!');
end;

procedure SpeakOut(s : String);
var
  text : JString;

begin

  text := StringToJString(s); //Format('Es ist jetzt %s',[s]));

  tts.setSpeechRate(0.75);

  tts.speak(text, TJTextToSpeech.JavaClass.QUEUE_FLUSH, nil);
end;

end.

Und das ganze dann mit

 SpeakOut(text); starten.

[greenmile]

Super, danke, funktioniert aber irgendwie nicht unter XE6 mit einem Galaxy 5. Muss ich die Komponente erst erstellen oder reicht ein "SPeakOut"?

[zeras]

Zitat von greenmile:

Super, danke, funktioniert aber irgendwie nicht unter XE6 mit einem Galaxy 5. Muss ich die Komponente erst erstellen oder reicht ein "SPeakOut"?

Ich habe die Komponente einfach mit ins Projekt gehängt und dann mit SpeakOut den Text sprechen lassen. Habe aber XE5 und ein Nexus Tablet.

[greenmile]

Hmmm ... Brauche ich dafür ev. zusätzliche Rechte?

[zeras]

Zitat von greenmile:

Hmmm ... Brauche ich dafür ev. zusätzliche Rechte?

Habe bei mir nichts gefunden zu zusätzlichen Rechten.
Kannst du im Handy oder Tablet mal einen Text von Android sprechen lassen. Geht das?
Mein Tablet ist derzeit down (Akku leer). Kann daher nicht weiter helfen.