|  | 
 
 | 
| 
 | |||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
|  | 
|  | Опции темы | Поиск в этой теме | Опции просмотра | 
| 
			 
			#1  
			
			
			
			
		 | |||
| 
 | |||
|  Как из одной даты вычесть другую, чтобы получить период У меня на форме 2 DateTimePicker'а (начало и конец)...Как получить Период?????? | 
| 
			 
			#2  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 допустим, надо вывести результат на метку label1 , то label1.Caption:=inttostr(((DateTimeToUnix(DateTime Picker2.Date))-(DateTimeToUnix(DateTimePicker1.Date)))div 86400); результат-период в днях Последний раз редактировалось 008agent, 20.05.2009 в 20:33. | 
| 
			 
			#3  
			
			
			
			
		 | |||
| 
 | |||
|   Надо чтобы показывал....Сколько лет, сколько месяцев, сколько дней | 
| 
			 
			#4  
			
			
			
			
		 | |||
| 
 | |||
|   Можно вообще так???? | 
| 
			 
			#5  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 | 
| 
			 
			#6  
			
			
			
			
		 | ||||
| 
 | ||||
|   А как ты это себе представляешь? один год это сколько 365 или 366 дней? один месяц - 28 или 29 или 30 или 31 день? и как ты хочешь поиметь период в годах, месяцах и днях??? | 
| 
			 
			#7  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 повторяю . с днями и неделями просто. значения не меняются. неделя - 7 дней. вот и все а с годами и месяцами сложность | 
| 
			 
			#8  
			
			
			
			
		 | ||||
| 
 | ||||
|   008agent, когда я писал ответ твоего сообщения еще не было видно   | 
| 
			 
			#9  
			
			
			
			
		 | |||
| 
 | |||
|   А если взять всё по среднему Год - 365 Месяц - 30 ну и неделя - 7 | 
| 
			 
			#10  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 тогда намного проще | 
| 
			 
			#11  
			
			
			
			
		 | |||
| 
 | |||
|   Ну ты знаешь как это осуществить???? | 
| 
			 
			#12  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 для простоты ставь 2 метки, 1 скрываешь. можешь и переменную типа string использовать. осуществляется это так label1.Caption:=inttostr(((DateTimeToUnix(DateTime Picker2.Date))-(DateTimeToUnix(DateTimePicker1.Date)))div 86400); Label2.Caption:='прошло'+inttostr(strtoint(Label1. Caption) div 365)+' лет, '+inttostr(((strtoint(Label1.Caption) mod 365) div 30)) +' месяцев, '+inttostr(((((strtoint(Label1.Caption) mod 365) mod 30))div 7))+' недель и '+inttostr((((((strtoint(Label1.Caption) mod 365) mod 30))mod 7))div 1)+' дней'; лучше переменную юзай | 
| 
			 
			#13  
			
			
			
			
		 | |||
| 
 | |||
|   Спасиб...всё работает...проверил | 
| 
			 
			#14  
			
			
			
			
		 | |||
| 
 | |||
|   Цитата: 
 рад стараться  |