Utiliza la función FormatDateTime();
Código Delphi
[-]
Label1.Caption:=FormatDateTime('h:nn:ss', Now);
Mira en la ayuda para saber cómo se utiliza el formato.
Por ejemplo, este es uno que utilizo yo:
Código Delphi
[-]
Ahora:=FormatDateTime('"Hoy," dddd d "de" mmmm "de" yyyy, "a las" h:nn "horas"', Now);
Incluso tienes la opción (no recuerdo cómo era) de que te salga am/pm.
Saludos.