¿La supuesta desincronización donde se da?, quiero decir, la notas en el reproductor de video, en el editor de video, o donde?

Te lo comento porque algunos reproductores tienen una mala sincronización (ejemplo: umplayer, smplayer) y te desincronizan sobretodo los videos de 1080p con ms e incluso segundos de diferencia, pero en realidad no están desincronizados.
Si el problema lo notas al reproducir el video te recomiendo que uses el MediaPlayerClassic (Que no es lo mismo que "Mplayer") para salir de dudas y ver si realmente está desincronizado o no.

Aparte, ¿porque no consideras aumentar/disminuir 2-4 frames al framerate del vídeo final para corregir la desincronizacion de 2 segundos?, lo puedes hacer sin reconvertir y es una solución.

Un saludo.

Para bloquear procesos.

' [ Block Process Functions ]
'
' // By Elektro H@cker
'
' Examples :
' BlockProcess.Block("cmd") ' Blocks a process
' BlockProcess.Block("firefox.exe") ' Blocks a process
' BlockProcess.Unblock("cmd") ' Unblocks a process
' BlockProcess.Unblock("firefox.exe") ' Unblocks a process
'
' BlockProcess.Unblock_All() ' Reset all values and stop timer
' BlockProcess.Monitor_Interval = 5 * 1000
' BlockProcess.Show_Message_On_Error = True
' BlockProcess.Show_Message_On_blocking = True
' BlockProcess.Message_Text = "I blocked your process: "
' BlockProcess.Message_Title = "Block Process .:: By Elektro H@cker ::."
 
#Region " Block Process Class "
 
Public Class BlockProcess
 
    Shared Blocked_APPS As New List(Of String) ' List of process names
    Shared WithEvents ProcessMon_Timer As New Timer ' App Monitor timer
    ''' <summary>
    ''' Shows a MessageBox if error occurs when blocking the app [Default: False].
    ''' </summary>
    Public Shared Show_Message_On_Error As Boolean = False
    ''' <summary>
    ''' Shows a MessageBox when app is being blocked [Default: False].
    ''' </summary>
    Public Shared Show_Message_On_blocking As Boolean = False
    ''' <summary>
    ''' Set the MessageBox On blocking Text.
    ''' </summary>
    Public Shared Message_Text As String = "Process blocked: "
    ''' <summary>
    ''' Set the MessageBox On blocking Title.
    ''' </summary>
    Public Shared Message_Title As String = "Process Blocked"
    ''' <summary>
    ''' Set the App Monitor interval in milliseconds [Default: 200].
    ''' </summary>
    Public Shared Monitor_Interval As Int64 = 200
 
    ''' <summary>
    ''' Add a process name to the process list.
    ''' </summary>
    Public Shared Sub Block(ByVal ProcessName As String)
        If ProcessName.ToLower.EndsWith(".exe") Then ProcessName = ProcessName.Substring(0, ProcessName.Length - 4)
        Blocked_APPS.Add(ProcessName)
        If Not ProcessMon_Timer.Enabled Then ProcessMon_Timer.Enabled = True
    End Sub
 
    ''' <summary>
    ''' Delete a process name from the process list.
    ''' </summary>
    Public Shared Sub Unblock(ByVal ProcessName As String)
        If ProcessName.ToLower.EndsWith(".exe") Then ProcessName = ProcessName.Substring(0, ProcessName.Length - 4)
        Blocked_APPS.Remove(ProcessName)
    End Sub
 
    ''' <summary>
    ''' Clear the process list and disables the App Monitor.
    ''' </summary>
    Public Shared Sub Unblock_All()
        ProcessMon_Timer.Enabled = False
        Blocked_APPS.Clear()
    End Sub
 
    ' Timer Tick Event
    Shared Sub ProcessMon_Timer_Tick(sender As Object, e As EventArgs) Handles ProcessMon_Timer.Tick
 
        For Each ProcessName In Blocked_APPS
            Dim proc() As Process = Process.GetProcessesByName(ProcessName)
            Try
                For proc_num As Integer = 0 To proc.Length - 1
                    proc(proc_num).Kill()
                    If Show_Message_On_blocking Then
                        MessageBox.Show(Message_Text & ProcessName & ".exe", Message_Title, MessageBoxButtons.OK, MessageBoxIcon.Asterisk, MessageBoxDefaultButton.Button1)
                    End If
                Next
            Catch ex As Exception
                If Show_Message_On_Error Then
                    MsgBox(ex.Message) ' One of the processes can't be killed
                End If
            End Try
        Next
 
        ' Set the Timer interval if is different
        If Not sender.Interval = Monitor_Interval Then sender.Interval = Monitor_Interval
 
    End Sub
 
End Class
 
#End Region

Por "version de windows" me refiero a:
...E incluyendo si tiene ServicePack 1 instalado o no, aunque sincéramente no sé si el servicepack modifica esa DLL que necesitas porque no me voy a poner investigar eso xD, pero por si acaso si tienes win7 x64 con sp1 pues te descargas el win7 x64 con sp1 y así vas a lo seguro...

Ediciones oficiales de Windows 7 con SP1 integrado (Descargas directas aquí)

Uf, la de veces que he resuelto esta duda en los foros... xD

@Echo OFF
 
Set "Pattern=*.jpg"
Set "Replace=300x250"
 
For %%# in (
	"%Pattern%"
) Do (
	Set "Filename=%%~n#"
	Call Set "Filename=%%Filename:%Replace%=%%"
	Call Rename "%%#" "%%Filename%%%%~x#"
)
 
Pause&Exit

Saludos.

Un snippet para medir el tiempo transcurrido para un procedimiento o una función o cualquier cosa:

MEJORADO:

#Region " Code Execution Time "
 
    ' [ Code Execution Time ]
    '
    ' // By Elektro H@cker
    '
    ' Examples :
    ' Execution_Start() : Threading.Thread.Sleep(500) : Execution_End()
 
    Dim Execution_Watcher As New Stopwatch
 
    Private Sub Execution_Start()
        If Execution_Watcher.IsRunning Then Execution_Watcher.Restart()
        Execution_Watcher.Start()
    End Sub
 
    Private Sub Execution_End()
        If Execution_Watcher.IsRunning Then
            MessageBox.Show("Execution watcher finished:" & vbNewLine & vbNewLine & _
                            "[H:M:S:MS]" & vbNewLine & _
                            Execution_Watcher.Elapsed.Hours & _
                            ":" & Execution_Watcher.Elapsed.Minutes & _
                            ":" & Execution_Watcher.Elapsed.Seconds & _
                            ":" & Execution_Watcher.Elapsed.Milliseconds & _
                            vbNewLine & _
                            vbNewLine & _
                            "Total H: " & Execution_Watcher.Elapsed.TotalHours & vbNewLine & vbNewLine & _
                            "Total M: " & Execution_Watcher.Elapsed.TotalMinutes & vbNewLine & vbNewLine & _
                            "Total S: " & Execution_Watcher.Elapsed.TotalSeconds & vbNewLine & vbNewLine & _
                            "Total MS: " & Execution_Watcher.ElapsedMilliseconds & vbNewLine, _
                            "Code execution time", _
                            MessageBoxButtons.OK, _
                            MessageBoxIcon.Information, _
                            MessageBoxDefaultButton.Button1)
            Execution_Watcher.Reset()
        Else
            MessageBox.Show("Execution watcher never started.", _
                            "Code execution time", _
                            MessageBoxButtons.OK, _
                            MessageBoxIcon.Error, _
                            MessageBoxDefaultButton.Button1)
        End If
    End Sub
 
#End Region

Elimina el contenido del portapapeles:

Private Sub Delete_Clipboard()
     Clipboard.SetText(vbCr)
End Sub

---

Devuelve el color de un pixel en varios formatos:

CORREGIDO, si el valor era 0, el formato Hexadecimal devolvía un 0 de menos.

#Region " Get Pixel Color "
 
    ' [ Get Pixel Color Function ]
    '
    ' // By Elektro H@cker
    '
    ' Examples :
    '
    ' Dim RGB As Color = Get_Pixel_Color(MousePosition.X, MousePosition.Y, ColorType.RGB)
    ' MsgBox(Get_Pixel_Color(100, 100, ColorType.RGB).ToString)
    ' MsgBox(Get_Pixel_Color(100, 100, ColorType.HEX))
    ' MsgBox(Get_Pixel_Color(100, 100, ColorType.HTML))
 
    <System.Runtime.InteropServices.DllImport("user32.dll")> Shared Function GetDC(hwnd As IntPtr) As IntPtr
    End Function
 
    <System.Runtime.InteropServices.DllImport("user32.dll")> Shared Function ReleaseDC(hwnd As IntPtr, hdc As IntPtr) As Int32
    End Function
 
    <System.Runtime.InteropServices.DllImport("gdi32.dll")> Shared Function GetPixel(hdc As IntPtr, nXPos As Integer, nYPos As Integer) As UInteger
    End Function
 
    Public Enum ColorType
        RGB
        HEX
        HTML
    End Enum
 
    Public Function Get_Pixel_Color(ByVal x As Int32, ByVal y As Int32, ByVal ColorType As ColorType)
 
        Dim hdc As IntPtr = GetDC(IntPtr.Zero)
        Dim pixel As UInteger = GetPixel(hdc, x, y)
        ReleaseDC(IntPtr.Zero, hdc)
 
        Dim RGB As Color = Color.FromArgb(CType((pixel And &HFF), Integer), CType((pixel And &HFF00), Integer) >> 8, CType((pixel And &HFF0000), Integer) >> 16)
        Dim R As Int16 = RGB.R, G As Int16 = RGB.G, B As Int16 = RGB.B
        Dim HEX_R As String, HEX_G As String, HEX_B As String
 
        Select Case ColorType
            Case ColorType.RGB : Return RGB
            Case ColorType.HEX
                If Hex(R) = Hex(0) Then HEX_R = "00" Else HEX_R = Hex(R)
                If Hex(G) = Hex(0) Then HEX_G = "00" Else HEX_G = Hex(G)
                If Hex(B) = Hex(0) Then HEX_B = "00" Else HEX_B = Hex(B)
                Return (HEX_R & HEX_G & HEX_B)
            Case ColorType.HTML : Return ColorTranslator.ToHtml(RGB)
            Case Else : Return Nothing
        End Select
 
    End Function
 
#End Region

---

Crear un archivo comprimido autoextraible (SFX) con la librería SevenZipSharp:

#Region " SevenZipSharp Compress SFX "
 
    ' [ SevenZipSharp Compress SFX Function ]
    '
    ' // By Elektro H@cker
    '
    ' Instructions :
    ' 1. Add a reference to "SevenZipSharp.dll".
    ' 2. Add the "7z.dll" or "7z64.dll" files to the project.
    ' 3. Add the "7z.sfx" and "7zCon.sfx" files to the project.
    ' 4. Use the code below.
    '
    ' Examples :
    ' SevenZipSharp_Compress_SFX("C:\File.txt")                           ' File will be compressed in the same dir.
    ' SevenZipSharp_Compress_SFX("C:\File.txt", "C:\Compressed\File.exe") ' File will be compressed in "C:\Compressed\".
    ' SevenZipSharp_Compress_SFX("C:\Folder\", , , , , , , "Password")    ' Folder will be compressed with the given password.
    ' SevenZipSharp_Compress_SFX("C:\File.txt", , SevenZipSharp_SFX_Module.Console, CompressionLevel.Fast)
 
    ' Imports SevenZip
    ' Dim dll As String = "7z.dll"
 
    Public Enum SevenZipSharp_SFX_Module
        Normal
        Console
    End Enum
 
    Private Function SevenZipSharp_Compress_SFX(ByVal Input_DirOrFile As String, _
                                       Optional ByVal OutputFileName As String = Nothing, _
                                       Optional ByVal SFX_Module As SevenZipSharp_SFX_Module = SevenZipSharp_SFX_Module.Normal, _
                                       Optional ByVal CompressionLevel As CompressionLevel = CompressionLevel.Normal, _
                                       Optional ByVal Password As String = Nothing) As Boolean
        ' Create the .7z file
        Try
            ' Set library path
            SevenZipCompressor.SetLibraryPath(dll)
 
            ' Create compressor
            Dim Compressor As SevenZipCompressor = New SevenZipCompressor()
 
            ' Set compression parameters
            Compressor.CompressionLevel = CompressionLevel ' Archiving compression level.
            Compressor.CompressionMethod = CompressionMethod.Lzma ' Compression Method 
            Compressor.ArchiveFormat = OutArchiveFormat.SevenZip ' Compression file format
            Compressor.CompressionMode = CompressionMode.Create ' Append files to compressed file or overwrite the compressed file.
            Compressor.DirectoryStructure = True ' Preserve the directory structure.
            Compressor.IncludeEmptyDirectories = True ' Include empty directories to archives.
            Compressor.ScanOnlyWritable = False ' Compress files only open for writing.
            Compressor.EncryptHeaders = False ' Encrypt 7-Zip archive headers
            Compressor.TempFolderPath = System.IO.Path.GetTempPath() ' Temporary folder path
            Compressor.FastCompression = False ' Compress as fast as possible, without calling events.
            Compressor.PreserveDirectoryRoot = True ' Preserve the directory root for CompressDirectory.
            Compressor.ZipEncryptionMethod = ZipEncryptionMethod.ZipCrypto ' Encryption method for zip archives.
            Compressor.DefaultItemName = "File.7z" ' Item name used when an item to be compressed has no name, for example, when you compress a MemoryStream instance
 
            ' Add Progress Handler
            ' AddHandler Compressor.Compressing, AddressOf SevenZipSharp_Compress_Progress
 
            ' Removes the end slash ("\") if given for a directory
            If Input_DirOrFile.EndsWith("\") Then Input_DirOrFile = Input_DirOrFile.Substring(0, Input_DirOrFile.Length - 1)
 
            ' Generate the OutputFileName if any is given.
            If OutputFileName Is Nothing Then
                OutputFileName = (My.Computer.FileSystem.GetFileInfo(Input_DirOrFile).DirectoryName & "\" & (Input_DirOrFile.Split("\").Last) & ".tmp").Replace("\\", "\")
            Else
                OutputFileName = OutputFileName & ".tmp"
            End If
 
            ' Check if given argument is Dir or File ...then start the compression
            If IO.Directory.Exists(Input_DirOrFile) Then ' Is a Dir
                If Not Password Is Nothing Then
                    Compressor.CompressDirectory(Input_DirOrFile, OutputFileName, True, Password)
                Else
                    Compressor.CompressDirectory(Input_DirOrFile, OutputFileName, True)
                End If
            ElseIf IO.File.Exists(Input_DirOrFile) Then ' Is a File
                If Not Password Is Nothing Then
                    Compressor.CompressFilesEncrypted(OutputFileName, Password, Input_DirOrFile)
                Else
                    Compressor.CompressFiles(OutputFileName, Input_DirOrFile)
                End If
            End If
 
            ' Create the SFX file
            ' Create the SFX compressor
            Dim compressorSFX As SevenZipSfx = New SevenZipSfx(SfxModule.Default)
            ' Set SFX Module path
            If SFX_Module = SevenZipSharp_SFX_Module.Normal Then
                compressorSFX.ModuleFileName = ".\7z.sfx"
            ElseIf SFX_Module = SevenZipSharp_SFX_Module.Console Then
                compressorSFX.ModuleFileName = ".\7zCon.sfx"
            End If
            ' Start the compression
            ' Generate the OutputFileName if any is given.
            Dim SFXOutputFileName As String
            If OutputFileName.ToLower.EndsWith(".exe.tmp") Then
                SFXOutputFileName = OutputFileName.Substring(0, OutputFileName.Length - 4)
            Else
                SFXOutputFileName = OutputFileName.Substring(0, OutputFileName.Length - 4) & ".exe"
            End If
 
            compressorSFX.MakeSfx(OutputFileName, SFXOutputFileName)
            ' Delete the 7z tmp file
            Try : IO.File.Delete(OutputFileName) : Catch : End Try
 
        Catch ex As Exception
            'Return False ' File not compressed
            Throw New Exception(ex.Message)
        End Try
 
        Return True ' File compressed
 
    End Function
 
    ' Public Sub SevenZipSharp_Compress_SFX_Progress(ByVal sender As Object, ByVal e As ProgressEventArgs)
    '     MsgBox("Percent compressed: " & e.PercentDone)
    ' End Sub
 
#End Region

@Heisenberg_w0rms
Normal que no encuentre el archivo, estás añadiendo los argumentos al nombre de la ruta, los argumentos de la aplicación van separados, a la derecha, no los juntes.

Process.start(Proceso.exe, Argumentos);

Process.start(@dirconversor + "ebook-convert.exe", "prueba.pdf prueba.txt");

http://msdn.microsoft.com/en-us/library/system.diagnostics.process.start%28v=vs.71%29.aspx

Saludos

OMG que desastre de WindowsUpdate xD

A pesar de las indicaciones que te da Songoku y de las indicaciones de tu último comentario... nada de eso te va a servir.

Si dices que el archivo "wucltux.dll.mui" y la dll no se pudieron arreglar y por consiguiente se han eliminado o ha quedado corruptas entonces el error está más que claro, se te han jodido las tablas de idioma.

Este es un recurso de la DLL, que aparece en tu primera imagen:
No puede encontrarla en el archivo MUI.

La solución debería ser tán sencilla como reemplazar los archivos "rotos" por unos funcionales,
¿Y como se hace eso?, pues fácil, te descargas el VirtualBox, instalas TU MISMA VERSION DE WINDOWS, y desde allí te copias los archivos funcionales y los pasas a tu Windows:

wucltux.dll en "C:\windows\system32"
y wucltux.dll.mui en "C:\Windows\system32\Es-es"

Aquí te dejo los de la versión Windows 7 x86 y en inglés, las he sacado de mi VirtualBox, si no te funciona te deberás descargar el Win7 español porque necesitarás el MUI español.
http://www.mediafire.com/?j057kvir3atb58i
El archivo wucltux.dll.mui en "C:\Windows\system32\En-us"

Saludos.

Hombre... "un buen a 1000" no existe teniendo en cuenta la resolución del video 1080p jamás te quedará decente a menos que séa para visualizar el video en dispositivos portátiles, primero que nada hay que tener en cuenta que el bitrate no es el único parámetro que influye en la calidad final del rip, pero volver a codificar un vídeo de 10.000/5.000 a 1.000 de bitrate va a ser una completa catástrofe, va a quedar muy muy pixelado, va a quedar muy mal en general.

Lo segundo que hay que tener en cuenta es que siempre deberías usar uno de los presets por defecto de los programadores de X264 (presets: slow, slower o veryslow), el modo placebo es una locura y no se nota casi la diferencia entre el modo "veryslow" y "placebo", y el modo "placebo" tarda casi un día entero incluso en mi PC, que es de 8 núcleos. Y si en el programa que usas no están disponibles los presets por defecto del X264 diréctamento te aconsejo que busques otro software que disponga de ellos.

Y lo tercero que hay que tener en cuenta es que hay que saber como han codificado el vídeo original, con el programa mediainfo Lite puedes ver la información del vídeo, para ver el bitrate original, y si han usado algún preset por defecto del X264, etc...

Yo te diría que si no se trata de un video de animación lo re-convirtieras entre 2500-4000 de bitrate, pero como mínimo 2500-3000, cortándole los bordes si el video tuviera, pero sin redimensionar el tamaño original del vídeo (siempre que el aspect ratio original séa correcto, Ejemplo: 1920x1080p), y usando uno de los presets que dije (slower o veryslow) dependiendo del tiempo del que dispongas y si te importa sacrificar un poco de calidad para ganar tiempo... eso ya es según tu gusto, pero aparte del bitrate eso es lo que más va a influir aparte de la resolución, así que yo te diría que por mucho que tardase en reconvertirse en tu PC uses el preset "slower" o "veryslow", a mi me tarda un par de horas un vídeo de 60 min el slower, y unas 4-5 horas el "veryslow".

Imagino que la pista de audio del video podría estar en formato DTS o AC3, así que quizás te convendría re-convertirla a MP3 de 128 kbps CBR para ahorrar mucho, mucho peso, y prácticamente con muy poca pérdida de calidad, el formato AAC se usa mucho pero es una *****, yo no te lo recomiendo porque es un formato privado y no se ha exprimido su potencial todavía como el MP3, y a la hora de querer reconvertir la pista AAC a otro formato primero hay que esperar que el programa soporte dicho formato privado, y segundo te puede dar problemas de sincronización u otras cosas.

Saludos.

 

DESCRIPCIÓN:

Color.NET es una mini aplicación sencilla y de fácil manejo para copiar el valor de un color de un pixel en formato RGB o HEX o HTML.

Se puede copiar el valor seleccionado usando CONTROL+C.

Se puede abrir un magnificador de imagen con zoom adaptable.

Se puede abrir un mezclador de colores.

Y tiene una opción para ahorrar esos segundos de más copiando el valor usando la sintaxis de VB.NET, al usar CONTROL+C.

PD: He tomado como referencia la aplicación "Pixie".


IMÁGENES:

   




DEMOSTRACIÓN:




SOURCE:

http://www.mediafire.com/download/7qu4rpnhrruby6g/Color.NET.rar
Incluye el source, versión protable y versión instalable.