Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1653 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Passé un paramètre lors de l'exécution

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Passé un paramètre lors de l'exécution

n°302352
tatan
Posté le 05-02-2003 à 15:20:39  profilanswer
 

Est-ce possible de passé un paramètre lors de l'exécution d'un exe. Exemple en commande dos, je lance projet1 MonNom par exemple. Si oui, quel est la démarche?

mood
Publicité
Posté le 05-02-2003 à 15:20:39  profilanswer
 

n°302358
antp
Super Administrateur
Champion des excuses bidons
Posté le 05-02-2003 à 15:22:18  profilanswer
 

Dans Delphi pour récupérer les paramètres c'est la fonction ParamStr :
ParamStr(0) te donne chemin+nom du exe, les suivants correspondent aux params
ParamStr(1), etc.
Y a ParamCount qui te dit combien il y a de paramètres (sans compter le 0)


Message édité par antp le 05-02-2003 à 15:22:40
n°302503
antp
Super Administrateur
Champion des excuses bidons
Posté le 05-02-2003 à 17:30:09  profilanswer
 

zion a écrit :


Erhm, n'est ce pas antp?  :sarcastic:  


 
bhen oui :heink:
 

zion a écrit :


(En plus y a moyen de l'avoir avec une API, je pige tjs pas pq ils ont utilisé ca mais bon)


 
ParamStr(0) fait justement un appel à cette API :p


Message édité par antp le 05-02-2003 à 17:30:18
n°302512
antp
Super Administrateur
Champion des excuses bidons
Posté le 05-02-2003 à 17:37:09  profilanswer
 

:heink: Tu parlais quand même de l'API GetModuleFileName ?
 

Code :
  1. function ParamStr(Index: Integer): string;
  2. {$IFDEF MSWINDOWS}
  3. var
  4.   P: PChar;
  5.   Buffer: array[0..260] of Char;
  6. begin
  7.   Result := '';
  8.   if Index = 0 then
  9.     SetString(Result, Buffer, GetModuleFileName(0, Buffer, SizeOf(Buffer)))
  10.   else
  11.   begin
  12.     P := GetCommandLine;
  13.     while True do
  14.     begin
  15.       P := GetParamStr(P, Result);
  16.       if (Index = 0) or (Result = '') then Break;
  17.       Dec(Index);
  18.     end;
  19.   end;
  20. {$ENDIF}


Message édité par antp le 05-02-2003 à 17:37:25
n°302519
antp
Super Administrateur
Champion des excuses bidons
Posté le 05-02-2003 à 17:43:50  profilanswer
 

:fuck:


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Passé un paramètre lors de l'exécution

 

Sujets relatifs
[PHP] Passer les caractères ' et & en parametre ?Problème à l'exécution des progs avec Scite
[Eclipse] Développement et exécution de plug-in - RESOLUpeut on passer une methode en parametre ?
code pour lancer l'execution d' un programme externeexécution de programmes
mot de passe à l'ouverture d'une page ?[PHP] Faire un test sur la valeur d'un paramètre du php.ini
[php] probleme bizarre de passage de parametreje comprends pas ce qui se passe...
Plus de sujets relatifs à : Passé un paramètre lors de l'exécution


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR