Halt Falsch:
Es gibt doch die Ereignisse: onWork,Begin,End. Die einfach benutzen.
Im Anhang findest du eine Form, die Proceduren bereit stellt, die dann nur noch von deinen TIdHTTP aufgerufen werden müssen, und schon hast du einen Fortschritt im wahrsten Sinne des Wortes