Chercher: Et Ou Phrase  
Dans:          


Menu non membre

Pour les nouveau visiteurs

Entrez ici

Chercher le Forum



 

 Les Forums
  Programmation avancée
Repondre a ce sujet  

Sujet OCR Windev
Message envoyé le 09-03-2017 par taoufik1_1 de Maroc  
Bonjour les amis

- j'ai Besoin les syntaxes de la DLL Tesseract pour que je puisse faire une application de reconnaissance des documents scannés.

Merci infiniment
Message envoyé le 09-03-2017 par taoufik1_1 de Maroc  
y a pas de réponse !

- SVP juste une piste a suivre.
Message envoyé le 11-03-2017 par VirtualWX de France  

As tu essayé ici :
https://github.com/tesseract-ocr

Message envoyé le 11-03-2017 par taoufik1_1 de Maroc  
il me manque le syntaxe des fonctions tesseract.

Merci Mr VirtualWX
Message envoyé le 12-03-2017 par VirtualWX de France  

Tu peux toujours leur demander
Message envoyé le 12-03-2017 par taoufik1_1 de Maroc  

- Oui Mr VirtualWX je vous merci beaucoup je suis tjrs bloqué et je demande si qlq a les fonctions de la dll tesseract

Merci infiniment

Message envoyé le 13-03-2017 par taoufik1_1 de Maroc  
??
plzzzzzzzzzzzz
Message envoyé le 13-03-2017 par Yusep de Espagne  
BonSoir
Il y a une LST sur ce Sujet.
93 ou 94 Il me semble.

Message envoyé le 14-03-2017 par taoufik1_1 de Maroc  
je vous Merci

- pour LST93 je croix qu'il lance "tesseract.exe" avec des paramètres comme ce ci ("%1" "%2" -l %3 -psm %4 ) sous msdos en mode invisible et qu'il faux tjrs joindre "tesseract.exe" dans vos projets.

- ce que je cherche c'est d'exploite nous même les dll sans passé par "tesseract.exe".

Merci
Message envoyé le 14-03-2017 par Red_Cap de France  
puma.net

petite video:
https://www.youtube.com/watch?v=fmlz9iU_ZG4

site:
http://pumanet.codeplex.com

Ayant eu des difficultés sur Tesseract, j'ai testé puma.net et ça fonctionne sur WINDEV.

Message envoyé le 14-03-2017 par taoufik1_1 de Maroc  

@Red_Cap

intéressant, pouvez-vous me donner un petit exemple en code windev ?

Merci

Message envoyé le 15-03-2017 par taoufik1_1 de Maroc  
-
Message envoyé le 15-03-2017 par Red_Cap de France  
Ici un petit code qui convertit l'mage "shoot_brut.bmp" vers le champ de saisie "SAI_info_trace".

J'ai fait aussi une capture des ressources .net dans le projet.

Pour info, je ne suis pas très bon en utilisation de resources .net. Il va donc falloir chercher pour plus de fonctionnalités. Et pourquoi pas en faire profiter tout le monde après

