On 2018-05-12 18:35, Orbán Árpád via Lazarus wrote:
> Hi Carlos,
> 
> Try add poUsePipes to TProcess.Options:
> 
>>  AProcess := TProcess.Create(nil);
>>     try
>>        AProcess.Executable := '/usr/local/bin/egctl';
>>        AProcess.Parameters.Add('Regleta');
>>        AProcess.Parameters.Add('off');
>>        AProcess.Parameters.Add('off');
>>        AProcess.Parameters.Add('off');
>>        AProcess.Parameters.Add('off');
> 
>         AProcess.Options := AProcess.Options + [poUsePipes];
> 
>>
>>        AProcess.Execute;

Ah. Thanks. I had commented that out by mistake. Actual code was:

      {$ifDEF Dummy}
      AProcess.Parameters.Add('Regleta');
      AProcess.Options := [poWaitOnExit, poUsePipes];
      {$else}
      AProcess.Parameters.Add('Regleta');
      AProcess.Parameters.Add('off');
      AProcess.Parameters.Add('off');
      AProcess.Parameters.Add('off');
      AProcess.Parameters.Add('off');
      {$endIf}

And "Dummy" was not defined.

Although the child is not using pipes :-?

-- 
Cheers / Saludos,

                Carlos E. R.
                (from 42.3 x86_64 "Malachite" at Telcontar)

Attachment: signature.asc
Description: OpenPGP digital signature

-- 
_______________________________________________
Lazarus mailing list
Lazarus@lists.lazarus-ide.org
https://lists.lazarus-ide.org/listinfo/lazarus

Reply via email to