PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV Mobile (earlier versions) → probleme de lecture d'un memo vocal effectué sous android dans windev
probleme de lecture d'un memo vocal effectué sous android dans windev
Started by JOH, Jul., 17 2020 12:52 PM - 1 reply
Registered member
10 messages
Posted on July, 17 2020 - 12:52 PM
Bonjour a toutes et tous.
en résumé, je crée un enregistrement vocal sous android en windev mobile que je stocke dans une rubrique mémo d'une table HFSQL locale.
Je transfère les données de ma table HFSQL locale vers une table HFSQL C/S
Dans windev j extrait le memo correspondant mais impossible d'obtenir le fichier son alors que si je tente de lire le memo vocal a partir de HFSQL C/S dans windev mobile ca marche nickel.
siteAuditlocal est la table HFSQL local
siteAuditsrv est la table HFSQL C/S

CODE WINDEV MOBILE :
MagnetoAction(magnetoEnregistre,sFicvocal)

ToastAffiche("vous pouvez commencer l'enregistrement du mémo vocal")
HAttacheMémo(siteAuditlocal,Pointfaible,sFicvocal,hMemoWav)
HModifie(siteAuditlocal,hNumEnrEnCours)


CODE WINDEV MOBILE POUR RELIRE LE MEMO sur HFSQL C/S
HLitPremier(siteAuditsrv)
SI HTrouve(siteAuditsrv) = Vrai ALORS
Info(HInfoMemo(<hr />,Pointfaible))
Info("avant lecture enregistrement " + siteAuditsrv.IDsiteAuditlocal)
HExtraitMémo(siteAuditsrv,Pointfaible,"enregistrement12.wav")
Info(fTaille("enregistrement12.wav"))
MagnetoAction(magnetoJoue,"enregistrement12.wav")
FIN


et ca fonctionne nickel

CODE WINDEV
HLitRecherche(siteAuditsrv,IDsiteAuditlocal,gnIDaudit)
SI HTrouve(siteAuditsrv) ALORS
SI HExtraitMémo(siteAuditsrv,Pointfaible,"c:\temp\enregistrement22.wav") = Vrai ALORS
Info(fTaille("c:\temp\enregistrement22.wav"))
MultimédiaJoue(MM_memo,"c:\temp\enregistrement22.wav")
LanceAppliAssociée("c:\temp\enregistrement22.wav")
FIN
FIN

ca ne marche pas !

a titre d'info ma proc de sauvergarde de windev mobile vers windev ;
POUR TOUT siteAuditlocal
ListeDesRubriques est une chaîne
ListeDesRubriques = HListeRubrique(siteAuditlocal)
POUR TOUTE chaîne sUnerubrique de ListeDesRubriques SEPAREE PAR RC
{"siteAuditsrv." + sUnerubrique,indRubrique} = {"siteAuditlocal." + sUnerubrique,indRubrique}
FIN
siteAuditsrv.Faitle = DateSys()
HAjoute(siteAuditsrv,hEcritureDéfaut)
FIN

merci pour votre aide. J'ai essayé aussi un utilisant un buffer mais rien n'y fait
Registered member
10 messages
Posted on July, 20 2020 - 10:10 AM
je donne la solution a ceux/celles qui pourront être confontrés a ce probleme

sous android le format est 3gpp donc sous windows il faut enregistrer sous ce format et utiliser une application compatible, type VLC ou intégrer "libvlc.dll" dans l'application.