Bon développement...




            

    Message envoyé le 15-03-2017 par Red_Cap de France  

    Message envoyé le 15-03-2017 par Red_Cap de France  
    Je n'arrive pas à envoyer mes captures d'écran

    Si quelqu'un peux me dire comment faire, ça m'intéresse
    Message envoyé le 15-03-2017 par Red_Cap de France  
    J'ai posté les captures sur se site:

    http://hpics.li/d4b84e1
    http://hpics.li/e3e7f67
    Message envoyé le 15-03-2017 par taoufik1_1 de Maroc  

    Merci Beaucoup Mr Red_Cap

    Maintenant j'ai une piste a suivre je continuerai ma recherche

    Merci infiniment de ta précieuse aide.


    Message envoyé le 15-03-2017 par taoufik1_1 de Maroc  
    @Red_Cap

    - je viens de minimisé un peux le code et ça marche:

    - voila les dll que j'ai utilisé:
       
       Puma.Net
       Puma.interop

    - le Code:

    sCheminFichier est une chaîne UNICODE = fSélecteurImage("", "", "Sélectionnez une image...")

    SI sCheminFichier = "" ALORS RETOUR

    SAI_Texte1 = "" // Vider le Champ Texte de saisie

    MonPuma est un PumaPage
    MonPuma.FileFormat = PumaFileFormat.TxtAscii
    MonPuma.Language=PumaLanguage.French
    MonPuma.LoadImage(sCheminFichier)
    SAI_Texte1=MonPuma.RecognizeToString() // Remplir le Champ Texte a partir de l'image
    MonPuma.Dispose()

    - c'est tout.
    - Merci de Votre aide

    Message envoyé le 15-03-2017 par taoufik1_1 de Maroc  
    - ce qui veulent utile l'OCR avec "MODI.Document"
    - Voila le code:

    strRecText est une chaîne = ""
    nOCREngine est un objet Automation dynamique
    nOCREngine = ObjetActif("MODI.Document")
    sFichier est une chaîne


    sFichier = fSélecteurImage("", "", "Sélectionnez une image...")
    Sablier(1)
    nOCREngine = allouer un objet Automation "MODI.Document"     
    nOCREngine>>Create(sFichier)
    // Lancement de la reconnaissance
    QUAND EXCEPTION DANS
         nOCREngine>>OCR()
         strRecText=nOCREngine>>Images(0)>>Layout>>Text
         //SAI_Texte1=strRecText
    FAIRE
         //erreur("Une exception a été levée pendant l'analyse du document.", ExceptionInfo(errMessage))
         ExceptionActive()
         //strRecText=""
         SAI_Texte1=""
    FIN
    //Trace(strRecText)
    SAI_Texte1=strRecText
    //nOCREngine>>OCR()
    libérer nOCREngine
    Sablier(0)

    - Mais il faut avoir Microsoft-office installer sur la machine.
    Message envoyé le 16-03-2017 par taoufik1_1 de Maroc  

    ça sera très intéressant si qlq peux nous ajouter des fonctions

    Merci

    Message envoyé le 06-12-2017 par Sebastien2306 de France  
    Bonjour

    Avez vous utilisé puma.NET pour faire de l'OCR sur un fichier PDF? Si oui puis-je avoir une piste?

    Cordialement
    Message envoyé le 06-12-2017 par taoufik1_1 de Maroc  
    @Sebastien

    - ça fait longtemps que j'ai travaillé sur les fichiers pdf et j'ai
    vraiment perdu les manipulations mais je croix qu'il y a une dll pour les fichiers pdf "itextsharp.dll"

    Cordialement
    Message envoyé le 06-12-2017 par profwindev de Tunisie  
    @ taoufik1_1.
    Salut;
    j'ai des problèmes avec les 2 méthodes puma.NET et MODI.Document.
    SVP pouvez vous nous partager un petit projet ?
    Merci d'avance.


    Message envoyé le 07-12-2017 par profwindev de Tunisie  

    Erreur à la ligne 12 du traitement Clic sur Bouton1.
    L'invocation de la méthode du type a échoué
    Le framework .NET a renvoyé l'erreur suivante :
    Recognition engine halted with code:0

    ----- Informations techniques -----

    Projet : 12

    Appel WL :
    Traitement de 'Clic sur Bouton1' (Fenêtre1.Bouton1), ligne 12, thread 0

    Que s'est-il passé ?
    L'invocation de la méthode du type a échoué
    Le framework .NET a renvoyé l'erreur suivante :
    Recognition engine halted with code:0

    Code erreur : 200002
    Niveau : erreur fatale

    Dump de l'erreur du module 'wd220net2.dll' (22.0.9.0).
    Identifiant des informations détaillées (.err) : 200002
    Informations de débogage :
    System.Reflection.TargetInvocationException: Une exception a été levée par la cible d'un appel. ---> Puma.Net.RecognitionEngineException: Recognition engine halted with code:0
       à Puma.Net.PumaPage.RecognizeToFile(String fileName, PumaFileFormat format)
       à Puma.Net.PumaPage.RecognizeToFile(String fileName)
       à Puma.Net.PumaPage.RecognizeToString()
       --- Fin de la trace de la pile d'exception interne ---
       à System.RuntimeMethodHandle._InvokeMethodFast(Object target, Object[] arguments, SignatureStruct& sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
       à System.RuntimeMethodHandle.InvokeMethodFast(Object target, Object[] arguments, Signature sig, MethodAttributes methodAttributes, RuntimeTypeHandle typeOwner)
       à System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture, Boolean skipVisibilityChecks)
       à System.Reflection.RuntimeMethodInfo.Invoke(Object obj, BindingFlags invokeAttr, Binder binder, Object[] parameters, CultureInfo culture)
       à CDotNetMethod.bInvoke(Char* pszTypeName, Char* pszMethodName, Char* pszParameters, MethodInfo gcMethod, Object gcObj, CSLevel* pclPile, Int32 nNbParamPile, Int32 bValeurRetour, STOperationDotNet* pstOperation)
    Informations supplémentaires :
    EIT_EXCEPTIONDOTNET
    EIT_PILEWL :
    Clic sur Bouton1 (Fenêtre1.Bouton1), ligne 12
    EIT_DATEHEURE : 07/12/2017 12:05:18
    EIT_TYPE_WDFILE : <2>
    EIT_IDCODE : <18>

    Assistance

    ---------------------

    Erreur à la ligne 12 du traitement Clic sur Bouton1.
    L'invocation de la méthode du type a échoué
    Le framework .NET a renvoyé l'erreur suivante :
    Recognition engine halted with code:0


    Message envoyé le 07-12-2017 par papis de Senegal  
    bonjour
    moi aussi j'aimerai bien que vous partagez un projet.

    Merci pour tout.
    Message envoyé le 08-12-2017 par DEV_WX de Cote d'ivoire  
    Bonjour, est-il possible d'utilise ce projet en windev mobile?
    Message envoyé le 09-12-2017 par taoufik1_1 de Maroc  
    Bonjour

    @profwindev, papis, Sebastien2306

    Désolé actuellement j'ai beaucoup de travaille je suis vraiment bloquer mais je reviendrai avec un petit exemple rassemble l'ocr avec "MODI.Document", "PUMA.NET" et "itextsharp" pour les fichiers pdf.

    a+
       
    Message envoyé le 11-12-2017 par sgug73 de France  
    @Sebastien2306
    OCR sur un fichier PDF avec puma.NET

    Installer puma.net (pour windows 64bits installer PumaNET(x86).msi)
    Répertoire C:\Program Files (x86)\Puma.NET mettre les droits control total pour Utilisateurs
    Créer un nouveau projet dans windev
    Copier C:\Program Files (x86)\Puma.NET\Assemblies\dibapi.dll dans le répertoire exe du projet

    Dans windev
    - ajouter au projet les 2 assemblages puma.interop et Puma.net (répertoire C:\Program Files (x86)\Puma.NET\Assemblies)
    - créer une fenêtre avec un objet image invisible ( ou pas ) et ayant comme nom IMG_pdf
    - créer un bouton avec le code clic suivant:
         sCheminFichier est une chaîne UNICODE = fSélecteurImage("", "", "Sélectionnez une image...")
         Trace(ConvPdf(sCheminFichier))
    - Ajouter les 2 procédures locales à la fenêtre:
    PROCEDURE ConvPdf(ficPDF)
    InfoImage est une chaîne
    res est une chaîne
    Fictmp est une chaîne=fFichierTemp("IMG")

    x est entier=PDFNombreDePages(ficPDF)
    i est un entier
    InfoImage = InfoBitmap(ficPDF)
    IMG_pdf..Largeur=Val(ExtraitChaîne(InfoImage,2,TAB))
    IMG_pdf..Hauteur=Val(ExtraitChaîne(InfoImage,3,TAB))
    IMG_pdf=ficPDF
    POUR i=1 A x
         IMG_pdf..NuméroPage=i
         dSauveImageJPEG(IMG_pdf,Fictmp)
         SI i=1 ALORS
              res = OCRFic(Fictmp)
         SINON
              res = res+"------------------------------------------------------------------"+RC+OCRFic(Fictmp)
         FIN
         fSupprime(Fictmp)
    FIN

    RENVOYER res

    PROCEDURE OCRFic(sCheminFichier)

    res est une chaîne

    SI PAS fFichierExiste(sCheminFichier) ALORS RENVOYER ""

    MonPuma est un PumaPage ()
    MonPuma.FileFormat = PumaFileFormat.TxtAscii
    MonPuma.Language=PumaLanguage.French
    MonPuma.LoadImage(sCheminFichier)
    QUAND EXCEPTION DANS
         res =MonPuma.RecognizeToString()
    FAIRE
         Erreur("Erreur OCR")
    FIN
    MonPuma.Dispose()
    RENVOYER res

    Testé avec windows 10 64bits et windev 22

    Bon dev
    Message envoyé le 11-12-2017 par DEV_WX de Cote d'ivoire  
    Bonjour, est-il possible d'utiliser ce projet en windev mobile? ou avez-vous un code java qu'on peut adapter? J'ai vraiement besoin d'un cas de code en windev mobile qui converti l'image photographiée en texte.
    Message envoyé le 14-12-2017 par papis de Senegal  
    @taoufik Merci je reste en écoute et te souhaite bon courage dans ton projet

    Merci pour tout.
    Message envoyé le 05-02-2018 par Gemini1961 de Belgique  
    @sgug73

    Bonjour à toutes et tous ...

    J'ai la même erreur que profwindev de Tunisie

    Ceci dit où trouver les fichiers pour installer puma.net ( PumaNET(x86).msi ) car sur leur site le fichier n'est plus dispo, nous obtenons un fichier.zip mais sans installable msi

    Merci pour votre aide

    Bien cordialement

    Gemini
    Message envoyé le 09-02-2018 par sgug73 de France  
    @Gemini
    Voici le lien pour PumaNET(x86).msi
    https://1fichier.com/?yhokror437



    Pour répondre à ce message vous devez être membre

    Entrée membre    Enregistrer

      Post reply  



      
    © 2018
     
    Flag Counter