IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Contribuez Pascal Discussion :

Petite mise à jour d'un article de la FAQ concernant le lancement d'un exécutable


Sujet :

Contribuez Pascal

  1. #1
    Rédacteur

    Avatar de naute
    Homme Profil pro
    Retraité
    Inscrit en
    Mars 2009
    Messages
    708
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Ille et Vilaine (Bretagne)

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Mars 2009
    Messages : 708
    Par défaut Petite mise à jour d'un article de la FAQ concernant le lancement d'un exécutable
    Bonjour .

    J'ai utilisé cet article de la FAQ qui fonctionne parfaitement, mais Lazarus indique que la commande CommandLine est Deprecated. Une autre commande, ApplicationName, qui fait la même chose est également notée Deprecated.

    Il semble qu'il faille maintenant utiliser préférentiellement la commande Executable, ce qui donne :
    Code Pascal : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
     
    Uses Classes, SysUtils, Process; 
     
    Var Processus : TProcess; 
     
    Begin 
      (* Création du processus *) 
      Processus := TProcess.Create(Nil); 
      (* Définition de la commande à exécuter *) 
      //Processus.CommandLine := 'fpc';   DEPRECATED 
      //Processus.ApplicationName:='fpc';   DEPRECATED
      Processus.Executable:='fpc';
      (* On Attendra la fin du programme externe avant de continuer *) 
      Processus.Options := Processus.Options + [poWaitOnExit]; 
      (* Tout est prêt pour l'exécution *) 
      Processus.Execute; 
      (* Libération du processus *) 
      Processus.Free;    
    End.
    et qui fonctionne également apparemment sans problème.

    En espérant que ça puisse être utile et que ce soit posté au bon endroit,

    amicalement,
    naute.

  2. #2
    Responsable Pascal, Lazarus et Assembleur


    Avatar de Alcatîz
    Homme Profil pro
    Ressources humaines
    Inscrit en
    Mars 2003
    Messages
    7 996
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : Belgique

    Informations professionnelles :
    Activité : Ressources humaines
    Secteur : Service public

    Informations forums :
    Inscription : Mars 2003
    Messages : 7 996
    Billets dans le blog
    2
    Par défaut
    Bonjour,

    Désolé, j'ai complètement loupé cette mise à jour. C'est fait : https://lazarus.developpez.com/faq/?...gramme-externe.

    beaucoup !
    Règles du forum
    Cours et tutoriels Pascal, Delphi, Lazarus et Assembleur
    Avant de poser une question, consultez les FAQ Pascal, Delphi, Lazarus et Assembleur
    Mes tutoriels et sources Pascal

    Le problème en ce bas monde est que les imbéciles sont sûrs d'eux et fiers comme des coqs de basse cour, alors que les gens intelligents sont emplis de doute. [Bertrand Russell]
    La tolérance atteindra un tel niveau que les personnes intelligentes seront interdites de toute réflexion afin de ne pas offenser les imbéciles. [Fiodor Mikhaïlovitch Dostoïevski]

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. [Sonar] Mise-à-jour de l'article sur Sonar
    Par romaintaz dans le forum Qualimétrie
    Réponses: 39
    Dernier message: 04/06/2013, 09h36

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo