problème avec on_click

bonsoir a tous
des le lancement du code ci-dessous j'obtiens ce message " 56 label non valide ".
j'ai beau retourner ce problème dans tous les sens , je ne comprends pas.
quelle est mon erreur?

Code:: error_french
width 0,900 : height 0,600
left 0,200:top 0,200

label miseenplace :gosub miseenplace
label affichage

end
' ********** Mise en place *******************
miseenplace:
alpha 10
  top 10,23 : left 10,15 : font_bold 10

edit 11
  width 11,30 : top 11,21:left 11,140

alpha 20
   top 20,23 : left 20,200 : font_bold 20

edit 21
  width 21,30 : top 21,21:left 21,360

alpha 30
  top 30,75 : left 30,55 : font_bold 30

edit 31
  width 31,30 : top 31,100:left 31,65

alpha 40
  top 40,75 : left 40,55+100 : font_bold 40

edit 41
  width 41,30 : top 41,100:left 41,65+100

alpha 50
  top 50,75 : left 50,55+200 : font_bold 50

edit 51
  width 51,30 : top 51,100:left 51,65+200

alpha 60
  top 60,75:left 60,55+300 : font_bold 60

edit 61
  width 61,30 : top 61,100 : left 61,65+300

alpha 70
  top 70,75:left 70,55+400: font_bold 70

edit 71
  width 71,30 : top 71,100 : left 71,65+400

alpha 79
top 79,30 :left 79,650
caption 79,"pour voir les résultats des calculs "

memo 80
  left 80,600
  top 80,50
  width 80,250
  height 80,400

button 85
top 85,300 :left 85, 420
caption 85," vadidation "
on_click 85, affichage
return
' ********** affichage de control *************
affichage:
item_add 80,"bonjour " : ' pour voir
return

j' ai donc chargée la derniére version au cas ou .
puisque j'ai toujours cette erreur sur le on_ckick, j'ai regardé l'exemple dans les mots clés.
l'exemple fonctionne tel qu'il est. Mais si je remplace le label clicked par affichage ,j'obtiens
la meme erreur 56.
clicked n'est pas dans la liste des mots clés et pourtant ,[" clicked(n) " oui ] ,si je mets les mots cles en rouges ,il apparait en rouge

Code:: error_french
rem déclarer un label
' label clicked
label affichage
rem un BUTTON est créé
button 1
rem chaque fois que le BUTTON est cliqué, exécuter à partir du label "clicked"
on_click 1,clicked
end : rem le programme principal est fini
' clicked:
affichage:
beep : rem traitement d'événement = signal sonore
return

qui peut me dire ?

Voici les premières lignes de ton programme corrigé. J'ai inversé les lignes 6 et 7, tout simplement.

Ton label Affichage était defini APRES l'appel à ta procédure qui fait le ON_CLICK !

Code:: error_french
width 0,900 : height 0,600
left 0,200:top 0,200

label affichage
label miseenplace :gosub miseenplace

end

merci klaus pour cette réponse rapide , mais j'aimerai savoir pourquoi dans le 2 em exemple (tiré des mots cles ) j'obtenais la meme erreur

Invité

Bonsoir,
Si tu es logique, on mettant: label clicked en remarque,
avec on_click 1,clicked, clicked n'est pas déclaré.

Si tu essayes ton programme en déclarant une étiquette, puis en te servant de cette étiquette, et ayant fait le sous-programme avec cette étiquette, il n'y a pas de problème; que ce soit avec affichage ou clicked.

Lorsqu'une étiquette est utilisée avec un évènement ou un sous-programme, au moment de la lecture en suivant le déroulement du programme, cette étiquette doit-être déclarée avant. Ce qui n'était pas le cas dans tes exemples avant.

Je suis d'accord avec Cosmos et Klaus,

Pour éviter ce genre de problème, commence par faire une procédure Dim_Label() que tu appelles en premier dans ton programme.

Code:: Dim_Label()
' ....
END: '---------- (fin de mise en place)
' Programme
' --------------------
Sub Dim_Label()
' Ici tu déclares tout les label(s) et toutes les variables
End_Sub

A+

bonsoir a tous
ce soir en relisant vos réponses,je me suis aperçu que dans le 2em exemple avec le label affichage
,j'ai omis de modifier la ligne suivante :on_click 1,cliked en on_click 1,affichage.
sinon , je n'aurai pas posté le 2em code.
j'en profite pour poser une autre question
ce code ci-dessous affiche mes résultats sur 20 lignes

Code:: affichage:
for i=1 to 10
item_add 80,part%(i%,0) : item_add 80,part%(i%,1)
next i

j'aimerai que les résultats soient affichés sur 10 lignes a raison de :
item_add 80,part%(i%,0) : item_add 80,part%(i%,1) sur la même ligne avec soit une virgule ou un espace entre eux
j'ai essayé plusieurs solutions sans resultats.

Nombre de messages : 7095 Localisation : 77 Date d'inscription : 29/11/2007

ce n'est pas possible comme ça, mais tu peux très bien faire:

Code:: a$ = part%(i%,0) + " " + part%(i%,1)
item_add 80, a$

avec n'importe quel séparateur (ici un espace).
Une remarque: dans ton exemple, il faut choisir entre i et i%, mais pas les deux !

» Problème avec select case Probleme réglé merci
» Problème avec RemoveStringBetweenDelimiters.
» Problème avec les "if".
» Problème avec RemoveStringBetweenDelimiters.
» Problème avec DTP de KGF