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

Задачка на даты

01.07.2023, 23:05. Показов 401. Ответов 9

Author24 — интернет-сервис помощи студентам
Необходимо найти дату, отстоящую от заданной на заданное количество дней в заданном направлении. Интерфейс я уже построил, а как это реализовать в коде - ума не приложу.
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
01.07.2023, 23:05
Ответы с готовыми решениями:

Задачка на даты
Даны числа А, В, С обозначающие дату: a)проверить корректность этой даты (30 февраля 1900 –...

Задачка на вывод месяца и даты из списка
Привет всем, только начинаю учить язык. Задали задачку, не могу сообразить, как ее решить(( ...

Задачка с массивом и задачка с формулами Ньютона и Лагранжа
Прошу помочь решить две задачи

Задачка на файлы. интересная задачка с игрушками
Дан файл Assort, содержащий сведения об игрушках: указываются название игрушки, ее стоимость в...

Вывод даты из базы и подсчет строк где втстречаются эти даты
В таблице mysql есть поле где хранится дата. и это дата встречается в этой таблице по несколько...

9
518 / 221 / 23
Регистрация: 05.05.2022
Сообщений: 1,462
01.07.2023, 23:11 2
Есть готовые функции для увеличения даты, хотя для даты можно просто число дней прибавлять.
0
Айлурофил
467 / 401 / 108
Регистрация: 27.05.2017
Сообщений: 2,316
Записей в блоге: 1
01.07.2023, 23:12 3
Если дата в формате TDateTime, то просто прибавить/вычесть к дате/от даты число дней.
0
0 / 0 / 0
Регистрация: 24.05.2023
Сообщений: 6
01.07.2023, 23:20  [ТС] 4
Цитата Сообщение от Beltar Посмотреть сообщение
Есть готовые функции для увеличения даты, хотя для даты можно просто число дней прибавлять.
Нужно, чтобы пользователем задавалось направление времени - тридцать дней назад или вперёд, к примеру.
0
Модератор
3742 / 2243 / 781
Регистрация: 15.11.2015
Сообщений: 8,941
01.07.2023, 23:35 5
Цитата Сообщение от TheDISH3R Посмотреть сообщение
Нужно, чтобы пользователем задавалось направление времени - тридцать дней назад или вперёд, к примеру.
Ставишь радиокнопки или радиогруппу и в зависимости от выбора прибавляешь или отнимаешь.
0
0 / 0 / 0
Регистрация: 24.05.2023
Сообщений: 6
01.07.2023, 23:39  [ТС] 6
Цитата Сообщение от AzAtom Посмотреть сообщение
Ставишь радиокнопки или радиогруппу и в зависимости от выбора прибавляешь или отнимаешь.
Вот я и пытаюсь понять, что и от чего нужно отнимать, чтобы программа работала корректно
0
Айлурофил
467 / 401 / 108
Регистрация: 27.05.2017
Сообщений: 2,316
Записей в блоге: 1
02.07.2023, 00:01 7
Цитата Сообщение от TheDISH3R Посмотреть сообщение
Вот я и пытаюсь понять,
А чего пытаться-то? Я же по-русски написал:
дата в формате TDateTime
0
0 / 0 / 0
Регистрация: 24.05.2023
Сообщений: 6
02.07.2023, 00:17  [ТС] 8
Цитата Сообщение от Massaraksh7 Посмотреть сообщение
А чего пытаться-то? Я же по-русски написал:
Не исчерпывающе, откровенно говоря. Пытаюсь сейчас отыскать кусок кода, который хоть чуть похож на то, что есть у меня.
0
Модератор
3742 / 2243 / 781
Регистрация: 15.11.2015
Сообщений: 8,941
02.07.2023, 00:22 9
Например, можно так. На форме 3 Edit, кнопка и RadioGroup с 2 значениями (Прибавить и Отнять):
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
procedure TForm1.Button1Click(Sender: TObject);
var
  d: TDateTime;
  i: integer;
begin
  if TryStrToDateTime(Edit1.Text, d) then
  begin
    i := StrToIntDef(Edit2.Text, 0);
    if RadioGroup1.ItemIndex = 0 then
      d := d + i // С днями можно так делать
    else
      d := d - i;
    Edit3.Text := DateToStr(d);
  end
  else
    Edit3.Text := 'Введите корректную дату в формате ДД.ММ.ГГ или ДД.ММ.ГГГГ';
end;
0
0 / 0 / 0
Регистрация: 24.05.2023
Сообщений: 6
02.07.2023, 00:39  [ТС] 10
Cпасибо большое
0
02.07.2023, 00:39
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.07.2023, 00:39
Помогаю со студенческими работами здесь

Как сделать выборку периода даты в запросе с вычислением от запрошенной даты
Доброго времени суток! Есть форма, есть подчинённая форма, при запуске формы запрашивается...

Автоматический подсчет периода, при даты начала и даты окончания
Здравствуйте, есть дата начала и дата окончания, если дата начала выбирается первым, а после дата...

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

Как можно передать значение начальной даты и конечной даты из JS
Здравствуйте уважаемые! Нужна Ваша помощь, никак не могу разобраться. Есть .aspx страница где...

Bootstrap DatePicker вывод формата даты при смене даты
Привет, Поставил себе вот такой скрипт https://github.com/eternicode/bootstrap-datepicker ...

Выборка данных через сравнение даты в DataGridView и текущей даты
Ситуация такова: в датагриде есть столбец с определенной датой. Нужно сравнить все даты с этого...


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

Или воспользуйтесь поиском по форуму:
10
Ответ Создать тему
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru