FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC
Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  RechercherRechercher  Dernières imagesDernières images  S'enregistrerS'enregistrer  MembresMembres  Connexion  
Derniers sujets
» SineCube
Je pense que çà en est un... Emptypar Marc Hier à 12:38

» Editeur EliP 6 : Le Tiny éditeur avec 25 onglets de travail
Je pense que çà en est un... Emptypar Marc Hier à 12:22

» Philharmusique
Je pense que çà en est un... Emptypar jjn4 Ven 10 Mai 2024 - 13:58

» PANORAMIC V 1
Je pense que çà en est un... Emptypar papydall Jeu 9 Mai 2024 - 3:22

» select intégrés [résolu]
Je pense que çà en est un... Emptypar jjn4 Mer 8 Mai 2024 - 17:00

» number_mouse_up
Je pense que çà en est un... Emptypar jjn4 Mer 8 Mai 2024 - 11:59

» Aide de PANORAMIC
Je pense que çà en est un... Emptypar jjn4 Mer 8 Mai 2024 - 11:16

» trop de fichiers en cours
Je pense que çà en est un... Emptypar lepetitmarocain Mer 8 Mai 2024 - 10:43

» Je teste PANORAMIC V 1 beta 1
Je pense que çà en est un... Emptypar papydall Mer 8 Mai 2024 - 4:17

» bouton dans autre form que 0
Je pense que çà en est un... Emptypar leclode Lun 6 Mai 2024 - 13:59

» KGF_dll - nouvelles versions
Je pense que çà en est un... Emptypar Klaus Lun 6 Mai 2024 - 11:41

» Gestion d'un système client-serveur.
Je pense que çà en est un... Emptypar Klaus Lun 6 Mai 2024 - 10:23

» @Jack
Je pense que çà en est un... Emptypar Jack Mar 30 Avr 2024 - 20:40

» Une calculatrice en une ligne de programme
Je pense que çà en est un... Emptypar jean_debord Dim 28 Avr 2024 - 8:47

» Form(résolu)
Je pense que çà en est un... Emptypar leclode Sam 27 Avr 2024 - 17:59

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mai 2024
LunMarMerJeuVenSamDim
  12345
6789101112
13141516171819
20212223242526
2728293031  
CalendrierCalendrier
Le Deal du moment : -29%
PC portable – MEDION 15,6″ FHD Intel i7 ...
Voir le deal
499.99 €

 

 Je pense que çà en est un...

Aller en bas 
3 participants
AuteurMessage
Yannick




Nombre de messages : 8611
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010

Je pense que çà en est un... Empty
MessageSujet: Je pense que çà en est un...   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 13:16

Code:
dim x%,y%

label Clic2

y%=-20
For x%=204 To 213:Edit x% :y%=y%+30:Top x%,80:Left x%,y% :Width x%,20:Next x%
For x%=204 to 212:on_change x%,Clic2 : next x%
end

Clic2:
  for x%=204 to 212
      If len(text$(x%))>1 then set_focus x%+1
  next x%
return

le "set focus" passe bien du 204 au 205 mais bug au 206
Revenir en haut Aller en bas
Yannick




Nombre de messages : 8611
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010

Je pense que çà en est un... Empty
MessageSujet: re   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 13:26

La solution :
Code:
dim x%,y%

label Clic2

y%=-20
For x%=204 To 213:Edit x% :y%=y%+30:Top x%,80:Left x%,y% :Width x%,20:Next x%
For x%=204 to 212:on_change x%,Clic2 : next x%
end

Clic2:
  for x%=204 to 212
      If len(text$(number_change))=2 then set_focus number_change+1
  next x%
return
Revenir en haut Aller en bas
Jean Claude

Jean Claude


Nombre de messages : 5950
Age : 69
Localisation : 83 Var
Date d'inscription : 07/05/2009

Je pense que çà en est un... Empty
MessageSujet: Re: Je pense que çà en est un...   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 13:42

Salut Ygeronimi

SOLUTION:
Code:
dim x%,y%

label Clic2

y%=-20
For x%=204 To 213:Edit x% :y%=y%+30:Top x%,80:Left x%,y% :Width x%,20:Next x%
For x%=204 to 212:on_change x%,Clic2 : next x%
set_focus 204
end

Clic2:
  for x%=204 to 212
      If len(text$(number_change))>0 then set_focus number_change+1
  next x%
return

ton problème est là: If len(text$(number_change))>0 then set_focus number_change+1

et aussi de donner le FOCUS au premier edit
What a Face



Revenir en haut Aller en bas
Yannick




Nombre de messages : 8611
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010

Je pense que çà en est un... Empty
MessageSujet: re   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 14:19

@ Jean claude,

