|
| [Agenda Android] Rende-VousAjoute() Ne fonctionne pas ! |
| Iniciado por Gabouche195, 30,may. 2014 09:28 - 3 respuestas |
| |
| | | |
|
| |
Miembro registrado
8 mensajes |
|
Publicado el 30,mayo 2014 - 09:28 |
Bonjour à tous,
je cherche depuis déjà un petit moment comment ajouter un rendez-vous dans l'agenda du téléphone depuis une application. Dans ce but j'ai trouvé dans l'aide de PC Soft la fonction suivante :
http://doc.pcsoft.fr/?1000011001&lang=fr-FR&productversion=06F180063c
mon souci est qu'en reprenant la syntaxe exacte de l'exemple proposer c'est a dire celle-ci :
gRDV est un RendezVous
gCal est un Calendrier
gRDV..Titre = SAI_Titre
gRDV..DateDébut = SAI_DateDeb + SAI_HeureDeb
gRDV..DateFin = SAI_DateFin + SAI_HeureFin
gRDV..Lieu = SAI_Lieu
gRDV..Contenu = SAI_Desc
SI SAI_Fuseau <> "" ALORS
gRDV..FuseauHoraire = SAI_Fuseau
FIN
gRDV..Auteur = SAI_Auteur
gRDV..Invité = SAI_Invités
gRDV..JournéeEntière = INT_Jentière[1]
SI RendezVousAjoute(gCal, gRDV) ALORS
ToastAffiche("RDV ajouté")
SINON
Erreur(ErreurInfo())
FIN
Le toast "RDV ajouté" s’affiche bien, mais aucun rendez-vous n'est créé dans l'agenda du téléphone.
Merci de votre aide, |
| |
| |
| | | |
|
| | |
| |
Publicado el 30,mayo 2014 - 09:42 |
Cela me semble normal. Vous ajoutez le rdv dans un calendrier qui n'existe pas.
Il faut d'abord initialiser la variable gCal avec un calendrier retourné par RendezVousListeCalendrier.
(étonnant que la fonction n'est pas renvoyée faux tout de même). |
| |
| |
| | | |
|
| | |
| |
Miembro registrado
8 mensajes |
|
Publicado el 30,mayo 2014 - 10:05 |
Merci de votre aide,
j'avais bien pensé à initialiser la variable gCal avec un calendrier retourné par RendezVousListeCalendrier.
le problème c'est qu'en voulant voir ce que me retournait RendezVousListeCalendrier avec la syntaxe suivante :
ExempleVoir des exemples supplémentaires
tabCalendrier est un tableau de Calendrier
tabCalendrier = RendezVousListeCalendrier()
POUR TOUT Calendrier DE tabCalendrier
ListeAjoute(LISTE_Liste1, Calendrier..Nom)
FIN
j'avais une l'erreur suivante :
Erreur :Erreur interne de la génération Android :Type de value <135> inattendu.
FEN_Tache_Pincipale.BTN_Ajouter_tache, Clic sur FEN_Tache_Pincipale.BTN_Ajouter_tache, ligne 0, colonne 0
j'ai donc pensé que RendezVousListeCalendrier ne me renvoyait rien.
mais en faisant
tabCalendrier est un tableau de Calendrier
tabCalendrier = RendezVousListeCalendrier()
gCal est un Calendrier = tabCalendrier[1]
comme vous me l'avez indiqué, tout marche impeccable !
encore merci. |
| |
| |
| | | |
|
| | |
| |
Publicado el 11,diciembre 2019 - 18:38 |
Bonjour j'ai le même problème avec mon projet windev mobile 24 et je n'arrie pas a résoudre se problème, le projet marche très bien dans le simulateur mais ne s'ouvre pas après l'installation sur mon mobile
Erreur :Erreur interne de la génération Android :Type de value <135> inattendu.
EXPRESS_FEN_Camera.BTN_TakePicturePB, Clic sur EXPRESS_FEN_Camera.BTN_TakePicturePB, ligne 0, colonne 0
sRépertoire est une chaîne
sImage est une chaîne
SI typeExam = 1 ALORS
SI goPhoto = Vrai ALORS
<Compile SI TypeConfiguration=Android>
sRépertoire = ["/"] + SysRepCarteStockage() + ["/"] + "UpOsteo" + ["/"]
sImage = sRépertoire + ["/"] + NomPatient + ["_"] + DatePatient + ["_PB"] + ".jpg"
VideoCapture(CAM_SansNom1,sImage,viCaptureImage)
SI Image <> "" _ET_ SysEtatStockageExterne(1) = sseDisponible ALORS
Son("camera-shutter-click-03.mp3")
fCopieFichier(sImage, SysRepStockageExterne(1, sseAppPhoto))
FIN
<SINON>
sImage = NomPatient + ["_"] + DatePatient + ["_PB"] + ".jpg"
VideoCapture(CAM_SansNom1,sImage,viCaptureImage)
Son("camera-shutter-click-03.mp3")
IF dSaveImageJPEG(CAM_SansNom1,fExtractPath(sImage, fDirectory + fFileName) + "_thumb.jpg") THEN
sImage = fExtractPath(sImage, fDirectory + fFileName) + "_thumb.jpg"
END
<FIN>
IMG_PB = sImage
ToastAffiche("Sauvegarde",toastCourt)
CheminImagePB = sImage
FIN
FIN
SI typeExam = 2 ALORS
SI goPhoto = Vrai ALORS
<Compile SI TypeConfiguration=Android>
sRépertoire = ["/"] + SysRepCarteStockage() + ["/"] + "UpOsteo" + ["/"]
sImage = sRépertoire + ["/"] + NomPatient + ["_"] + DatePatient + ["_PA"] + ".jpg"
VideoCapture(CAM_SansNom1,sImage,viCaptureImage)
SI Image <> "" _ET_ SysEtatStockageExterne(1) = sseDisponible ALORS
Son("camera-shutter-click-03.mp3")
fCopieFichier(sImage, SysRepStockageExterne(1, sseAppPhoto))
FIN
<SINON>
sImage = NomPatient + ["_"] + DatePatient + ["_PA"] + ".jpg"
VideoCapture(CAM_SansNom1,sImage,viCaptureImage)
Son("camera-shutter-click-03.mp3")
IF dSaveImageJPEG(CAM_SansNom1,fExtractPath(sImage, fDirectory + fFileName) + "_thumb.jpg") THEN
sImage = fExtractPath(sImage, fDirectory + fFileName) + "_thumb.jpg"
END
<FIN>
IMG_PB = sImage
ToastAffiche("Sauvegarde",toastCourt)
CheminImagePA = sImage
FIN
FIN
CAS ERREUR:
CAS EXCEPTION: |
| |
| |
| | | |
|
| | | | |
| | |
|