El ejemplo de RGJ es bueno. Yo uso la función Now(), que devuelve un tipo TDateTime, y luego el método FormatString.Usando como ejemplo un Label...
Label1.Caption = Now().FormatString("h:nn:ss");
El Método FormatString admite parámetros para especificar fechas y horas, por ejemplo
"d 'de' mmmm 'de' yyyy, h:nn:ss"
daría lugar a un AnsiString del tipo
9 de septiembre de 2001, 11:40:32