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

Новый Год   Найти похожие ветки 

← →
кирилл_   (2003-12-07 11:27) [0]

Уважаемые Мастера!
Покажите как, сделать, чтобы независимо от года,
1 января появилось сообщение "С новым годом!".
Зараннее спасибо!

---

← →
Maxud ©   (2003-12-07 11:33) [1]


var d, m, y: word;
begin
DecodeDate(Date);
if (d=1) and (m=1) then
ShowMessage("С новым годом!!");
end;


---

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

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



Память: 0.44 MB
Время: 0.013 c