Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.16;
Скачать: CL | DM;

Вниз

Перевод времени   Найти похожие ветки 

 
vova_vova   (2006-03-31 10:06) [0]

Добрый день! Мне нужно грамотно добавить н-ное кол-во времени к текущему (с учетом даты). Подскажите пожалуйста, как это сделать правильно... Спасибо


 
Ega23 ©   (2006-03-31 10:07) [1]

Сложение


 
vova_vova   (2006-03-31 10:16) [2]

Блин, очень грамотно... А день закончился? Ладно день, тут все понятно, а месяц, как мне узнать что это был последний день месяца?????


 
Сергей М. ©   (2006-03-31 10:20) [3]


> vova_vova   (31.03.06 10:16) [2]


В переменных каких конкретно типов ты хранишь текущую дату и "добавку" к ней ?


 
balepa ©   (2006-03-31 10:20) [4]


> vova_vova   (31.03.06 10:16) [2]
> Блин, очень грамотно... А день закончился? Ладно день, тут
> все понятно, а месяц, как мне узнать что это был последний
> день месяца?????

Тебе ничего не надо узнавать Ты главное Сложи


 
Sergey13 ©   (2006-03-31 10:22) [5]

2 [2] vova_vova   (31.03.06 10:16)
Ты бы как то почетче вопрос сформулировал. А то ты еще не знаешь при добавлении времени фазы луны. Может это тебя так же интересует?


 
vova_vova   (2006-03-31 10:25) [6]

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


 
balepa ©   (2006-03-31 10:26) [7]

procedure TForm1.Button1Click(Sender: TObject);
var
D: TDate;
 D1: TDate;

begin
 D:= StrToDateTime("10.10.06 00:00:59");
 D1:= D + StrToDateTime("00:00:01");
 ShowMessage(DateTimeToStr(D1));
end;

end.


 
vova_vova   (2006-03-31 10:28) [8]

Формулирую четче - знаю время сейчас (Now), надо знать скока будет (например) через 8 часов 42 мин.


 
Сергей М. ©   (2006-03-31 10:31) [9]

Храни в TDateTime.

var
 CurrentDateTime: TDatetime;
 TimeToIncrease: TDatetime;

..

 TimeToIncrease := 100 / 24; // + 100 часов к текущей
 CurrentDateTime := CurrentDateTime + TimeToIncrease;


 
Ega23 ©   (2006-03-31 10:35) [10]


> Формулирую четче - знаю время сейчас (Now), надо знать скока
> будет (например) через 8 часов 42 мин.


Прочитай про тип TDateTime


 
vova_vova   (2006-03-31 10:44) [11]

Все, все - уже понял... Спасибо большое всем, кто участвовал в направлении меня на путь истинный ;-)



Страницы: 1 вся ветка

Текущий архив: 2006.04.16;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.027 c
15-1143130099
Pazitron_Brain
2006-03-23 19:08
2006.04.16
Идеальная субкультура.


2-1144123128
Diller
2006-04-04 07:58
2006.04.16
Screen Shot


2-1143861647
Я туплю....
2006-04-01 07:20
2006.04.16
CITRIX


2-1143717287
fedpavel
2006-03-30 15:14
2006.04.16
DataSource


2-1143705165
Dyakon_Frost
2006-03-30 11:52
2006.04.16
Как перетащить форму, если нет рамки!