1. Accueil
  2. Forum Codes-Sources
  3. Delphi / Pascal
Sujet Précédent Sujet Suivant

Code delphi pour écrire un nombre dicté dans un micro dans une zone de texte

feliade1964 - 3 nov. 2021 à 09:46
papyvore Messages postés 223 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 16 décembre 2021 - 4 nov. 2021 à 15:47
Bonjour,
comment faire un dictaphone avec delphi. On dicte un nombre et cela se transcrit dans une zone de texte Tedit par exemple.
Merci à tous.
A voir également:

2 réponses

Réponse 1 / 2
papyvore Messages postés 223 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 16 décembre 2021 15
3 nov. 2021 à 11:04
salut
une approche par là peut être
http://delphi-kb.blogspot.com/2011/05/speech-part-2-how-to-add-simple.html
0
Réponse 2 / 2
papyvore Messages postés 223 Date d'inscription samedi 15 novembre 2003 Statut Membre Dernière intervention 16 décembre 2021 15
4 nov. 2021 à 15:47
j'ai testé ça 
procedure TForm4.SpSharedRecoContext1Recognition(ASender: TObject;
  StreamNumber: Integer; StreamPosition: OleVariant; RecognitionType: TOleEnum;
  const Result: ISpeechRecoResult);
begin // ok pour les nombres
  // pour les chiffres dicter zéro un... zéro neuf  sinon la conversion en chiffre  ne se fait pas et le nombre est ecrit en lettres
  // marche aussi pour les réels en pronoçant par ex zéro neuf virgule zéro deux
  Edit1.Text := Result.PhraseInfo.GetText(0, -1, true);
  Memo1.Text := Result.PhraseInfo.GetText(0, -1, true);
end;


disons que ça marche mais pas très fiable pour les chiffres a toi de tester si ça ta conviens
sinon quelqu'un aura peut être une autre proposition a te faire
0
Rejoignez-nous