Progress Bar en Cmd
 

Hola muy buenas queria saber como poner un Progress Bar para que funcione en estas lineas, como veis estoy aciendo un pequeño programa para comprimir con UPX pero me gustaria integrar un Progress Bar, e buscando mucha informacion y no e encontrado nada o no e entendido los ejemplos.. aber si alguien me puede decir un ejemplo o alguna clase de ayuda, Gracias de antemano.

Código Delphi [-]
WinExec (PAnsiChar(AnsiString('upx "'+ edit1.text +'" Compress')),SW_SHOWNORMAL)

Para usar una barra de progreso tiene que ser posible saber cómo va dicho progreso (valga la redundancia). Es decir, si sabemos que un proceso necesita siete pasos, y podemos saber cuándo se completa cada uno de estos, entonces no hay problema.

La verdad es que nunca he usado UPX, así que no sé si se puede obtener esa información de alguna forma (quizá usando STDIN/STDOUT), pero lo que sí sé es que nunca podrás obtenerla usando "WinExec".