Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.17;
Скачать: CL | DM;

Вниз

забавный сегодня день - 01.02.03 :)   Найти похожие ветки 

 
Карлсон   (2003-02-02 00:27) [0]

а кто знает про таке вот числовые штуки с датой еще что-нить, может поделитесь?


 
Telepat   (2003-02-02 00:30) [1]

Во-первых, уже вчера.

Во-вторых, не надо красть темы с других форумов!


 
HUD   (2003-02-02 00:32) [2]

Моему брату исполнилось в прошлом году 20 лет 20 февраля. Вот тебе и числовая шутка:

20 лет, 20.02.2002.


 
Карлсон   (2003-02-02 00:35) [3]

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


 
Карлсон   (2003-02-02 00:41) [4]

кстати, если по делу, то меня интересуют математические описания таких процессов.
т.е. функции, просто интересно стало.


 
Telepat   (2003-02-02 01:01) [5]

Вот тебе функция (точее процедура):

procedure Piz_Date;
begin
If (FormatDateTime("yy",Date)=FormatDateTime("mm",Date))and(FormatDateTime("yy",Date)=FormatDateTime("dd",Date))and(FormatDateTime("mm",Date)=FormatDateTime("dd",Date)) then
ShowMessage("Классная сегодня дата!!!")
Else ShowMessage("Фигня сегодня дата :( ");
end;




 
Карлсон   (2003-02-02 01:06) [6]

да нет, я имею в виду не компутерную функцию, а обычную алгебраическую :)


 
Telepat   (2003-02-02 01:20) [7]

Около вас магизин календарей есть? Есть. Так будь добр купи календари 2003-2013 (больше не покупайЮ вдруг потом цены упадут), да, вот, и выпиши все интересные даты по дням, набери в ворде и пришли мне по почте, чтоб я тоже почитал по адресу:
shuchu@nenado.na


 
алексей008   (2003-02-02 09:36) [8]

>if
>(FormatDateTime("yy",Date)=FormatDateTime("mm",Date))and
>(FormatDateTime("yy",Date)=FormatDateTime("dd",Date))and
> (FormatDateTime("mm",Date)=FormatDateTime("dd",Date))
вот так программы и пишутся...



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

Текущий архив: 2003.02.17;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.008 c
1-53119
Беспечный Ангел
2003-02-06 14:55
2003.02.17
Помогите со скинами, плизззз!


1-52874
kernel::panic
2003-02-07 17:05
2003.02.17
Глюк с TEdit в Delphi7


3-52732
Calm
2003-01-30 11:47
2003.02.17
Грозит ли чем-нибудь изм длины текстового поля сисемной таблицы?


1-52931
bios
2003-02-08 01:38
2003.02.17
getdir


14-53256
Shc
2003-01-30 20:05
2003.02.17
RTF





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский