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
» demande explication KGF pour imprimer en mm
Réinitialisation de SET_FOCUS Emptypar JL35 Hier à 17:28

» Petit passage furtif
Réinitialisation de SET_FOCUS Emptypar Froggy One Mer 27 Mar 2024 - 14:26

» SPIN et aide langage (résolu)
Réinitialisation de SET_FOCUS Emptypar leclode Sam 23 Mar 2024 - 15:20

» Aide-mémoire des mots-clés Panoramic
Réinitialisation de SET_FOCUS Emptypar papydall Mer 20 Mar 2024 - 21:23

» Je ne comprend pas pourquoi la largeur de la scene 3d change
Réinitialisation de SET_FOCUS Emptypar Marc Mar 12 Mar 2024 - 20:06

» Comment télécharger panoramic?
Réinitialisation de SET_FOCUS Emptypar lepetitmarocain Sam 9 Mar 2024 - 13:31

» @lepetitmarocain <==> KGFGrid
Réinitialisation de SET_FOCUS Emptypar Klaus Dim 3 Mar 2024 - 9:59

» Tangram-Toukaré
Réinitialisation de SET_FOCUS Emptypar jjn4 Mer 28 Fév 2024 - 18:12

» Editeur EliP 6 : Le Tiny éditeur avec 25 onglets de travail
Réinitialisation de SET_FOCUS Emptypar jjn4 Mer 28 Fév 2024 - 18:09

» KGF_dll - nouvelles versions
Réinitialisation de SET_FOCUS Emptypar Klaus Mer 28 Fév 2024 - 17:01

» Mes souhaits d'amélioration de Panoramic.
Réinitialisation de SET_FOCUS Emptypar Pedro Lun 26 Fév 2024 - 18:12

» Testez-votre-QI
Réinitialisation de SET_FOCUS Emptypar jjn4 Dim 25 Fév 2024 - 17:12

» Utilisation d'Élip
Réinitialisation de SET_FOCUS Emptypar jjn4 Sam 24 Fév 2024 - 18:33

» Récapitulatif ludothèque panoramic jjn4
Réinitialisation de SET_FOCUS Emptypar jjn4 Sam 24 Fév 2024 - 18:11

» Générateur de mots de passe
Réinitialisation de SET_FOCUS Emptypar mindstorm Mar 20 Fév 2024 - 20:09

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Mars 2024
LunMarMerJeuVenSamDim
    123
45678910
11121314151617
18192021222324
25262728293031
CalendrierCalendrier
Le Deal du moment :
Manga Chainsaw Man : où acheter le Tome 17 ...
Voir le deal
19.99 €

 

 Réinitialisation de SET_FOCUS

Aller en bas 
AuteurMessage
Jean Claude

Jean Claude


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

Réinitialisation de SET_FOCUS Empty
MessageSujet: Réinitialisation de SET_FOCUS   Réinitialisation de SET_FOCUS EmptyLun 12 Oct 2009 - 16:07

Bonjour tout le monde ""hello word",

Je ne sais pas si j'ai choisi le bon post, mais que ce soit un problème de programmation ou pas, çà BUG

Je ne réussis pas à ce que SET_FOCUS fonctionne au 2eme passage et après. Copier ce code et entrez succéssivement avec une référence, puis sans, 2 à 3 fois.
J'attends vos commentaires ou vos solutions.


Code:


label quit,demar,choix,ajoute,suitajout,suitajou
dim t$

left 0,384:top 0,333:width 0,550:height 0,492
caption 0,"enregistrements succécifs avec  SET_FOCUS"
 
combo 1:left 1,40:top 1,243:item_add 1,"Ajouter une Référence"
item_add 1,"Sans Référence":hide 1

edit 2:left 2,41:top 2,323:hide 2

button 3:left 3,171:top 3,325::width 3,20:height 3,20:caption 3,"OK":hide 3

button 4:left 4,430:top 4,407:caption 4,"QUITTER"
on_click 4,quit

list 5:left 5,40:top 5,30:width 5,458:height 5,173
gosub demar
end
rem -------------------------------------------------------------------------
demar:
show 1:active 1:text 1,""
on_click 1,choix
return

choix:
t$=upper$(text$(1))
if left$(t$,1)="A" then show 2:active 2:text 2,"":set_focus 2:goto ajoute
if left$(t$,1)="S" then t$="----------":item_add 5,t$
inactive 1:text 1,""
hide 2:hide 3
goto demar
return

ajoute:
t$=upper$(text$(2))
on_change 2,suitajout
return

suitajout:
show 3
on_click 3,suitajou
return

suitajou:
t$=upper$(text$(2))
item_add 5,t$
hide 2:hide 3
goto demar:rem <<<<<<<<<<<<<<< On boucle pour remplir le LIST 5
return
rem --------------------------------------------------------------------------
quit:
terminate
Revenir en haut Aller en bas
Invité
Invité




Réinitialisation de SET_FOCUS Empty
MessageSujet: Re: Réinitialisation de SET_FOCUS   Réinitialisation de SET_FOCUS EmptyLun 12 Oct 2009 - 20:40

