VB.NET他のアプリケーションからライブ状態を取得する

Question

私のアプリケーションでは、isoを他のファイル形式に変換する外部コマンドラインツールを呼び出します。今、私はisoコンバータを呼び出し、それはバックグラウンドで実行されます。コマンドラインを介してisoコンバータを実行すると、何をしているのかがわかりますが、アプリケーションではバックグラウンドで実行されます。

これは、isoconverterがテキストボックスで行われた後の状態を示しています。これを変更してライブステータスを表示するにはどうすればいいですか？私はコマンドラインツールに表示されるように？

これは私がisoconverterを実行するために呼び出すコードです。

Private Sub GETCMD3() 
    Dim CMDprocess As New Process 
    Dim StartInfo As New System.Diagnostics.ProcessStartInfo 
    StartInfo.FileName = "cmd" 
    StartInfo.CreateNoWindow = True 
    StartInfo.RedirectStandardInput = True 
    StartInfo.RedirectStandardOutput = True 
    StartInfo.UseShellExecute = False 
    CMDprocess.StartInfo = StartInfo 
    CMDprocess.Start() 
    Dim SR As System.IO.StreamReader = CMDprocess.StandardOutput 
    Dim SW As System.IO.StreamWriter = CMDprocess.StandardInput 
    SW.WriteLine("Isoconvert.exe " & txtIsoFile.Text) 
    SW.WriteLine("exit") 
    txtIsoOutput.Text = SR.ReadToEnd 
    SW.Close() 
    SR.Close() 
End Sub 

Answer 1

あなたの現在のコードの問題は、それが完了するまで、これはコマンドの標準出力ストリームを読んでいるライン

txtIsoOutput.Text = SR.ReadToEnd 

です。完了すると、結果がテキストボックスに割り当てられます。

StreamReader.ReadLineまたはおそらくReadBlockを使用して、少しずつStreamReaderから読むことをお勧めします。以下のような

何か：

Dim line as String 
Do 
    line = SR.ReadLine() 
    If Not (line Is Nothing) Then 
     txtIsoOutput.Text = txtIsoOutput.Text + line + Environment.NewLine 
    End If 
Loop Until line Is Nothing 

は、これはおそらく、しかし、十分ではありません。ユーザーインターフェイススレッドはコマンド出力を処理するためにビジー状態になっているため、TextBoxはその表示を更新する機会を得られません。これを修正する最も簡単な方法は、テキストを変更した後にApplication.DoEvents()を追加することです。ただし、GETCMD3が起動したときにGETCMD3を呼び出すボタン/メニューを無効にしてください。

Answer 2

おそらくプロセススレッドにアクセスして状態を確認していませんか？このような

何か：

CMDprocess.Threads(0).ThreadState = ThreadState.Running 

Answer 3

[Offtopic]私はあなたのコードを見直していましたが、おそらくIsoconvert.exeを起動できる方法でより良いaproachが見つかりました。

私が間違っていない場合は、コンソールコマンドを起動することなく、startinfoを使用してIsoconvert.exeを起動できます。

Dim CMDprocess As New Process 
Dim StartInfo As New System.Diagnostics.ProcessStartInfo 
StartInfo.FileName = "Isoconvert.exe" 
StartInfo.Arguments = txtIsoFile.Text 
CMDprocess.StartInfo = StartInfo 
CMDprocess.Start() 

私はあなたがまだstdinとstdoutを読み書きできると思います。