validar dbedit para horario

[gonza_619]

hola amigos, bueno lo que quiero hacer es algo que hice parecido con un datetimepicker, pero ahora con dbedit que muestra horas de una tabla donde quiero modificar el horario segun un turno, es decir al seleccionar un registro de tabla, tambien selecciono el turno ej:
1:turno mañana
2:turno tarde
al turno lo saco asi.
turno:=table.fieldbyname('turno').asinteger;
luego con ese turno validar dbedit, que si es 1 el turno , no pueda sobrepasar de tal hora eJ:
si es turno1 : va de 09:00 am - hasta- 12:00 am, que no sobrepase de este rango en el dbedit cunado quiera modificar el horario desde el mismo dbedit. no uso dtpicker porq no ingreso nuevo horario sino que necesito editarlo. gracias

Código Delphi [-]
var  HoraAct : Integer;
begin
if tur=1 then
begin
 HoraAct := HourOf(DateTimePicker1.Time);
 //si no esta entre las 17 y 20 horas o la hora ini es mayor que la hora fin, le ponemos la hora con la que empieza el rango
 if Not((HoraAct>=8) and (HoraAct<=12)) or (CompareTime(DateTimePicker1.Time,DateTimePicker2.Time)=1) Then
  begin
  DateTimePicker1.Time := EncodeTime(9,MinuteOf(DateTimePicker1.Time),0,0);
  end;
end;

esto hice con dtpicker con hora pero nose como hacerlo con dbedits para controlar grcias