Dim command As String = $"ffmpeg -i ${pathIn}${fileNameIn} ${pathOut}\${fileNameOut}"$
LogColor(command,xui.Color_Cyan)
params.Add(command)
Dim dir As String = $"${File.DirApp}\ffmpeg"$ 'FFMPEG Folder
Dim sh As Shell
sh.InitializeDoNotHandleQuotes("ffmpeg", File.Combine(dir,"ffmpeg.exe"),params)
sh.WorkingDirectory = dir
sh.Run(-1)
wait for ffmpeg_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)