Автоматическое напоминание...

← →
Олег Валерьевич (2007-04-25 00:02) [0]

Есть таблица парадокс, в ней есть поле "дата рождения". Нужно сделать напоминание в виде сообщения, за 5 дней до дня рождения. Помогите мастера!!! Ах да.. это напоминание должно срабатывать при запуске программы.))

← →
Johnmen © (2007-04-25 00:08) [1]

И с чем проблемы?

← →
Олег Валерьевич (2007-04-25 00:12) [2]

Проблема в том что я не знаю как это сделать..))

← →
Германн © (2007-04-25 00:16) [3]

> Олег Валерьевич (25.04.07 00:12) [2]
>
> Проблема в том что я не знаю как это сделать..))
>

ShowMessage()

← →
Johnmen © (2007-04-25 00:17) [4]

Что конкретно?

← →
Олег Валерьевич (2007-04-25 00:28) [5]

А именно как сделать счётчик который за 5 дней до дня рождения выведет сообщение пользователю. Как связать ShowMessage() с полем Д.Р. Как сделать, что бы именно при запуске программы срабатывало сообщение (бес всяких нажатий на кнопки и т.п.)

← →
Johnmen © (2007-04-25 00:30) [6]

Хм... Это программу за тебя написать? Или вводный курс по программированию прочитать? И то и другое - реально!

← →
Олег Валерьевич (2007-04-25 00:40) [7]

Если я не ошибаюсь всё это можно вместить в две строчки.
Я даже примерно представляю, как это можно сделать, но мой очень маленький опыт работы в делфи не позволяет полностью реализовать мой план.))
Я всего лишь прошу натолкнуть на мысль.

← →
{RASkov} © (2007-04-25 00:45) [8]

> но мой очень маленький опыт работы в делфи не позволяет
> полностью реализовать мой план.))

Рассмешил... :) чесслово.

> Если я не ошибаюсь всё это можно вместить в две строчки.

По большей части - ошибаешься.

> Я всего лишь прошу натолкнуть на мысль.

Придется при запуске просматривать все записи и поле ДР на предмет разницы текущей даты и даты в ДР, не учитывая год.

← →
Германн © (2007-04-25 01:33) [9]

> Олег Валерьевич (25.04.07 00:40) [7]
>
> Если я не ошибаюсь всё это можно вместить в две строчки.
>
>

Это даже можно вместить и в одну строку! Никто ещё не запретил в Паскале такое!
Ну разве что конкретные компилляторы не смогут такую строку обработать! Но тут все претензии к разработчику компиллятора :)

← →
Олег Валерьевич (2007-04-25 02:45) [10]

Вот получилась сделать по ДатаТаймПикеру(...DecodeDate(DateTimePicker2.Date, Year, Month, Day);....), т.е. выставляя на нём дату рождения оно превосходно показывает возрост.
Но вот как же сделать, что бы оно брало дату не из Пикера, а из таблицы?

> [10] Олег Валерьевич (25.04.07 02:45)
> Но вот как же сделать, что бы оно брало дату не из Пикера, а из таблицы?

А "оно" что - не хочет брать... сопротивляется?
Ну ты или код показывай - как делаешь, или вопрос задай так, чтоб понятным был не только тебе.

← →
Олег Валерьевич (2007-04-25 02:57) [12]

DecodeDate(DateTimePicker1.Date, Year, Month, Day);
DecodeDate(Date, CurrentYear, CurrentMonth, CurrentDay);
if (Year = CurrentYear) and (Month = CurrentMonth) and (Day = CurrentDay) then
Age :=0
else
begin
Age := CurrentYear - Year;
if (Month > CurrentMonth) then
dec(Age)
else if Month = CurrentMonth then
if (Day > CurrentDay) then
dec(Age);
end;
Button2.Caption := IntToStr(Age);
if Age=0 then ShowMessage("ДР")
Но это всё берётся из пикера.
Как нужно обращаться к таблице?

← →
ASoft (2007-04-25 05:30) [13]

Table.fieldbyname("data").asdatetime хотя бы

Автоматическое напоминание... Найти похожие ветки