COMO COMPARAR DOIS HORARIOS, E SABER O MENOR

ESTOU EM FASE FINAL DE SYS E NÃO ESTOU CONSEGUINDO COMPARAR DOIS HORÁRIOS
SEGUE ABAIXO A ROTINA:

procedure TForm1.MskFechamentoExit(Sender: TObject);
Var
A: String;
B: String;
begin
A := MskFechamento.text;
B := MskDCS.text;
Begin
If B > A then
begin
Checkbox1.checked;
CheckBox1.Enabled := true;
end
else
Begin
If B < A then
Checkbox1.checked;
CheckBox1.Enabled := true;
end;
end;