Yannick
Nombre de messages : 8635
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010
 | | Sujet: Quoi qui se passe ? Jeu 19 Mar 2015 - 18:33 | |
| Y a t il autre chose que la cause annoncée par le message qui puisse provoquer ceci :  La seule chose que j' ai modifié entre deux essais, c' est la dimension d' un Panel...  En plus, le return mis en cause est celui du Label Clic... | |
|
Klaus
Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009
| | Sujet: Re: Quoi qui se passe ? Jeu 19 Mar 2015 - 18:38 | |
| Cela se produit exactement dans les conditions énoncées par le message: tu fais un return là où il n'y a pas eu de gosub. Exemple: - Code:
-
test()
end
sub test()
return
end_sub
Il faut sortir d'une sub par exit_sub, pas par return. | |
|
Yannick
Nombre de messages : 8635
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010
| | Sujet: re Jeu 19 Mar 2015 - 18:43 | |
| Sauf que là, j' ai un :
Clic:
......
......
......
......
return | |
|
Klaus
Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009
| | Sujet: Re: Quoi qui se passe ? Jeu 19 Mar 2015 - 18:46 | |
| Tu as dû y aller autrement, par un GOTO par exemple. | |
|
Yannick
Nombre de messages : 8635
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010
| | Sujet: re Jeu 19 Mar 2015 - 18:50 | |
| Un goto me renverrait un label invalide...
puisque c' est goto label. | |
|
Klaus
Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009
| | Sujet: Re: Quoi qui se passe ? Jeu 19 Mar 2015 - 18:57 | |
| Un "goto clic" ne poserait aucun problème de syntaxe. Et produirait cette erreur. | |
|
Yannick
Nombre de messages : 8635
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010
| | Sujet: re Jeu 19 Mar 2015 - 19:05 | |
| Ouf !!! une manip malheureuse. j' ai par inadvertance effacer un " dans la création de la toolbar par la dll. ce qui a couper la sub à l' assemblage. je me suis retrouver avec - Code:
-
SUB CreateToolBar(P%,Pos%,IcoSize%)
dim_local x%,h$,ic$,Cible%
Cible%=P%
TB_res% = dll_call4("CreateToolbar",handle(cible%),handle(TB_Edit%),0,Pos%)
TB_res% = dll_call4("ModifyToolbar",7,IcoSize%,0,0)
TB_res% = dll_call4("ModifyToolbar",2,0,0,0)
TB_res% = dll_call4("ModifyToolbar",5,adr(TB_Lib$),0,0)
TB_icon$(1) = "USER_1"
TB_icon$(2) = "USER_2"
TB_icon$(3) = "USER_3"
TB_icon$(4) = "USER_
Clic:
.....
......
......
return dans le fichier assemblé Et ceci a provoqué cela ! CQFD l' erreur aurait du être "SUB without END_SUB" | |
|
Yannick
Nombre de messages : 8635
Age : 53
Localisation : Bretagne
Date d'inscription : 15/02/2010
| | Sujet: re Jeu 19 Mar 2015 - 19:08 | |
| Je ne suis pas d' accord avec tes dires Klaus
un goto clic
renverrait vers clic:
qui se termine bien par return et le return aurait bien son gosub.
goto return pourrait peut être bien provoquer cela aussi | |
|
Klaus
Nombre de messages : 12331
Age : 75
Localisation : Ile de France
Date d'inscription : 29/12/2009
| | Sujet: Re: Quoi qui se passe ? Jeu 19 Mar 2015 - 19:37 | |
| Fais marcher ceci: - Code:
-
label clic
goto clic
end
clic:
return
Ca provoque bien cette erreur... | |
|
Contenu sponsorisé
| | Sujet: Re: Quoi qui se passe ? | |
| |
|
Calendrier