Je viens de regarder ton programme et j'ai fais la correction
Si tu as déjà regarder hier soir, j'ai repris la correction car en mettant de l'ordre pour mieu voir, j'ai retiré par mégarde une ligne, et cela ne fonctionnait plus comme prévu. Regarde la correction.
Code:

demar:
show 1:active 1:text 1,""
on_click 1,choix
return

choix:
t$=upper$(text$(1)) :inactive 1 :' INACTIVE 1 déplacé
if left$(t$,1)="A" then show 2:active 2:text 2,"":set_focus 2:goto ajoute
if left$(t$,1)="S" then t$="----------":item_add 5,t$
text 1,""
hide 2:hide 3
goto demar
return

ajoute:
t$=upper$(text$(2))
on_change 2,suitajout
return

suitajou:
t$=upper$(text$(2))
item_add 5,t$
hide 2:hide 3
goto demar:rem <<<<<<<<<<<<<<< On boucle pour remplir le LIST 5
                          '                return  inutile


suitajout:
 show 3 :set_focus 2 :' set_focus 2 rajouté
on_click 3,suitajou
return

A un moment, à show 3 dans suitajout, le combo s'affiche sur fond vert, donc il prend le controle, et pour cette raison SET_FOCUS 2 s'impose. Dans choix, inactive 1 est trop bas, vu que tu quittes par goto avant.
Là set_focus fonctionne, seulement avec la vitesse, on ne voit rien. Cette fois-ci, je sais que cela marche, vu que je viens de faire copier/coller depuis ce texte, vers Panoramic, et le focus va réellement sur l'EDIT comme tu le demandais.
Salutation à+
Revenir en haut Aller en bas
Jean Claude

Jean Claude


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

Réinitialisation de SET_FOCUS Empty
MessageSujet: Re: Réinitialisation de SET_FOCUS   Réinitialisation de SET_FOCUS EmptyMar 13 Oct 2009 - 8:14

Je te remercies. Jai beaucoups de mal a gérer les objets à l'intérieur d'une boucle. Je n'était pas loin de la solution. tu m'a fait gagné du temps.
A+
Revenir en haut Aller en bas
Invité
Invité




Réinitialisation de SET_FOCUS Empty
MessageSujet: Re: Réinitialisation de SET_FOCUS   Réinitialisation de SET_FOCUS EmptyMar 13 Oct 2009 - 8:23

Je te donne le code qui m'a permit de comprendre, pour suivre. Il y a des déplacements de set_focus, mais ça marche aussi. On ne voit plus ici l'affichage en vert sur le combo, suite au différents changement pour suivre le programme.
Par contre, le choix des étiquettes, c'est absolument ambigu pour suivre le programme.
Code:

label quit,demar,choix,ajoute,suitajout,suitajou
dim t$

left 0,760:top 0,0:width 0,510:height 0,492
caption 0,"enregistrements succécifs avec  SET_FOCUS"

combo 1:left 1,40:top 1,243:item_add 1,"Ajouter une Référence"
item_add 1,"Sans Référence":hide 1

edit 2:left 2,41:top 2,323:hide 2

button 3:left 3,171:top 3,325::width 3,20:height 3,20:caption 3,"OK":hide 3

button 4:left 4,430:top 4,407:caption 4,"QUITTER"
on_click 4,quit

list 5:left 5,40:top 5,30:width 5,200 :height 5,173
memo 6:left 6,250:width 6,230:top 6,30:height 6,173

gosub demar
end
rem -------------------------------------------------------------------------

demar:
item_add 6,"demar":item_add 6,""

show 1:active 1:text 1,""
on_click 1,choix
return

choix:
item_add 6,"choix":wait 1000
t$=upper$(text$(1)) :inactive 1
if left$(t$,1)="A" then show 2:active 2:text 2,"":goto ajoute
if left$(t$,1)="S" then t$="----------":item_add 5,t$
text 1,""
hide 2:hide 3
goto demar
return

ajoute:
item_add 6,"ajoute" :wait 1000
t$=upper$(text$(2))

set_focus 2
on_change 2,suitajout
item_add 6,"on_change 2,suitajout"
return

suitajou:
item_add 6,"suitajou":wait 1000
t$=upper$(text$(2))
item_add 5,t$
hide 2:hide 3
goto demar:rem <<<<<<<<<<<<<<< On boucle pour remplir le LIST 5
                          '                return  inutile
suitajout:
item_add 6,"suitajout      >on a rentré un caractère<":item_add 6,"":wait 1000
 show 3

on_click 3,suitajou
set_focus 2
item_add 6,"on_click 3,suitajout"
return


rem --------------------------------------------------------------------------
quit:
terminate
Bon courage A+
Revenir en haut Aller en bas
Contenu sponsorisé





Réinitialisation de SET_FOCUS Empty
MessageSujet: Re: Réinitialisation de SET_FOCUS   Réinitialisation de SET_FOCUS Empty

Revenir en haut Aller en bas
 
Réinitialisation de SET_FOCUS
Revenir en haut 
Page 1 sur 1

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: