Creo que lo que buscas es algo como esto:
Código Delphi
[-]label1.Caption := formatDateTime('hh:mm:ss am/pm',Now);
La función FormatDateTime() convierte una hora en string, dado un formato (en este caso: hh:mm:ss ap/pm). Ve la ayuda sobre dicha función.
Esto es aplicable a efectos de mostrar la hora, pero tu no aclaras si es para mostrar la hora, para guardarla o almacenarla. Simplemente dices dar formato. Se más preciso y detallista. En cuanto al formato lo tenemos claro, el asunto es ¿donde? ¿En una base de datos? ¿para mostrarla al usuario? ¿guardarla en una variable? Si nos explicases mejor no estaríamos aquí jugando a las adivinanzas
Saludos,