Delphi - Operacines con tiempo

Hola, que tal; mi visita en esta ocasiion es para ver si me pueden ayudar a como realizar una resta entre dos horas por ejemplo la resta de 4:30-4:00 mi intencion es recibir el resultado de 0:30 pero nadamas obtengo "0" cualquiera que sea el caso. Espero contar con su apoyo.
¡¡ Gracias !!

Prueba esto:
var
T1,T2:TTime;
begin
T1:=EncodeTime(4,30,0,0);
T2:=EncodeTime(4,0,0,0);
Label1.Caption:=TimeToStr(T1-T2);
end;