Countdownfortschritt mit Progressbar darstellen?

[delphineuling88]

Wie kann ich den Countdownfortschritt mit der Progressbar darfstellen?
Mein Countdownformat ist hh:mm:ss

hab mal so einen vorschlag um erstmal das max der Progressbar zu deklarieren was baer noch nicht ganz funktioniert
bitte um hilfe

Delphi-Quellcode:

max:= 0;
    max:= StrToInt(copy(Label8.Caption,1,2)) * 3600;           //Stunden ins Sekunden
    max:= max + StrToInt(copy(Label8.Caption,4,2)) * 60;  //Minuten in Sekunden
    max:= max + StrToInt(copy(Label8.Caption,7,2));
    progressbar1.Max:=strtoint(max);