Delphi 10 - Executing command line on Android and get the output live

Question

I am trying to execute a command line with Delphi 10 on Android and get the output of the command.

I'm using files from here:

https://github.com/FMXExpress/android-object-pascal-wrapper/tree/master/android-23

Here is my code:

uses Classes,
     Androidapi.Helpers,
     java.lang.Process, java.lang.Runtime,
     java.io.OutputStream, java.io.InputStream,
     java.io.InputStreamReader, java.io.BufferedReader;

procedure Execute(sCmd: string; sOut : TStringList);
var Process : JProcess;
    Runtime : JRuntime;
    Input   : JInputStream;
    BuffInput : JBufferedReader;  
begin

    Process := TJRuntime.JavaClass.getRuntime.exec(StringToJString(sCmd));
    //Input := JInputStream(Process.getInputStream);
    BuffInput := JBufferedReader(jInputStreamReader(Process.getInputStream) );
while (s  = '') do
begin
    s := JStringToString(BuffInput.readLine);
    sOut.Add(s);
 end;

 //--- Compile but get Segmentation fault(11) at 
 // s := JStringToString(BuffInput.readLine);

end;

Did you read the Android documentation for the InputStream and OutputStream classes yet? — Remy Lebeau
– Remy Lebeau, Commented Jul 16, 2016 at 2:23
-Remy , yes i read it but i dont get any result so far, sorry im a noob for all android stuff. — Mr War
– Mr War, Commented Jul 16, 2016 at 2:57
You dont get any result so far because you've made no effort to get any result. What have you tried to get any input or output from the streams? — Ken White
– Ken White, Commented Jul 16, 2016 at 3:03
If you call 1 day of trying a no effort ... anyways i found a lot of sample to do it in java, but like i said im noob for convert java to delphi BufferedReader stdInput = new BufferedReader(new InputStreamReader(proc.getInputStream())); String s = null; while ((s = stdInput.readLine()) != null) { System.out.println(s); } — Mr War
– Mr War, Commented Jul 16, 2016 at 3:13

Mr War · Accepted Answer · 2016-07-16 05:12:40Z

Thanks to the nice comment of Ken White, i digg more on the problem.

1: i need to use Androidapi.JNI.JavaTypes and not java.io.InputStream -> Input.available is always 0 if i use from java.io.InputStream

2: After executing my command, i need to do Process.waitFor. i guest i can't have a live output like good old dos

3: if someone know a better way to do this, your welcome :P

procedure Execute(sCmd: string; sOut : TStringList);
var Process : JProcess;
    Runtime : JRuntime;

    Input   : JInputStream;

    x, bufflen: Integer;

    s: string;
    buff : TJavaArray<Byte>;

begin
  Process := TJRuntime.JavaClass.getRuntime.exec(StringToJString(sCmd));
  Process.waitFor;

  Input := Process.getInputStream;
  bufflen := Input.available;

  buff := TJavaArray<Byte>.Create(bufflen);
  Input.read(buff);

  s := '';

  for x := 0 to bufflen - 1 do
    s := s + chr(buff[x]);

  sOut.Add(s); 

end;

Collectives™ on Stack Overflow

Delphi 10 - Executing command line on Android and get the output live

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related