Discussion :

[babas44]

Bonjour tout le monde,
dans le cadre d'un projet simple, je voudrais exécuter une ligne de commande mais dont le résultat puisse être visualisé dans un cadre (un TEdit ???) de ma Form.
Pour l'instant je fais un ShellExecute(0, 0, "xi_portable_Win.bat", 0, 0 , SW_SHOW );
Celui-ci contient une requête vers un programme qui surveille de l'arduino, donc elle doit rester ouverte.
Mais j'aimerais que le code qui apparaît sous DOS soit affiché dans un cadre et que je puisse fermer ce cadre pour faire sauter le processus comme quand je ferme la fenêtre DOS.

Voilà ma liste au Père Noel
Et je viens de passer un paquet d'heures à chercher sur le web....ben rien.

Merci mille fois d'avance si quelqu'un a une piste....

[DjmSoftware]

Fait une recherche Google sur l'usage des PIPES
tu trouveras beaucoup d'exemples aussi pour c++ Builder
cdlt
par exemple http://www.leunen.com/cbuilder/redirect.html

[babas44]

Merci des infos ! Mais je suis trop débutant pour comprendre quoi que ce soit à ces codes....mince !!!

[babas44]

Après quelques mois de boulot mon projet a beaucoup avancé ! https://github.com/technologiescollege/s2a_fr
En fait j'ai quasi fini...à part cette intégration du shell.

Grâce à l'idée de DjmSoftware j'ai bien avancé en compréhension, MAIS j'ai un problème dans le CreateProcess.
En effet je veux exécuter l'équivalent sous DOS de ".\Python\python.exe s2a.py COM13", mais je ne parviens pas à transmettre cette ligne dans CreateProcess, quelqu'un peut me demander de cette simple connerie ?

Merci beaucoup.

[DjmSoftware]

Salut
le code suivant est parfaitement fonctionnel tu peux essayer de l'intégrer tout ou en partie dans ton code

Code :

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
 
bool __fastcall TForm1::CreateAndWaitUntilTerminated(char * PrgName, char* ParamList, long* Errorcode)
{
  unsigned long ProcessResult;
  STARTUPINFO si;
  PROCESS_INFORMATION  pi;
  ZeroMemory(&si,sizeof(si));
  si.cb=sizeof(si);
  bool result=CreateProcess(PrgName,
                            ParamList,
                            NULL,
                            NULL,
                            false,
                            DETACHED_PROCESS,
                            NULL,
                            NULL,
                            &si,
                            &pi);
 if(!result)
  {
    *Errorcode=GetLastError();
    return false;
  }
  do
   {
    Sleep(50);
    Application->ProcessMessages();
    GetExitCodeProcess(pi.hProcess,
                       &ProcessResult);
   }
   while (ProcessResult==STILL_ACTIVE);
   CloseHandle(pi.hThread);
   CloseHandle(pi.hProcess);
   *Errorcode=ProcessResult;
   return true;
 
 
        //TODO: Add your source code here
}

cdlt

[babas44]

Merci ! Mais j'ai toujours des pb quand j'utilise mon code (que j'ai repiqué du lien que tu m'avais déjà mis) ou le tien, et je pense que c'est dû à mon appel à CreateProcess. Quand je clique sur un bouton je veux qu'il exécute ça :

Code :

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
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58

  //create pipe for the console stdout
  SECURITY_ATTRIBUTES sa; 
  ZeroMemory(&sa,sizeof(SECURITY_ATTRIBUTES)); 
  sa.nLength=sizeof(SECURITY_ATTRIBUTES); 
  sa.bInheritHandle=true; 
  sa.lpSecurityDescriptor=NULL; 
  HANDLE ReadPipeHandle; 
  HANDLE WritePipeHandle;       // not used here
  if(!CreatePipe(&ReadPipeHandle,&WritePipeHandle,&sa,0)) 
		RaiseLastWin32Error();

  //Create a Console 
  STARTUPINFO si; 
  ZeroMemory(&si,sizeof(STARTUPINFO)); 
  si.cb=sizeof(STARTUPINFO); 
  si.dwFlags=STARTF_USESHOWWINDOW|STARTF_USESTDHANDLES;
  si.wShowWindow=SW_HIDE; 
  si.hStdOutput=WritePipeHandle; 
  si.hStdError=WritePipeHandle;

  PROCESS_INFORMATION pi;
  ZeroMemory(&pi,sizeof(PROCESS_INFORMATION));
  if(!CreateProcess(".\\s2a\\Python\\python.exe", ".\\s2a\\s2a.py COM13", NULL, NULL, false, 0, NULL, NULL, &si,&pi))
	  RaiseLastWin32Error();

  //Read from pipe 
  char Data[1024]; 
  for (;;)
  {
    DWORD BytesRead; 
    DWORD TotalBytes; 
    DWORD BytesLeft; 

	//Check for the presence of data in the pipe
    if(!PeekNamedPipe(ReadPipeHandle,Data,sizeof(Data),&BytesRead, 
        &TotalBytes,&BytesLeft))RaiseLastWin32Error(); 
    //If there is bytes, read them 
    if(BytesRead) 
    { 
      if(!ReadFile(ReadPipeHandle,Data,sizeof(Data)-1,&BytesRead,NULL)) 
          RaiseLastWin32Error(); 
      Data[BytesRead]='\0'; 
      Memo1->Lines->Add(AnsiString(Data)); 

    } 
    else 
    { 
      //Is the console app terminated? 
      if(WaitForSingleObject(pi.hProcess,0)==WAIT_OBJECT_0)break; 

    } 
  } 
  CloseHandle(pi.hThread);
  CloseHandle(pi.hProcess); 
  CloseHandle(ReadPipeHandle); 
  CloseHandle(WritePipeHandle);

Merci mille fois de prendre le temps de me relire.