Вытащить из текущего времени часы и секунды например можно вот так:
Текущее время - Time; S - строка.
Тогда:
S:=FormatDateTime('hh:mm', Time);
другими словами - короткий формат времени
hh - часы, mm - минуты, ss- секунды, : - разделитель
таким образом можно форматить как хочешь. Также форматится дата, текущяя дата - Date;
dd/mm/yyyy - полный формат даты из чиселок.
Добавлено через 1 минуту:
кстати, там в формате времени есть еще am/pm , в общем смотри help по Date-Time Format Strings