Последнее число предыдущего месяца - Общие вопросы Delphi

ins813 · 14.10.2012, 21:52

Здравствуйте, подскажите как вычислить последнее число предыдущего месяца используя Два Datetimepicker'a ?

Аватар · 14.10.2012, 22:17

Код:

d:=RecodeDay(IncMonth(DateTimePicker1.DateTime,-1),DaysInMonth(IncMonth(DateTimePicker1.DateTime,-1)));

А два зачем?

ins813 · 14.10.2012, 22:19

Можно и один, просто написал имея в виду(период - с - по), а этот код куда вставляется ?

phomm · 14.10.2012, 22:21

Не знаю насчёт DateTimePicker'ов, и вообще на кой они тут нужны, единственное, предполагаю, чтобы указать нужный "текущий" месяц, тогда значение из дейттаймпикера подставить вместо Now, и вычислял бы так:

Код:

LastDayInPrevMonth := IncDay(StartOfTheMonth(Now), -1); // uses DateUtils

Аватар · 14.10.2012, 22:22

Цитата:

а этот код куда вставляется

ololo можно на стене краской написать
или в нужное место в проге

ins813 · 14.10.2012, 22:26

phomm, А разве Now не берет значение даты из систем времени ?

ins813 · 14.10.2012, 22:27

Аватар, согласен, только краска закончилась )

ins813 · 14.10.2012, 22:31

LastDayInPrevMonth а переменная какого типа ?

ins813 · 14.10.2012, 22:36

phomm, LastDayInPrevMonth переменная какого типа ?

eoln · 14.10.2012, 22:46

Нажми CTRL и кликни по имени ф-ии, увидишь что она возвращает

Код:

function IncDay(const AValue: TDateTime;
  const ANumberOfDays: Integer = 1): TDateTime;

И нечего постить, тут не чат, есть кнопка ПРАВКА

14.10.2012, 21:52	#1
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	Последнее число предыдущего месяца Здравствуйте, подскажите как вычислить последнее число предыдущего месяца используя Два Datetimepicker'a ?

14.10.2012, 22:17	#2
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	Код: `d:=RecodeDay(IncMonth(DateTimePicker1.DateTime,-1),DaysInMonth(IncMonth(DateTimePicker1.DateTime,-1)));` А два зачем? Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

14.10.2012, 22:21	#4
phomm personality Старожил Регистрация: 28.04.2009 Сообщений: 2,899	Не знаю насчёт DateTimePicker'ов, и вообще на кой они тут нужны, единственное, предполагаю, чтобы указать нужный "текущий" месяц, тогда значение из дейттаймпикера подставить вместо Now, и вычислял бы так: Код: `LastDayInPrevMonth := IncDay(StartOfTheMonth(Now), -1); // uses DateUtils` My projects (Mirror) github telegram Последний раз редактировалось phomm; 14.10.2012 в 22:24.

14.10.2012, 22:46	#10
eoln Старожил Регистрация: 26.04.2008 Сообщений: 2,645	Нажми CTRL и кликни по имени ф-ии, увидишь что она возвращает Код: `function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;` И нечего постить, тут не чат, есть кнопка ПРАВКА

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Первое число текущего месяца	Swatch	Microsoft Office Access	2	13.08.2012 12:52
Копировать данные с предыдущего месяца	valerij	Microsoft Office Excel	23	11.01.2011 18:57
В ячейке проставить название предыдущего месяца	kzld	Microsoft Office Excel	6	08.10.2010 11:30
Определить последнее одиннадцатое число в строчке из файла	zzzetka	Помощь студентам	5	10.08.2010 16:17
Visual Basic последнее min число из вводимых чисел!	kenny91	Помощь студентам	10	06.06.2009 17:16

14.10.2012, 22:19	#3
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	Можно и один, просто написал имея в виду(период - с - по), а этот код куда вставляется ?

14.10.2012, 22:26	#6
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	phomm, А разве Now не берет значение даты из систем времени ?

14.10.2012, 22:27	#7
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	Аватар, согласен, только краска закончилась )

14.10.2012, 22:31	#8
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	LastDayInPrevMonth а переменная какого типа ?

14.10.2012, 22:36	#9
ins813 Форумчанин Регистрация: 18.05.2012 Сообщений: 111	phomm, LastDayInPrevMonth переменная какого типа ?