Topic: Как проверить поле DataTimePicker на превышение по времени
Рабочий день до 16:00
if talon2.DateTimePicker1.DateTime > EncodeTime(16, 0, 0, 0) Then
begin
MessageBox('Время талона превышает время окончания рабочего дня','Предупреждение',MB_ICONINFORMATION);
Cancel:=True;
end
else begin
MessageBox('Количество выданных талонов за этот день = '+IntToStr(countTal+1),'Информация', MB_OK+MB_ICONINFORMATION);
end;
Ошибка в том, что при любом изменении поля времени на наименьшее всё равно появляется Предупреждение. Подскажите советом пжлста.