FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» I Love You
par papydall Aujourd'hui à 1:15

» mise a jour calculatrice
par joeeee2017 Aujourd'hui à 1:01

» Convertisseur de base 10 de 2 à 36
par gigi75 Hier à 18:49

» [solved] 3D_LINE How to ?
par papydall Hier à 6:51

» supprimé
par joeeee2017 Dim 15 Oct 2017 - 20:02

» calculatrice avec touches movibles
par joeeee2017 Dim 15 Oct 2017 - 1:11

» CORTANA
par gigi75 Sam 14 Oct 2017 - 16:32

» supprimé
par Jean Claude Sam 14 Oct 2017 - 12:30

» Compilateur FBPano
par jean_debord Jeu 12 Oct 2017 - 9:53

» KGF_dll - nouvelles versions
par Klaus Mar 10 Oct 2017 - 18:49

» à propos de Panoramic_Editor [Résolu]
par Klaus Mar 10 Oct 2017 - 3:19

» Un petit "coucou" à tous les Panoramiciens !
par Jack Ven 6 Oct 2017 - 10:24

» Pourquoi le compilateur stagne
par mindstorm Mer 4 Oct 2017 - 20:38

» Panoramic ?
par Marc37 Mer 4 Oct 2017 - 0:39

» Premiers pas avec Arduino
par Marc37 Mer 4 Oct 2017 - 0:29

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Octobre 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
CalendrierCalendrier

Partagez | 
 

 problème avec edit ou bien avec combo?

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
bignono

avatar

Nombre de messages : 1086
Age : 60
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: problème avec edit ou bien avec combo?   Ven 4 Aoû 2017 - 12:53

Bonjour à tous! Very Happy
Depuis un moment j'essaye de faire tourner un programme avec le compilateur, mais je n'y arrive pas. Donc je décortique au fur et à mesure, et je crois que je viens de trouver un problème qui vient soit de l'edit soit du combo.
Voici 2 programme que j'ai compilé:
le premier fonctionne correctement: cliquez autant de fois que vous voulez sur le bouton GO on a toujours le même résultat!
Code:
label gogogo
dim a$,c
button 1:caption 1,"G.O.":on_click 1,gogogo
edit 2:left 2,width(1)+10
text 2,"pagekni"
set_focus 2
end

gogogo:
   a$=text$(2)
   message a$
   a$=upper$(a$)
   message a$
   c=len(a$)
   message str$(c)
return

Dans le second programme, j'ai introduit un combo.
Au premier clic sur le bouton GO, ça fonctionne correctement, même si vous sélectionnez une autre donnée avec le combo. Mais à partir du second clic, rien ne va plus! Il n'y a plus que 5 caractères dans la chaine (et le dernier n'ayant rien à voir!) et la longueur de la chaine à 5 au lieu de 7.
Code:
label gogogo,choix
dim a$,c,i,f$
button 1:caption 1,"G.O.":on_click 1,gogogo
edit 2:left 2,width(1)+10
text 2,"pagekni"
combo 12:top 12,height(1)+5:text 12,"dico02_07"
restore:for i=1 to 4:read f$:item_add 12,f$:next i:f$=text$(12)+".txt"
on_click 12,choix
set_focus 2

end

gogogo:
   a$=text$(2)
   message a$
   a$=upper$(a$)
   message a$
   c=len(a$)
   message str$(c)
return

choix:
   f$=text$(12)+".txt"
return

data "dico07","dico08","dico02_08","dico02_07"

Voilà Jack, je pense que c'est un bug du compilateur qui concerne combo, mais je n'en suis pas sûr! A moins que je me sois trompé dans mon programme, le compilateur étant plus strict!
A+ Wink Wink Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5541
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: problème avec edit ou bien avec combo?   Ven 4 Aoû 2017 - 14:13

¶ c’est le caractère ASCII 20 : DC4 : Device Control 4
Je pense avoir trouvé ce qui ne va pas :
Si la longueur du texte de l’EDIT est
1, 2 ou 3  < --- Ok
4 , 5 , 6, 7 < --- troncature à 4 caractères + le caractère ¶ (ASCII 20)
8 et plus < --- OK

Modifier la ligne 5 pour mieux voir le problème.


Code:

label gogogo,choix
dim a$,c,i,f$
button 1:caption 1,"G.O.":on_click 1,gogogo
edit 2:left 2,width(1)+10
text 2,"abcdefghij" : ' Essayer avec 1 caractère, puis 2, puis 3 , etc        
combo 12:top 12,height(1)+5:text 12,"dico02_07"
restore:for i=1 to 4:read f$:item_add 12,f$:next i:f$=text$(12)+".txt"
on_click 12,choix
set_focus 2

end

gogogo:
   a$=text$(2)
   message a$
   a$=upper$(a$)
   message a$
   c=len(a$)
   message str$(c)
  
return

choix:
   f$=text$(12)+".txt"  
return

data "dico07","dico08","dico02_08","dico02_07"
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
bignono

avatar

Nombre de messages : 1086
Age : 60
Localisation : Val de Marne
Date d'inscription : 13/11/2011

MessageSujet: Re: problème avec edit ou bien avec combo?   Ven 4 Aoû 2017 - 18:20

Bonjour Papydall, Smile
Merci de confirmer le problème. Et effectivement, la chaine est tronquée si elle fait 4, 5, 6 ou 7 caractères de longueur. Et le caractère ¶ apparait à la fin de la chaine tronquée.
A+ Wink Wink Wink
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Jack
Admin
avatar

Nombre de messages : 1764
Date d'inscription : 28/05/2007

MessageSujet: Re: problème avec edit ou bien avec combo?   Ven 4 Aoû 2017 - 18:29

Bravo bignono, tu as trouvé un bug du compilateur sur la fonction TEXT$(N).

Je corrige cela au plus vite.

_________________
username : panoramic@jack-panoramic password : panoramic123
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://panoramic.free-boards.net
Contenu sponsorisé




MessageSujet: Re: problème avec edit ou bien avec combo?   

Revenir en haut Aller en bas
 
problème avec edit ou bien avec combo?
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Ma configuration est tel bien ou nul
» [Résolu] Adobe updater
» deverouillage de la 2012.30
» [résolu]Affichage des noms de villes nuvi 1490
» Etrex 20

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC Le compilateur :: Le Compilateur-
Sauter vers: