Consumo de recursos de procesador

[E_Blue]

Hola, tengo una aplicación con un Form que contiene un par de TabPages dentro de un TabControl con dos RichTextBox a los cuales escribo a través de delegados; también tengo 3 Timers, uno cada 10 segundos y los otros dos cada 1 segundo, y por ultimo un control SerialPort a 19200bps y una conexión a un servidor MySQL.

Todo lo antes mencionado me esta consumiendo alrededor de 50MB de RAM, esto no lo veo mal, lo que si me sorprende es que consuma el 50% de los recurso del procesador (Pentium Dual Core E5300).

Mi pregunta es, ¿Hay alguna forma de saber que parte del programa es la que esta consumiendo tantos recursos del procesador?¿Que practicas se pueden implementar para reducir el consumo de procesador?

Edito:

Al parecer ocurre luego de un par de horas de funcionamiento, empiezo a sospechar que los RichTextBox, al llenarse, hacen que la aplicación consuma mas recursos.

El código que estoy usando en lo delegados es el siguiente:

Código vb:

Private Sub PrintLog(ByVal NewText As String, Optional ByVal NewLine As Boolean = True)
 
        If Me.InvokeRequired Then
            Dim Txt As New PrintLogDelegate(AddressOf PrintLog)
            Me.Invoke(Txt, New Object() {NewText})
 
        Else
            Dim FechaHora As String = ""
            'If NewLine And LogRTB.TextLength > 1 Then 'Evita que se agregue un /r/n a la primera linea
            If NewLine Then
                FechaHora = GetFechaHora() & " | "
                If LogRTB.TextLength > 1 Then
                    NewText = vbCrLf & FechaHora & NewText
                Else
                    NewText = FechaHora & NewText
                End If
            End If
            LogRTB.AppendText(NewText)
 
 
            LogRTB.SaveFile(LogPath & ".log", RichTextBoxStreamType.PlainText)
            If LogRTB.TextLength > 1000000 Then
                LogRTB.Clear()
                'Si supera el millon de caracteres renovar el nombre del archivo para que quede listo para el proximo
                LogPath = Application.StartupPath & "\" & GetFechaHora().Replace(":", "")
            End If
 
            If LogAutoScrollChk.Checked Then
                LogRTB.ScrollToCaret()
            End If
        End If
    End Sub
 

¿Ustedes lo ven muy pesado?

[Dradi7]

Ahora mi consulta es lo siguiente para que son tantos timer??? y cual es el objetivo final de llenar los RichTextBox.

Primero seria bueno que explicaras cual es el objetivo que estas haciendo y para que lo haces

Saludos

[E_Blue]

Bueno, empecemos por lo mas sencillo de explicar, los RichTextBox son para guardar logs, uno guarda los errores y acciones que va realizando el programa y el otro guarda los datos que entran y salen del puerto serie, todo esto llamando a su correspondiente delegado.

Luego, un Timer tengo para que envíe los comandos por el puerto serie cada 5 segundos y cada 1 chequea si hay conexión con el dispositivo conectado al puerto, el cual es un módem inalambrico.

El segundo Timer se complementa con el primero y su función es contabilizar el tiempo que transcurre entre que se envía el comando al módem y este contesta; de esta forma puedo generar un timeout.

El tercer Timer verifica que los dos primeros funcionen correctamente pues cuando se entra a la función del primer Timer, este se autodeshabilita y depende por donde salga se vuelve a habilitar solo o no.

El cuarto Timer verifica cada 10 segundos que la función que actualiza el DatagridView este habilitada pues no se debe deshabilitar por mas de 30 segundos.(El usuario puede deshabilitar la actualización mediante un CheckBox).

[Aquaventus]

Mmmm me parece que estas abusando de los timers... Creo que 1 bastaría.

[Dradi7]

Iniciado por Aquaventus

Mmmm me parece que estas abusando de los timers... Creo que 1 bastaría.

Apoyo con lo que dice Aquaventus muchos timer para hacer esto ademas seria mucho mas conveniente que si usas Thread y trabajar en varios procesadores,
ademas porque mostrar los logs en el richtebox si lo puedes estar guardando en un text sin necesidad de mostrarlo

Saludos

[E_Blue]

Los RichTextBox me sirven a mi como referencia para saber como fue la cadena de eventos que llevo al error; me ha pasado que si el programa ejecuta las rutinas en orden A B C todo funciona bien, pero si las llama en orden B C A y no funciona.

Ahora tengo limitados los RichTextBox a 100KB, cuando llega a ese punto los borro e inicio un nuevo archivo.

Lo raro es que de entrada funciona bien, parece ser algo acumulativo, arranca en 36MB y a las 3 horas esta rondando los 50MB.
Ademas tengo otra aplicación, complementaria con esta que es la que ve el usuario final que también tiene el mismo tipo de log, maneja la misma base de datos con querys mas complejas, pero no maneja puerto serie y funciona perfectamente.

Es desconcertante.

Edito:

Mirando el administrador de tareas me he dado cuenta de que si minimizo la aplicación el consumo de RAM baja de 36MB a 1MB y luego de un par de segundos sube a 7MB y se estabiliza en torno a los 10MB.

Me parece que el problema es algún componente gráfico de .NET.

Ademas si en vez de enviar comandos al módem cada 1 segundo lo hago cada 3 segundos el consumo del procesador sube solo cuando procesa los datos enviados por el módem.