Pb de toolbar - Page 1

Bonjour,

je viens de taper un prog pour me faire un toolbar, en me servant du fichier main.kbdprgm1.89p afin de beneficier des touches de raccourci pour le lancer. Mais voila que je le trouve tres long a charger mon prog, 4 secondes ...

le voici

()
Prgm
ClrIO

Lbl menu
Toolbar
Title "Math"
Item "Genera1",genera1:Item "Matrice",matrice:Item "ED1",ED1:Item "ED2",ED2
Item "Integra",integra:Item "Intdble",intdble:Item "Derivee",derivee:Item "Trigo",trigo:Item "Complex",complex
Item "Etufonc",etufonc:Item "Limites",limites:Item "Coparam",coparam:Item "Equa234",equa234
Title "Elec"
Item "Genera3",genera3:Item "CourAlt",couralt:Item "Fresnel",fresnel:Item "Comple1",comple1
Item "OhmZLC",ohmzlc:Item "GrpElPas",grelpas:Item "GrElAct",grelact:Item "Puissan",puissan:Item "Boucher",boucher
Item "NoeMail",noemail:Item "Triphas",triphas:Item "Continu",continu
Title "Meca"
Item "Genera2",genera2:Item "Forces",forces:Item "DynamPT",dynampt:Item "WNrjPu",wenepui
Item "RelVira",relvira:Item "MonRuss",monruss:Item "VitAcce",vitacce:Item "MvtRect",mvtrect:Item "MvtProj",mvtproj
Item "MvtCirc",mvtcirc:Item "MvtSinu",mvtsinu
Title "Hydrau"
Item "Genera4",genera4:Item "Pressio",pressio:Item "Pres2Pt",pres2pt:Item "Archime",archime
Item "Ffond",ffond:Item "Fparoi",fparoi:Item "Barrage",barrage:Item "Debmavo",debmavo:Item "Bernoul",bernoul
Item "VidRese",vidrese:Item "SecContr",secontr
Title "Energe"
Item "Genera1",genera1
Title "Projet"
Item "Genera1",genera1
Item "Quit",Fin
EndTBar

Lbl genera4
hibview("COURS\genera4")
goto Fin
Lbl pressio
hibview("COURS\pressio")
goto Fin
Lbl pres2pt
hibview("COURS\pres2pt")
goto Fin
Lbl archime
hibview("COURS\archime")
goto Fin
Lbl ffond
hibview("COURS\ffond")
goto Fin
Lbl fparoi
hibview("COURS\fparoi")
goto Fin
Lbl barrage
hibview("COURS\barrage")
goto Fin
Lbl debmavo
hibview("COURS\debmavo")
goto Fin
Lbl bernoul
hibview("COURS\bernoul")
goto Fin
Lbl vidrese
hibview("COURS\vidrese")
goto Fin
Lbl secontr
hibview("COURS\secontr")
goto Fin

Lbl genera2
hibview("COURS\genera2")
goto Fin
Lbl forces
hibview("COURS\forces")
goto Fin
Lbl dynampt
hibview("COURS\dynampt")
goto Fin
Lbl wenepui
hibview("COURS\wenepui")
goto Fin
Lbl relvira
hibview("COURS\relvira")
goto Fin
Lbl monruss
hibview("COURS\monruss")
goto Fin
Lbl vitacce
hibview("COURS\vitacce")
goto Fin
Lbl mvtrect
hibview("COURS\mvtrect")
goto Fin
Lbl mvtproj
hibview("COURS\mvtproj")
goto Fin
Lbl mvtcirc
hibview("COURS\mvtcirc")
goto Fin
Lbl mvtsinu
hibview("COURS\mvtsinu")
goto Fin

