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

Вниз

Работа с датой ?   Найти похожие ветки 

 
T10000   (2005-10-18 11:33) [0]

Существует поле Edit в него вписываеться дата, как к этой дате прибавить один день ?


 
Ega23 ©   (2005-10-18 11:34) [1]

Edit1.Text:=DateToStr(StrToDate(Edit1.Text)+1);


 
Leonid Troyanovsky ©   (2005-10-18 11:36) [2]


> T10000   (18.10.05 11:33)  
> Существует поле Edit в него вписываеться дата, как к этой
> дате прибавить один день ?


Преобразовав строку из Edit в TDate и прибавив к оному 1.

--
Regards, LVT.


 
pavel_guzhanov ©   (2005-10-18 11:38) [3]

var newDate:TDateTime;
begin
newDate:=StrToDateTime(Edit1.text)+1;
Edit2.text:=DateTimeToStr(newDate);
end;


 
T10000   (2005-10-18 11:38) [4]

спасибо щас попробую


 
TUser ©   (2005-10-18 11:40) [5]

> Ega23

У вас же на стенке висит :)


 
Ega23 ©   (2005-10-18 11:49) [6]


> У вас же на стенке висит :)


Не, ТАКОЙ изврат я давать не буду...
По крайней мере в конфе "Начинающим"...
:-))))


 
Skyle ©   (2005-10-18 12:50) [7]

У меня на стенке висит....
Однажды пришлось показывать и рассказывать про велосипеды....

Ужас....



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
4-1126704429
NikNet
2005-09-14 17:27
2005.11.13
Узнать куда путь куда обращ. Explorer?


2-1129547718
Parth
2005-10-17 15:15
2005.11.13
Консольное приложение: иероглифы


2-1129731750
-=SaM=-
2005-10-19 18:22
2005.11.13
Последнее неравная нулю цифра числа N! (N факториал)


2-1129548791
dreamse
2005-10-17 15:33
2005.11.13
Проблема с составлением фильтра


1-1129622152
Frozzen
2005-10-18 11:55
2005.11.13
xml и Oject Inspector