Показать сообщение отдельно
  #2  
Старый 06.12.2013, 22:25
Аватар для poli-smen
poli-smen poli-smen вне форума
Профессионал
 
Регистрация: 06.08.2012
Адрес: Кривой Рог
Сообщения: 1,791
Версия Delphi: Delphi 7, XE2
Репутация: 4415
По умолчанию

Цитата:
Сообщение от govorun
Имеется поле "Дата". Нужно написать в коде нечто подобное:

if 'текущая дата' -(минус) 'Дата' > 30 then

Окажите пожалуйста посильную помощь, не могу додуматься...
Имеется ввиду поле в таблице базы данных?

Получить текущую дату - функция Date.
Получить текущую дату и время - функция Now.

Пример:
Код:
  if Date - Int(Table1.FieldByName('Дата').AsDateTime) > 30 then
Ответить с цитированием