How to manage StdoutRead with slow ouput

[Skorn]

Hey all,

I made an app which lets you choose a folder and it uses 7-zip to zip it for you. I have set up Stdoutread to read in the stream from the command ouput and send it to my child window. When I test this with a simple command such as "dir c:" it works great because the output is very fast and it's all captured into a single variable. My problem is when using a program like 7-zip that slowly displays the output as you can see in the example below, it ticks through the percentage slowly, it could take several hours to get to 100% on each file. How do I handle capturing this ouput and properly send it to the child window? I basically would like it to look just like it does in DOS, if possible.

.

Creating archive C:\Apps\test\_Zipped\file2013.zip

Compressing  test2 - Copy.vmdk
Compressing  test2.vmdk
Compressing  test2.vmx   11%

.

This is my function, it works great if you tried to zip a very small set of files.. however if the files were large the output would be blank until the process completed after several hours, you do not get to see the number % as is increases so you don't know what the status is or if it is even working at all.

.

Func Zip()
    
    ; Run Zip command
    $cmplevel = GUICtrlRead($iupdown1, 1)       
    $zipCMD = '""c:\Progra~1\7-Zip\7z.exe" a "' & $rootzippedvmfolder & $rootparentfolder & '.zip" -mx' & $cmplevel & ' -tzip -v10g -xr!caches -xr!*.log "' & $rootpath & '"'
    $runZip = Run(@ComSpec & " /c " & $zipCMD, "", @SW_HIDE, $STDERR_CHILD + $STDOUT_CHILD) ; 

    While 1
        
        ; Read output from program and check for errors
        $runZipSTD = StdoutRead($runZip)
        If @error Then 
            GUICtrlSetData($OutputWin, @CRLF & "Error or End of File:" & @CRLF & StderrRead($runZip) & @CRLF, 1) ; Send error to output window
            ExitLoop
        EndIf
        
        ; Send ouput of program to output window
        GUICtrlSetData($OutputWin, StringStripCR($runZipSTD) & @CRLF, 1)  
        
        ;  Check if zipping is complete (the program will ouptut "Everything is Ok" when it is done) then send message to output window
        If StringInStr($runZipSTD, "Everything is Ok") Then 
            GUICtrlSetData($OutputWin, @CRLF & "Zip Compression Complete" & @CRLF, 1)  
            Exitloop
        EndIf
    Wend
    
EndFunc

Any help is greatly appreciated.

Thanks,

Tim

Edited October 16, 2013 by Skorn

[Skorn]

Bump, anyone else have an idea on this problem? thanks

[JLogan3o13]

Can you please post your GUI code, or a complete reproducer, so we can properly test rather than having to build around your snippet?

[BrewManNH]

You'd probably get more responses if you posted a working script.

[Gianni]

this is strange (and interesting at the same time)

it seems that 7z.exe is able to write the output to the DOS screen without using the stdout.
it only sends the whole output, at once to stdout when it has finished the job

there should be a way to grab the output directly from the DOS screen buffer instead of  from stdout, (but I do not know how )