Lbl genera3
hibview("COURS\genera3")
goto Fin
Lbl couralt
hibview("COURS\couralt")
goto Fin
Lbl fresnel
hibview("COURS\fresnel")
goto Fin
Lbl comple1
hibview("COURS\comple1")
goto Fin
Lbl ohmzlc
hibview("COURS\ohmzlc")
goto Fin
Lbl grelpas
hibview("COURS\grelpas")
goto Fin
Lbl grelact
hibview("COURS\grelact")
goto Fin
Lbl puissan
hibview("COURS\puissan")
goto Fin
Lbl boucher
hibview("COURS\boucher")
goto Fin
Lbl noemail
hibview("COURS\noemail")
goto Fin
Lbl triphas
hibview("COURS\triphas")
goto Fin
Lbl continu
hibview("COURS\continu")
goto Fin

Lbl genera1
hibview("COURS\genera1")
goto Fin
Lbl matrice
hibview("COURS\matrice")
goto Fin
Lbl ED1
hibview("COURS\equdif1")
goto Fin
Lbl ED2
hibview("COURS\equdif2")
goto Fin
Lbl integra
hibview("COURS\integra")
goto Fin
Lbl intdble
hibview("COURS\intdble")
goto Fin
Lbl derivee
hibview("COURS\derivee")
goto Fin
Lbl trigo
hibview("COURS\trigono")
goto Fin
Lbl complex
hibview("COURS\complex")
goto Fin
Lbl etufonc
hibview("COURS\etufonc")
goto Fin
Lbl limites
hibview("COURS\limites")
goto Fin
Lbl coparam
hibview("COURS\coparam")
goto Fin
Lbl equa234
hibview("COURS\equa234")
goto Fin

Lbl Fin
ClrIO
DispHome
Stop
EndPrgm

Comment faire pour qu'il aye plus vite ? Il est ecrit avec les pieds c'est sur, alors si vous avez des idées, faites moi les profiter

Salut à toi

Désarchive ton fichier, lance le et rearchive le sans l'éditer,

C'est fort possible que ce soit ça le soucis

Je ne m'y connais pas en manipulation de toolbar, mais vu la dose de lignes que tu balances à ta machine c'est pas étonnant que ça mette 4 secondes (surtout que c'est du basic ^_^).
Tu es sensé lancer ça à chaque fois que tu veux utiliser ta nouvelle toolbar?

IP2X (./2) :
Salut à toi

Désarchive ton fichier, lance le et rearchive le sans l'éditer,

C'est fort possible que ce soit ça le soucis

Oui tout à fait merci beaucoup

Mais pourquoi ??

De plus je voudrais changer la méthode, dans le futur je souhaiterais faire :

toolbar
title
item
etc ..
endtbar

Lbl
hibview()
retour au menu

Lbl
hibview()
retour au menu

Lbl fin


Pour moi cela s'écrit (mais que pour moi parce que la calcul me jette )
()
Prgm
ClrIO

Toolbar
Title "Math"
Item "Genera1",genera1:Item "Matrice",matrice:Item "ED1",ED1:Item "ED2",ED2
Item "Integra",integra:Item "Intdble",intdble:Item "Derivee",derivee:Item "Trigo",trigo:Item "Complex",complex
Item "Etufonc",etufonc:Item "Limites",limites:Item "Coparam",coparam:Item "Equa234",equa234
Title "Elec"
Item "Genera3",genera3:Item "CourAlt",couralt:Item "Fresnel",fresnel:Item "Comple1",comple1
Item "OhmZLC",ohmzlc:Item "GrpElPas",grelpas:Item "GrElAct",grelact:Item "Puissan",puissan:Item "Boucher",boucher
Item "NoeMail",noemail:Item "Triphas",triphas:Item "Continu",continu
Title "Meca"
Item "Genera2",genera2:Item "Forces",forces:Item "DynamPT",dynampt:Item "WNrjPu",wenepui
Item "RelVira",relvira:Item "MonRuss",monruss:Item "VitAcce",vitacce:Item "MvtRect",mvtrect:Item "MvtProj",mvtproj
Item "MvtCirc",mvtcirc:Item "MvtSinu",mvtsinu
Title "Hydrau"
Item "Genera4",genera4:Item "Pressio",pressio:Item "Pres2Pt",pres2pt:Item "Archime",archime
Item "Ffond",ffond:Item "Fparoi",fparoi:Item "Barrage",barrage:Item "Debmavo",debmavo:Item "Bernoul",bernoul
Item "VidRese",vidrese:Item "SecContr",secontr
Title "Energe"
Item "Genera1",genera1
Title "Projet"
Item "Genera1",genera1
Item "Quit",Fin
EndTBar

Lbl genera4
hibview("COURS\genera4")
Lbl pressio
hibview("COURS\pressio")
etc ...

Ma toolbar apparait, je peus rentrer dans Lbl genera4 puis dans hibview("COURS\genera4"), quand je quitte hibview il me dit "ce n'est pas un nom de fonction ou de programme". La je ne comprend pas pourquoi ....

Merci pour votre patience

Il manque des Goto pour les retours au menu.

Kevin Kofler (./6) :
Il manque des Goto pour les retours au menu.

Effectivement j'ai rajouté un goto a la fin des Lbl mais cela ne fait que repousser le pb. Je reviens bien dans la toolbar, mais lorsque je selectionne à nouveau un cour, je me retrouve avec le meme message !!

Je passe à coté du truc c'est sur, il me faut des yeux un peu plus agueri pour le voir

Ce qui donne :

()
Prgm
ClrIO

Lbl Menu
Toolbar
Title "Math"
Item "Genera1",genera1:Item "Matrice",matrice:Item "ED1",ED1:Item "ED2",ED2
Item "Integra",integra:Item "Intdble",intdble:Item "Derivee",derivee:Item "Trigo",trigo:Item "Complex",complex
Item "Etufonc",etufonc:Item "Limites",limites:Item "Coparam",coparam:Item "Equa234",equa234
Title "Elec"
Item "Genera3",genera3:Item "CourAlt",couralt:Item "Fresnel",fresnel:Item "Comple1",comple1
Item "OhmZLC",ohmzlc:Item "GrpElPas",grelpas:Item "GrElAct",grelact:Item "Puissan",puissan:Item "Boucher",boucher
Item "NoeMail",noemail:Item "Triphas",triphas:Item "Continu",continu
Title "Meca"
Item "Genera2",genera2:Item "Forces",forces:Item "DynamPT",dynampt:Item "WNrjPu",wenepui
Item "RelVira",relvira:Item "MonRuss",monruss:Item "VitAcce",vitacce:Item "MvtRect",mvtrect:Item "MvtProj",mvtproj
Item "MvtCirc",mvtcirc:Item "MvtSinu",mvtsinu
Title "Hydrau"
Item "Genera4",genera4:Item "Pressio",pressio:Item "Pres2Pt",pres2pt:Item "Archime",archime
Item "Ffond",ffond:Item "Fparoi",fparoi:Item "Barrage",barrage:Item "Debmavo",debmavo:Item "Bernoul",bernoul
Item "VidRese",vidrese:Item "SecContr",secontr
Title "Energe"
Item "Genera1",genera1
Title "Projet"
Item "Genera1",genera1
Item "Quit",Fin
EndTBar

Lbl genera4
hibview("COURS\genera4")
goto Menu
Lbl pressio
hibview("COURS\pressio")
goto Menu
etc ...

helo

je reviens avec mon prog simple mais qui ne marche pas comme je veus. Je lance le prog, je n'aie pas d'erreur, je rentre dans Lb genera4 et hibwiew s'affiche sa

()
Prgm
ClrIO

Lbl menu
ClrIO
Toolbar
Title "Math"
Item "Genera1",genera1:Item "Matrice",matrice:Item "ED1",ED1:Item "ED2",ED2
Item "Integra",integra:Item "Intdble",intdble:Item "Derivee",derivee:Item "Trigo",trigo:Item "Complex",complex
Item "Etufonc",etufonc:Item "Limites",limites:Item "Coparam",coparam:Item "Equa234",equa234
Title "Elec"
Item "Genera3",genera3:Item "CourAlt",couralt:Item "Fresnel",fresnel:Item "Comple1",comple1
Item "OhmZLC",ohmzlc:Item "GrpElPas",grelpas:Item "GrElAct",grelact:Item "Puissan",puissan:Item "Boucher",boucher
Item "NoeMail",noemail:Item "Triphas",triphas:Item "Continu",continu
Title "Meca"
Item "Genera2",genera2:Item "Forces",forces:Item "DynamPT",dynampt:Item "WNrjPu",wenepui
Item "RelVira",relvira:Item "MonRuss",monruss:Item "VitAcce",vitacce:Item "MvtRect",mvtrect:Item "MvtProj",mvtproj
Item "MvtCirc",mvtcirc:Item "MvtSinu",mvtsinu
Title "Hydrau"
Item "Genera4",genera4:Item "Pressio",pressio:Item "Pres2Pt",pres2pt:Item "Archime",archime
Item "Ffond",ffond:Item "Fparoi",fparoi:Item "Barrage",barrage:Item "Debmavo",debmavo:Item "Bernoul",bernoul
Item "VidRese",vidrese:Item "SecContr",secontr
Title "Energe"
Item "Genera1",genera1
Title "Projet"
Item "Genera1",genera1
Item "Quit",Fin
EndTBar

goto menu

Lbl genera4
ClrIO
main\hibview("COURS\genera4")
goto menu
Lbl pressio
ClrIO
main\hibview("COURS\pressio")
goto menu

etc ...

helo

J'ai encore un soucis avec ma toolbar , je lance le prog, j'ai ma toolbar qui s'affiche, je peus lancer un Lbl genera4 , j'ai bien hibview qui fonctionne et lance mon fichier texte. Lorsque je sors de hibview, je reviens bien dans ma toolbar. Mais quand je souhaite re rentrer dans Lbl genera4 ou un autre, j'ai le message suivant :

ce n'est pas un nom de fonction ou de programme

Je comprend pourquoi, j'ai essayé de faire des ClrIO partout en pensant que cela pouvait changer quelquechose, mais en vain
Pourriez vous m'aider ??
merci beaucoup

Voici le prog :

()
Prgm
ClrIO

Lbl menu
ClrIO
Toolbar
Title "Math"
Item "Genera1",genera1:Item "Matrice",matrice:Item "ED1",ED1:Item "ED2",ED2
Item "Integra",integra:Item "Intdble",intdble:Item "Derivee",derivee:Item "Trigo",trigo:Item "Complex",complex
Item "Etufonc",etufonc:Item "Limites",limites:Item "Coparam",coparam:Item "Equa234",equa234
Title "Elec"
Item "Genera3",genera3:Item "CourAlt",couralt:Item "Fresnel",fresnel:Item "Comple1",comple1
Item "OhmZLC",ohmzlc:Item "GrpElPas",grelpas:Item "GrElAct",grelact:Item "Puissan",puissan:Item "Boucher",boucher
Item "NoeMail",noemail:Item "Triphas",triphas:Item "Continu",continu
Title "Meca"
Item "Genera2",genera2:Item "Forces",forces:Item "DynamPT",dynampt:Item "WNrjPu",wenepui
Item "RelVira",relvira:Item "MonRuss",monruss:Item "VitAcce",vitacce:Item "MvtRect",mvtrect:Item "MvtProj",mvtproj
Item "MvtCirc",mvtcirc:Item "MvtSinu",mvtsinu
Title "Hydrau"
Item "Genera4",genera4:Item "Pressio",pressio:Item "Pres2Pt",pres2pt:Item "Archime",archime
Item "Ffond",ffond:Item "Fparoi",fparoi:Item "Barrage",barrage:Item "Debmavo",debmavo:Item "Bernoul",bernoul
Item "VidRese",vidrese:Item "SecContr",secontr
Title "Energe"
Item "Genera1",genera1
Title "Projet"
Item "Genera1",genera1
Item "Quit",Fin
EndTBar

goto menu

Lbl genera4
ClrIO
main\hibview("COURS\genera4")
goto menu
Lbl pressio
ClrIO
main\hibview("COURS\pressio")
goto menu
etc ....