Hola, a ver si esto te lo soluciona:
Código Delphi
[-]var
Fecha: TDateTime;
Resultado: String;
begin
Fecha:=StrToTime('03:00:00 pm');
DateTimeToString(Resultado, 'hh:mm:ss', Fecha);
Lo que hace este ejemplo, es obligarle a formatear la hora en formato de 24h. Si no quieres mostrar los segundos, simplemente quitale ":ss" y ya esta...
Te enlazo este
link donde hay mas información.
Saludos.