PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV Mobile 2025 → OCR me renvoie n'importe quoi
OCR me renvoie n'importe quoi
Débuté par Jean-Michel, 02 avr. 2025 08:15 - Aucune réponse
Membre enregistré
850 messages
Posté le 02 avril 2025 - 08:15
Bonjour,

Je teste l'OCR sur une image.
Quand je capture une image et que je l'affecte directement dans mon champs iamge SANS UTILISER la camera de mon telephone, pas trop de soucis :
L'image est en haut
Le resultat OCR est en bas




Quand j'utilise l'appareil photo, c'est bizarre :
L'image est en haut
Le resultat OCR est en bas




Une idee ?
Merci

Le code pour info :
MonNomDeModèle est une chaîne = "eng"
MonTableauDeBlocsTexte est un tableau de ocrBlocTexte
sChaine, sExtr est une chaîne

TableSupprimeTout(TB_OCR)
FenAttenteDébut("Decoding...")

OCRChargeLangue(MonNomDeModèle)
MonTableauDeBlocsTexte = OCRExtraitBlocTexte(IMG_Photo)
FenAttenteFin()


POUR i = 1 _À_ MonTableauDeBlocsTexte..Occurrence
sChaine = SansCaractèreGauche(MonTableauDeBlocsTexte[i].Texte,RC)
sExtr = ExtraitChaîne(sChaine,rangPremier,RC)
TANTQUE sExtr <> EOT
SI sExtr <> "" ALORS
TableAjouteLigne(TB_OCR,sExtr)
FIN
sExtr = ExtraitChaîne(sChaine,rangSuivant,RC)
FIN
FIN


--
Synchronize Systems International LTD
Développement d'outils de gestion

Environnements AS400 – Windows
Langages GAP III – CL – Visual Basic - Visual Adélia - Adélia - Windev - Windev Mobile

Bangkok / Pattaya
Message modifié, 02 avril 2025 - 08:16