9
votes

Comment envoyer la commande à la connexion de la console de l'application GUI

J'ai une application de console que je suis lancé à partir d'une interface graphique. La demande de console prend des paramètres pour les noms de fichiers pour analyser et traiter. Actuellement, je suis capable de capturer sa sortie et d'l'afficher dans l'application GUI, mais j'aimerais pouvoir envoyer des commandes afin de contrôler ou même d'arrêter son exécution.

Comment puis-je envoyer une commande ou une chaîne ou quelque chose à l'application de la console, de préférence à l'aide des tuyaux que j'ai ouverts afin de lire sa sortie? p> xxx pré>

puis sur le côté de la console, il y a un fil en attente de l'entrée. Voici la méthode d'exécution: P>

  while not Terminated do
  begin
    ReadLn(Command);
    // process command
    Sleep(10);
  end;

delphi console

4 commentaires

Vous avez donc le code source pour les deux applications? Sont-ils tous deux écrit à Delphes?

J'ai ajouté le code source.

+1 Pour afficher le code source - fait toute la différence pour essayer d'aider.

Merci. Aurait dû le faire de la part d'aller.

3 Réponses :

1
votes

Avec le pipeline de sortie, il y a un pipeline d'entrée. Écrivez simplement à ce tuyau à l'aide de Wrystfile ().

5 commentaires

Ouais je soupçonne que, mais dans la console, était-ce que c'était ramassé? Je suppose que c'est une lecture réadlni, j'ai besoin de vérifier cela dans un thread, mais l'entrée est identique à celle de l'application de la console. Il ne reçoit pas les commandes de l'application GUI, presque comme si elle se lit. Peut-être que je fais quelque chose de mal.

En fonction de la façon dont vous écrivez au processus, vous pourriez avoir à rincer. Si vous utilisez une API Wrôlerfile (), vous n'avez pas besoin. La poignée STDIN du processus est dans l'enregistrement STARTUPINFO, dans le champ HSTDINPUT. Si l'application de la console ne lit pas son entrée, vous ne pouvez rien faire à ce sujet.

Actuellement, il a un fil qui exécute une commande READLN mais l'info est un miroir ou ce qu'il génère dans son Writeln. Alors je me demandais pourquoi cela est-ce.

Euh, un commentaire évident capitaine: l'entrée et la sortie sont deux poignées différentes des deux côtés. Vous lisez-en un, écrivez à l'autre (il y a aussi Sterrr, mais c'est une autre histoire). L'écriture sur le processus de sortie du processus de console n'arrivera pas au processus de la console comme entrée.

Voir ma réponse à Fupsduk parce que je pense que vous ne comprenez pas mon problème. Je sais que les poignées sont différentes, mais les données qui vont à la console ne sont pas les données que j'ai envoyées à l'aide de Writefile avec la poignée à l'écriture de l'écriture fournie par StarTupinfo.

1
votes

Vérifiez cela pour voir que vous devez créer les deux tuyaux (en appelant le Winapi deux fois) comme réitéré par NAT, mais qu'en est-il des poignées héritables - je ne sais pas pourquoi cela est nécessaire?

http://support.microsoft.com/kb/190351 .

Je pense que ce qui pourrait également être déroutant, c'est que lorsque vous créez un tuyau, vous créez une poignée de lecture et une poignée d'écriture pour ce tuyau. Dans le cas du tuyau STDIN de la console, vous n'utiliserez que la poignée d'écriture. Ensuite, vous créez un autre tuyau pour le stdout de la console (qui aura également une poignée de lecture et d'écriture), mais vous n'utiliserez que la poignée de lecture.

Je crois que j'ai cela correct mais il est tard et je vais me coucher.

1 commentaires

J'ai le code source de l'application de console. Dans l'application GUI, je suis capable de lire la sortie de l'application de la console à l'aide des éléments suivants - Readfile (Readpipe, PBuffer [0], Tampersize, BYTESPEAD, NIL). Cela fonctionne comme réadappe est fourni par le StarTupinfo transmis à CreateProcess. Maintenant, je suppose que les données de déplacement de la manière dont j'utilise l'enregistreur avec WritePipe fournie par le même StarTupinfo. Maintenant, lorsque je le fais, les informations que j'envoies sont fournies à l'application de la console comme exactement ce qui était dans le réadappe et non ce que je veux envoyer. J'espère que cela éclaircit ce que j'essaie de dire.

9
votes

Vous avez besoin de deux tuyaux, un pour le processus d'envoi de la sortie (stdout ), et un pour vous envoyer une entrée au processus ( stdin ).

à partir de votre code, on dirait que vous mettez les deux extrémités du même tuyau même dans l'enregistrement tstartupinfo . Donc, vous faites efficacement le processus de parler. : -)

Donc, vous devez appeler Createaispe () deux fois, pour créer deux tuyaux, un pour stdin , un pour stdout (et < Code> starr ).

Ensuite, placez la poignée de lecture de stdin dans SUISTARTUTUP.HSTDINPUT et la poignée d'écriture de stdout dans SUISTARTUP.HSTDOUTPUT < / code>

Pour envoyer des données au processus, écrivez dans la poignée d'écriture du tuyau stdin . Pour lire la sortie du processus, lisez la poignée de lecture du tuyau stdout .

EDIT: (à nouveau)

Tant que toutes les poignées de duplication et des trucs inhéritables et non intrientaires décrits sur Cette page ( Spécifiquement dans l'exemple de code), vous besoin pour vous assurer que les poignées que vous envoyez au processus sont héritables (comme vous l'avez fait).

Vous devriez Assurez-vous également que les poignées des tuyaux utilisées par le processus parent sont pas héritables . Mais vous ne avez-vous pour faire cela ... Je me suis écarté de ne pas le faire avant.

Vous pouvez le faire en appelant duplicatedle () sur les poignées, spécifiant qu'ils ne sont pas héritables et ferment les anciennes poignées, ou appelant SethandleInformation () avec 0 spécifié Pour les drapeaux (comme discuté ici ).

Cela fait longtemps que je l'ai fait moi-même, mais je suis à peu près sûr que cela est donc pour que le nombre de références pour les poignées soit associé au processus d'appel, plutôt que le processus d'enfant. Cela empêche une poignée étant fermée pendant que vous l'utilisez toujours (le processus d'appel pourrait fermer «stdin» par exemple). Assurez-vous de fermer les poignées cependant, sinon vous finirez de fuir les poignées.

hth.

n @



                                                                    
                                    
                                    
                                        2 commentaires
                                        
                                                                                            
                                                    +1 Pour plus de clarté et de brièveté, mais que faites-vous des poignées héritables décrites ici  support.microsoft.com/kb / 190351 .                                                
                                                
                                                                                            
                                                    Merci de répondre. Basé sur votre allusion à la création du tuyau deux fois, je suis venu sur un article qui répond parfaitement à mes besoins. J'ai inclus un lien avec ça.


            
                
		    
                    Articles qui pourrait vous intéresser :
                                            
                            FMX firemonkey comment faire défiler une boîte de défilement vertical au runtime                        
                        
                                            
                            Exception.RaiseOuterException vs W1035 La valeur de retour de la fonction '% s' peut être indéfinie                        
                        
                                            
                            La sélection contient un composant introduit dans un ancêtre                        
                        
                                            
                            Pourquoi ce test pour vérifier s'il y a des caractères illégaux dans une chaîne continue de s'afficher comme faux même si cela devrait être vrai?