Access

[Виктория7777]

у меня есть поле в базе данных access (дата регистрации)в формате dd.mm.yyyy мне нужно отнять из даты регистрации, сегодняшнюю дату и результате получить количество дней, как это реализовать в Delphi? заранее спасибо.

[OlegVE]

СколькоДней := DaysBetween(НапримерСегодня, НапримерДатаОтсчёта);

Как Вы думаете, если бы у Вас был не Access, а mySQL то в Delphi нужно было бы по другому получить количество дней?
И ещё. Посмотрите функции EncodeDate и StrToDateTime.

[Виктория7777]

Спасибо, я посмотрела.
#procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
Documentkol_vo := DaysBetween(Now(), DocumentDATA_REGIS.AsDateTime);
end;#
Вы не знаете, когда все типы соблюдены, Delphi ошибку показывает что несовместимые типы TDateTime и Integer, хотя конечным ответом функции DaysBetween, должно являться целое число т.е. тип Integer.
Может снова не так всё поняла...?

[Serge_Bliznykov]

1) какого типа поле Documentkol_vo ?

2) для чего Вы повесили присвоение на событие OnCalcFields ?
просто это событие принято использовать для вычисляемых полей.

3) так не пробовали:

procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
  Documentkol_vo := DaysBetween(Now(), DataSet.FielByName('DATA_REGIS').AsDateTime);
end;

4) и, главное, А почему Вы не хотите прямо в запросе вычислять разницу?!
Это же самый простой, надёжный и очевидный способ!!

[Виктория7777]

1) типа Integer
2) Потому что поле является вычисляемым
3) Так не работает (FielByName, нету такого)
4) Так как в домашнем задании написано именно так.

[Serge_Bliznykov]

3) Так не работает (FielByName, нету такого)

а!! ну пропустил буковку в слове. FieldByName, разумеется! Неужели трудно увидеть и исправить?!

2) Потому что поле является вычисляемым

опс. А вот с этого момента поподробнее!
Какое именно поле у Вас сделано вычисляемым?! Имя этого поля какое?
(и очень надеюсь, что Вы реально добавили в датасет вычисляемое поле)...

[OlegVE]

Что это такое DocumentDATA_REGIS? Если Вы спрашиваете, то сами не решайте на какие вопросы надо отвечать, а на какие не нужно, потому, что Вы похоже не знаете какие вопросы важные.
Вам привёл пример Serge_Bliznykov

procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
  Documentkol_vo := DaysBetween(Now(), DataSet.FieldByName('DATA_REGIS').AsDateTime);
end;

Вы, похоже скопировали его "в лоб". Возможно DataSet надо заменить в его коде на Document, но это из области гаданий.
P.S. Я тоже не заметил FieldByName

[Виктория7777]

DocumentDATA_REGIS, это поле в Access типа Дата/Время .
A Document это сама БД.
И FiledByName всё равно не работает.
Вычисляемым поле является Documentkol_vo, и я честно его добавила. Через компонент Table=>New Fields и выбрала тип Calculated.
Правильно ведь?

[Mad_Cat]

FiledByName у вас так написано или вот так FieldByName

[OlegVE]

Почитайте здесь
http://moiais.far.ru/articles/delphi_db_ch_V.htm
не обращайте внимания на DBGrid и ответьте: что Вы упустили? или что у Вас по другому? Вы работаете не через ADO?
P.S. Ещё раз ссылаюсь на код Serge_Bliznykov

procedure TForm1.DocumentCalcFields(DataSet: TDataSet);
begin
  Documentkol_vo.Value := DaysBetween(Now(), DocumentDATA_REGIS.AsDateTime);
end;

Вот теперь DataSet означает совсем другое, означает он то, что Вам надо указать откуда Вы берёте поле DocumentDATA_REGIS (ADOQuery, ADOTable). Надеюсь оно там-же где и ваше поле Documentkol_vo.
P.P.S. Видите что означает одно простое слово вычисляемое... и ответ

DocumentDATA_REGIS, это поле в Access типа Дата/Время