Вывод номера дня в году на Label при нажатии на кнопку

@USIXA · Регистрация: 02.04.2016

Author24 — интернет-сервис помощи студентам

1. нужно реализовать вывод номера дня в году на Label при нажатии на кнопку
2. нужно узнать этот високосный год или нет

@gunslinger · 08.04.2016, 19:49

1. DayOfTheYear(TDateTime) - заголовочный файл System.DateUtils.hpp (XE5)
2. https://ru.wikipedia.org/wiki/... 0%BE%D0%B4

Год является високосным в двух случаях: либо он кратен 4, но при этом не кратен 100, либо кратен 400. Год не является високосным, если он не кратен 4, либо он кратен 100, но при этом не кратен 400.

@volvo · 08.04.2016, 20:05

Сообщение от USIXA

нужно узнать этот високосный год или нет

IsLeapYear из SysUtils - по номеру года (это уже в BCB6 было), или IsInLeapYear из того же DateUtils, по значению типа TDateTime (насколько я помню, с RAD 2009)

@USIXA · 08.04.2016, 20:06 **[ТС]**

с заголовочным файлом проблемы, это точно на с++?
кто нибудь может прописать?

@USIXA · 08.04.2016, 20:19 **[ТС]**

НУЖНА помощь, выдает ошибку при нахождении номера дня в году

@Samrisbe · 08.04.2016, 20:50

лучше произвести вычисление, я так думаю

C++

  TDate date1, date2;
  //...................
  date1 = StrToDate(01.01.) + FormatDateTime("yyyy",Date()); // первый день в текущем году
  date2 = Date(); // текущая дата
  Label6->Caption = FloatToStr(DaysBetween(date1, date2)) + 1; // вычисляем разницу и плюсуем один день

вот отсюда пртмер

@Samrisbe · 08.04.2016, 20:56

вот прописал

@volvo · 08.04.2016, 21:25

Сообщение от USIXA

это точно на с++?

Точно.

C++

1	#include <DateUtils.hpp>

решает проблему (если будешь использовать DayOfTheYear). А если нет - то выкинь свой глючный компилятор. Одно у тебя не работает, другое не работает. На фиг он тебе нужен такой, если в нем не работает ничего.

А насчет IsLeapYear я же тебе русским языком написал:

Сообщение от volvo

IsLeapYear из SysUtils - по номеру года

, какого ты ей подсовываешь название типа данных, еще и не то, которое ей вообще нужно?

C++

#include <DateUtils.hpp>
 
// ...
 
void __fastcall TForm1::Button6Click(TObject *Sender)
{
    if(IsLeapYear(YearOf(Now())))
    {
        ShowMessage("Високосный год");
    }
}

Добавлено через 2 минуты

Сообщение от Samrisbe

лучше произвести вычисление

Кому лучше? Есть давным давно функция, которая выполняет нужную работу (DayOfTheYear прекрасно работает и в BCB6), кому нужны эти "вычисления"? Самому написать Билдер не нужно, чтобы все уже было вручную?

@Samrisbe · 09.04.2016, 13:28

Буду знать

Я у тебя научился тому что лучше вычислять дабы избежать конфуза...

@USIXA 1 / 1 / 0 Регистрация: 02.04.2016 Сообщений: 122
		1
	Вывод номера дня в году на Label при нажатии на кнопку 08.04.2016, 19:38. Показов 681. Ответов 8 Метки нет (Все метки) 1. нужно реализовать вывод номера дня в году на Label при нажатии на кнопку 2. нужно узнать этот високосный год или нет 0

@gunslinger случайный прохожий 2935 / 1951 / 606 Регистрация: 20.07.2013 Сообщений: 5,159
	08.04.2016, 19:49	2
	1. DayOfTheYear(TDateTime) - заголовочный файл System.DateUtils.hpp (XE5) 2. https://ru.wikipedia.org/wiki/... 0%BE%D0%B4 Год является високосным в двух случаях: либо он кратен 4, но при этом не кратен 100, либо кратен 400. Год не является високосным, если он не кратен 4, либо он кратен 100, но при этом не кратен 400. 0

@volvo Супер-модератор 32835 / 21172 / 8148 Регистрация: 22.10.2011 Сообщений: 36,431 Записей в блоге: 8
	08.04.2016, 20:05	3
	Сообщение от USIXA нужно узнать этот високосный год или нет IsLeapYear из SysUtils - по номеру года (это уже в BCB6 было), или IsInLeapYear из того же DateUtils, по значению типа TDateTime (насколько я помню, с RAD 2009) 0

@USIXA 1 / 1 / 0 Регистрация: 02.04.2016 Сообщений: 122
	08.04.2016, 20:06 [ТС]	4
	с заголовочным файлом проблемы, это точно на с++? кто нибудь может прописать? 0

@USIXA 1 / 1 / 0 Регистрация: 02.04.2016 Сообщений: 122
	08.04.2016, 20:19 [ТС]	5
	НУЖНА помощь, выдает ошибку при нахождении номера дня в году Миниатюры 0

@Samrisbe 1365 / 732 / 67 Регистрация: 28.01.2011 Сообщений: 2,064
	08.04.2016, 20:56	7
	вот прописал 0

@Samrisbe 1365 / 732 / 67 Регистрация: 28.01.2011 Сообщений: 2,064
	09.04.2016, 13:28	9
	Буду знать Я у тебя научился тому что лучше вычислять дабы избежать конфуза... 0