Je crois que l'on s'est croisé ( cf post solution) mais il y a un truc
essayes le premier code et entre manuellement un chiffre dans les edit
au bout d'un moment le focus revient sur le troisième... Suspect

Je te remerçie de t'être penché sur la question.
Revenir en haut Aller en bas
Jack
Admin
Jack


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

Je pense que çà en est un... Empty
MessageSujet: Re: Je pense que çà en est un...   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 17:28

Bon. Il n'y a pas de bug et voici l'explication.

Exécute ce bout de programme:
Code:
label focus
button 1
edit 2:top 2,50
text 2,"abcd"
on_click 1,focus
end
focus:
set_focus 2
return
En cliquant sur le bouton, tu donnes le focus au bouton et l'EDIT perd donc son focus.
Le traitement du click sur le bouton redonne le focus à l'EDIT alors qu'il l'avait perdu.
Un focus sur un EDIT qui n'a pas le focus sélectionne le texte qu'il contient, tandis qu'un focus sur un EDIT qui a déja le focus est inactif. C'est Windows qui fonctionne ainsi.



Ceci étant acquis, dans l'exemple que tu donnes (le premier), le premier EDIT (204) n'aura jamais le focus, car quand x% vaut 204, il y a SET_FOCUS 205

Lorsque qu'on tape un caractère dans l'EDIT de gauche 204, il ne se passe rien, aucun EDIT ne reçoit le focus.
Au 2ème caractère dans l'EDIT 204, le focus est donné au 2ème EDIT (205)
Lorsqu'on tape un 3ème caractère, il va dans cet EDIT 205.
Le test sur EDIT 204 étant positif, le focus est donné au 2ème EDIT 205; mais il a déjà le focus. Le set_focus est inactif.
Lorsqu'on tape un 4ème caractère, il va dans cet EDIT 205.
Le test sur EDIT 204 étant positif, le focus est donné au 2ème EDIT 205.
Le test sur EDIT 205 étant positif, le focus est ensuite donné au 3ème EDIT 206.
Lorsqu'on tape un 5ème caractère, il va dans cet EDIT 206.
Le test sur EDIT 204 étant positif, le focus est donné au 2ème EDIT 205.
Le test sur EDIT 205 étant positif, le focus est ensuite donné au 3ème EDIT 206. MAIS cette fois, cet EDIT n'avait plus le focus. Le texte qu'il contient est donc cette fois sélectionné.

Tout caractère tapé ensuite remplace le texte sélectionné, encore une fois, c'est Windows qui fonctionne comme ça.
Et tu as l'impression que plus rien n'est pris en compte...
Revenir en haut Aller en bas
https://panoramic.1fr1.net
Jean Claude

Jean Claude


Nombre de messages : 5950
Age : 69
Localisation : 83 Var
Date d'inscription : 07/05/2009

Je pense que çà en est un... Empty
MessageSujet: Re: Je pense que çà en est un...   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 17:32

à Ygeronimi,

Dans ta solution tu détermine (If len(text$(number_change))=2 then set_focus number_change+1) du coup çà marche si on tape 2 caractères (après avoir cliqué dans le premier edit).

Je vois pas de problème dans tes 2 codes....

Au passage, fait gaffe au titres de tes messages (Jack veut du positif).
Exemple: "je pense que çà en est un..." (sous entendu un bug).
UN: tu te positionne d'entrée dans la rubrique BUG Evil or Very Mad
DEUX: si tu avais utilisé la rubrique à l'aide en disant pourquoi focus ne marche pas

Bon, je vais pas jouer les moralisateurs, j'ai fait ma part de bourdes sous la pression du codage ou de l'humour mal géré, mais je pense que Jack a vraiment envi que ce forum soit plus positif et objectif (et là je ne parle pas de l'humour qui est nécessaire).

Je précise: il n'y a rien contre toi spécialement, tu es un passionné, et comme tous les passionnés, tu dégaine trop vite Very Happy
Revenir en haut Aller en bas
Jack
Admin
Jack


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

Je pense que çà en est un... Empty
MessageSujet: Re: Je pense que çà en est un...   Je pense que çà en est un... EmptyMer 26 Sep 2012 - 17:35

J'ai donné l'explication plus haut de ce qui se passe.
Il n'y a pas de bug.
Je verrouille et on passe à autre chose.
Revenir en haut Aller en bas
https://panoramic.1fr1.net
Contenu sponsorisé





Je pense que çà en est un... Empty
MessageSujet: Re: Je pense que çà en est un...   Je pense que çà en est un... Empty

Revenir en haut Aller en bas
 
Je pense que çà en est un...
Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» un bug je pense, un objet alpha qui pose probleme
» Un logiciel pratique (entre autre pour Ygeronimi, je pense)

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC :: Un problème avec PANORAMIC?-
Sauter vers: