Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DateTimePicker


kingsoft ©   (2007-02-12 23:40:00) 

Всем доброго времени суток. Помогите решить проблему или намекните как сделать так чтобы: Есть 3 переменных, в которым я бы хотел присвоить, первой - число(день), второй - месяц, третей - год, Как это реализовать?


unknown   (2007-02-13 00:22:00) [1]


> MsGuns ©   (13.02.07 00:09) [3]

В этом случае DecodeDate отработает 3 раза.
Например
function DayOf(const AValue: TDateTime): Word;
var
 LYear, LMonth: Word;
begin
 DecodeDate(AValue, LYear, LMonth, Result);
end;


Зачем лишние телодвижения, если можно один раз сделать DecodeDate и
получить сразу Year, Month и Day.


MsGuns   (2007-02-13 00:09:00) [2]

uses DateUtils

DayOf, MonthOf, YearOf не требуют переменных.


kingsoft   (2007-02-12 23:56:00) [3]


> unknown ©

Огромное спасибо! Выручили!


unknown   (2007-02-12 23:51:00) [4]

var d,m,y:word;
DecodeDate(DateTimePicker1.Date,y,m,d);


Наверх

Титульная страница Поиск, карта сайта Написать письмо