Ограничения на ввод времени в поле

[nastena_r_v]

Всем здравствуйте, подскажите, как можно реализовать ограничение на ввод данных в поле. Т.е. у меня есть поле "prihod", типа float, нужно чтоб вводились данные с 00,00 до 23,59, не больше, чтоб часы были до 23 и минуты до 59. База Access, компоненты для подключения базы - ADO, для вывода полей используется ADOQuery, т.е. возможны запросы. Для отображения базы используется DBGrid.

[eval]

зачем вы float выставили, если туда время хотите совать? где логика?

[nastena_r_v]

Логика в том, что потом данное поле будет учавствовать в процедуре вычисляемого поля, Вам нужно все объяснение? И время вводится не через ":", а через ",". Что очень удобно для данного типа. Иначе с типом "время", Вы не сможете делать никакие вычисляемые процедуры.
Так может у Вас есть какие-нибудь предложения????

[evg_m]

данное поле будет учавствовать в процедуре вычисляемого поля, Вам нужно все объяснение?

Да желательно, иначе предвижу проблему.
float (11,30 + 2,30) /2 =7,20
time (11:30 + 2:30) /2 =7:00
P.S. большинство СУБД имеет вычислительный аппарат (функции!) для операций со временем.

[Аватар]

Откуда сведения, что с полями типа дата-время нельзя вычислений делать? Это будет лучше и надежней, чем ваше псевдо-время. По вопросу - не чего его в гриде вводить, берите время из DateTimePicker, и чего хошь с ним делайте

[eval]

Так может у Вас есть какие-нибудь предложения????

да, перестаньте заниматься непойми чем, а лучше почитайте что к чему, тогда такие вопросы отпадут сами собой

float (11,30 + 2,30) /2 =7,20
time (11:30 + 2:30) /2 =7:00

а заставят людей в уме столбиком переводить минуты и секунды в доли часа
правда люди будут долго ругаться, потеряется точность, ну так это все не важно, у нас мега идея

[nastena_r_v]

Если я поменяю тип поля на время, то проблемы с вычислением не будет?
Т.Е грубо у меня такое вычисление с полями:
Всего := (Уход На Обед -Приход) + (Уход - Приход С обеда)
И если поменяю тип с float на time, то ошибки в этом вычислении не будет?

[superedward]

Интересная идея для юзабилити )))
Использовать в базе однозначно тип поля ДатаВремя
После ввода данных, подменять запятые на стандартный DateSeparator, т.е. 11,00 -> 11:00 перед занесением данных в базу

[Аватар]

superedward, че за ахинея?

nastena_r_v, вот пример расчета отработанных часов на переменных, на полях таблицы почти также. Только учитывать, что не ходил на обед, или вообще домой не ушел (а вдруг), или пришел 30-05-2014 23:00:00, а ушел 31-05-2014 09:00:00

procedure TForm1.Button4Click(Sender: TObject);
var t1,t2,t3,t4: TDateTime;
begin
  t1:=EncodeTime(7,55,0,0);  //пришел на работу 07:55
  t2:=EncodeTime(12,10,0,0); //ушел на обед 12:10
  t3:=EncodeTime(13,15,0,0); //пришел с обеда 13:15
  t4:=EncodeTime(17,20,0,0); //ушел с работы 17:20
  Label1.Caption:=Format('Всего отработал %s',[FormatDateTime('hh:nn',(t2-t1)+(t4-t3))]);
end;

[eval]

читать все равно не будет, не заставишь, как не пытайся ...

Format('Всего отработал %s',[FormatDateTime

хватит и одной таблетки