[OK] Paramètre optionnel d'un exe.

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
Avatar de l’utilisateur
Ar-S
Messages : 9540
Inscription : dim. 09/oct./2005 16:51
Contact :

[OK] Paramètre optionnel d'un exe.

Message par Ar-S »

Salut,

Si quelqu'un sait comment faire je suis preneur, je n'en ai aucune idée.
J'ai fait un petit prog d'exo/jeu pour mes élèves. Il y a 7 niveaux. Par défaut le soft se lance au niveau 1. J'aimerai que l'on puisse déterminer le level au lancement de l'exe. => monprog.exe -2 pour commencer au level 2 etc...
pour infos mes levels sont dans l'exe représentés par une simple "global variable.b"

D'avance merci.
Dernière modification par Ar-S le ven. 19/sept./2014 19:52, modifié 1 fois.
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
G-Rom
Messages : 3641
Inscription : dim. 10/janv./2010 5:29

Re: Paramètre optionnel d'un exe.

Message par G-Rom »

Ar-S a écrit :Salut,

Si quelqu'un sait comment faire je suis preneur, je n'en ai aucune idée.
J'ai fait un petit prog d'exo/jeu pour mes élèves. Il y a 7 niveaux. Par défaut le soft se lance au niveau 1. J'aimerai que l'on puisse déterminer le level au lancement de l'exe. => monprog.exe -2 pour commencer au level 2 etc...
pour infos mes levels sont dans l'exe représentés par une simple "global variable.b"

D'avance merci.

Code : Tout sélectionner

argc = CountProgramParameters()
If argc
  Dim argv.s(argc)
  For i = 0 To argc-1
    argv(i) = ProgramParameter(i)
  Next 
EndIf 
tout est dans le code , les paramètres sont dans argv() ( si il y en a )
Avatar de l’utilisateur
majikeyric
Messages : 602
Inscription : dim. 08/déc./2013 23:19
Contact :

Re: Paramètre optionnel d'un exe.

Message par majikeyric »

Salut,

un simple :

Code : Tout sélectionner

If CountProgramParameters()>0
	level=Val(ProgramParameter(0))
Else
	level=1
EndIf
devrait faire l'affaire ?

pour un appel avec "prog.exe 2" par exemple.

*edit*: ah bah G-Rom a été plus rapide.
Avatar de l’utilisateur
Ar-S
Messages : 9540
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: Paramètre optionnel d'un exe.

Message par Ar-S »

Merci pour vos réponses, j'avais complètement occulté les commandes PB concernant les paramètres !

Voilà mon petit bout de code qui marche : :mrgreen:

Code : Tout sélectionner

	LVL = CountProgramParameters()
	If LVL > 0 And LVL < 8
		EnCours = Val(ProgramParameter(0) )
	Else
		EnCours = 1	
	EndIf
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Répondre