Вниз
Скачать: CL | DM;

Date   Найти похожие ветки 

 
Нитолай   (2003-09-19 18:08) [0]

Мастера помогите. Решил научиться програмировать на Delphi.
В качестве повышения своей квалификации решил написать свою электронную телефонную книгу с напоминанием дней рождений.
Все вроде бы ничего, получается, а вот с проверкой на дату не очень.
Если можно, пожалуйста скиньте или приведите здесь пару исходников, в которых происходит проверка даты и если дата рождения прошла то фокус передаётся на эту запись и выводится сообщение и т.п.
P.S. Исходники нужны исключительно для самообразования.
Email: bear_2000@land.ru
Заранее спасибо.


 
Zacho ©   (2003-09-19 21:08) [1]


> , в которых происходит проверка даты и если дата рождения
> прошла то фокус передаётся на эту запись и выводится сообщение
> и т.п.

А можно более вразумительно ? А то с телепатическими способностями напряг.. :(


 
Нитолай   (2003-09-20 02:16) [2]

Есть поле "дата рождения" и там допустим стоит 21 сентября 2003.
Значит завтра это поле, допустим должно пометится каким нить цветом, ну или вывести какое нибудь сообщение, что завтра будет день рождения. Вот и всё.


 
jack128 ©   (2003-09-20 02:24) [3]


> Значит завтра это поле, допустим должно пометится каким
> нить цветом

А что ты хочешь делать сегодня?

Если те все таки нужно подсветка за один день до события, то
что то типа такого
if (Trunc(MyDataSet.FieldByName("birthday").AsDateTime) - 1) = Trunc(Date) then
ShowMessage("Завтра день рожденья");


 
jack128 ©   (2003-09-20 02:26) [4]

Упреждающий удар: насчет подсветки строки в DbGrid"е ищи статьи на королестве Делфи - там все есть


 
still ©   (2003-09-20 02:34) [5]


> jack128 © (20.09.03 02:26) [4]


браво :)



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c
6-27629
h@1f-e1f
2003-08-12 17:19
2003.10.09
Как сохранить страницу?


1-27461
Andrey Voznesenskiy
2003-09-27 13:27
2003.10.09
MDi и Child


14-27693
ghg
2003-09-22 07:31
2003.10.09
транслятор из с в делфи


14-27671
альтаир
2003-09-22 11:24
2003.10.09
Список процессов


4-27793
DelphiNew
2003-08-04 10:49
2003.10.09
Убийство процессов




   Наверх