Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
1 / 1 / 0
Регистрация: 05.10.2009
Сообщений: 119

Работа с датами

16.12.2011, 20:56. Показов 1521. Ответов 4
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Не могу реализовать такую тему. Сразу пример: допустим в Edit вписываю 61. В label должен отобразить сколько это будет лет, месяцев и дней. Т.е. результат: 0 лет(год) 2 месяца 1 день.
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
16.12.2011, 20:56
Ответы с готовыми решениями:

Работа с датами
Хотел написать обработчик события OnClick для компонента Button, который отображает в компоненте Label разность в днях и часах между...

Работа с датами
делаю следующее var Y,M,D:word; begin decodedate(Date,Y,M,D); //разбиваю дату if (EncodeDate(Y, M,...

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

4
86 / 86 / 13
Регистрация: 03.03.2011
Сообщений: 1,873
16.12.2011, 22:15
в чем проблема то?
бери число из едита и дели его на 30,результатом будет кол-во месяцев,остатком -дни
т.е.
Delphi
1
2
61 div 30===это месяцы
61 mod 30==дни
потом берешь то число которое получилось в месяцах и смотришь,если div<>0 то результат пишешь в годы а кол во месяцев обновляешь остатком
1
 Аватар для Arcor
5709 / 2300 / 466
Регистрация: 20.11.2009
Сообщений: 7,721
Записей в блоге: 1
17.12.2011, 01:29
Цитата Сообщение от spydark91 Посмотреть сообщение
в чем проблема то?
бери число из едита и дели его на 30,результатом будет кол-во месяцев,остатком -дни
т.е.
Delphi
1
2
61 div 30===это месяцы
61 mod 30==дни
потом берешь то число которое получилось в месяцах и смотришь,если div<>0 то результат пишешь в годы а кол во месяцев обновляешь остатком
а если я введу 1 000 000 000 мрд дней до нашей эры, мне будет как-то лень считать сколько это месяцев и дней
0
 Аватар для deathNC
1905 / 1016 / 123
Регистрация: 08.12.2009
Сообщений: 2,792
Записей в блоге: 2
17.12.2011, 09:16
Цитата Сообщение от spydark91 Посмотреть сообщение
61 mod 30==дни
не врубился! Это что?
0
86 / 86 / 13
Регистрация: 03.03.2011
Сообщений: 1,873
17.12.2011, 12:45
ну это пример,чтобы тс узнал про функции mod и div
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
17.12.2011, 12:45
Помогаю со студенческими работами здесь

Работа с датами (DateTimePicker)
на форме два компонента DateTimePicker и один Edit, мне нужно расчитать стаж, я задаю начало и конец периода, вычитаю из конца начало и...

Работа с датами в Delphi
Здравствуйте! Подскажите пожалуйста как работать с датами в делфи, преподователь сказал что существуют специальные типы данных и компоненты...

Работа с датами
У меня есть такой массив: $months_en = array( &quot;January=&gt;Января&quot;, &quot;February=&gt;Февраля&quot;, &quot;March=&gt;Марта&quot;, ...

Работа с датами
Доброе время суток! Нужен запрос на SQL Известен месяц и год (например сентябрь 2016). И есть в базе даты начала и окончания...

Работа с датами
Задача. Введена дата, сколько полных недель осталось до конца года.


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer
8Observer8 08.02.2026
Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .
SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств
8Observer8 07.02.2026
Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве
8Observer8 02.02.2026
Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .
Философия технологии
iceja 01.02.2026
На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .
SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf
8Observer8 01.02.2026
Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru