Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.02.17;
Скачать: [xml.tar.bz2];

Вниз

забавный сегодня день - 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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
3-52798
Ihtiandr
2003-01-31 14:54
2003.02.17
DBGrid


3-52778
Arman
2003-01-28 16:45
2003.02.17
SQL


1-53053
guest
2003-02-06 11:27
2003.02.17
Как правильно проверить наличие только цифр в строке?


6-53154
Sewix
2002-12-27 08:37
2003.02.17
TWebBrowser не копирует в бувер в online


1-53060
cult
2003-02-06 18:01
2003.02.17
как преобразовать String в WideString?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский