WinGui:

- Another small change to hbcli execution that was missed.

git-svn-id: svn://svn.handbrake.fr/HandBrake/trunk@655 b64f7644-9d1e-0410-96f1-a4d463321fa5

diff --git a/win/Handbrake/frmQueue.vb b/win/Handbrake/frmQueue.vb
index a49b015bc7a8eab45e590fce188d12f724d92d90..5c580d0acb0e055eb4fd26fc283afa8ca06f65c0 100644 (file)
--- a/win/Handbrake/frmQueue.vb
+++ b/win/Handbrake/frmQueue.vb
@@ -88,7 +88,27 @@ Public Class frmQueue
         Else\r
             'Start the encode process\r
             Try\r
-                Shell("""" + ApplicationPath + "\hbcli.exe""" + list_queue.Items.Item(encodeItems))\r
+                Dim params As String = list_queue.Items.Item(encodeItems)\r
+                Dim proc As New System.Diagnostics.Process\r
+                proc = System.Diagnostics.Process.Start("""" + ApplicationPath + "\hbcli.exe""", params)\r
+\r
+                If My.Settings.Priority <> "Normal" Then\r
+                    Dim level As String\r
+                    level = My.Settings.Priority\r
+\r
+                    Select Case level\r
+                        Case "Realtime"\r
+                            proc.PriorityClass = ProcessPriorityClass.RealTime\r
+                        Case "High"\r
+                            proc.PriorityClass = ProcessPriorityClass.High\r
+                        Case "Above Normal"\r
+                            proc.PriorityClass = ProcessPriorityClass.AboveNormal\r
+                        Case "Below Normal"\r
+                            proc.PriorityClass = ProcessPriorityClass.BelowNormal\r
+                        Case "Low"\r
+                            proc.PriorityClass = ProcessPriorityClass.Idle\r
+                    End Select\r
+                End If\r
             Catch ex As Exception\r
                 MessageBox.Show("Unable to launch the encoder. Queue run failed.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Hand)\r
                 MessageBox.Show(ex.ToString)\r