Probe tu código, cambiando algunas cosas por supuesto pero imagino que debe de ser algo similar lo que haces y sí pasó por cada una de las comparaciones que tienes.
aquí la imagen
y aquí el código que meti para probar.
Código Delphi
[-]procedure TForm1.FormShow(Sender: TObject);
begin
rptHabilita := True;
rptImprime := True;
rpdHabilita := True;
rpdImprime := True;
dHora := 15;
dMin := 57;
dSeg := 30;
pHora := 15;
pMin := 57;
pSeg := 34;
sHora := 15;
sMin := 57;
sSeg := 38;
tHora := 15;
tMin := 57;
tSeg := 42;
end;
No será en otro lado tu problema?
Salud OS