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

Вниз

TDateTimePicker   Найти похожие ветки 

 
voe   (2004-07-15 16:09) [0]

Помогите. Нужно из TDateTimePicker вытащить месяць(название или номер месяца).
Можно использовать другой компанент? Есть ли для этого API функция?


 
Sandman25 ©   (2004-07-15 16:09) [1]

DecodeDate


 
voe   (2004-07-15 22:15) [2]

Я пробывал у меня что то не получается. Можно с куском кога?


 
Алхимик ©   (2004-07-15 22:41) [3]

Плохо пробовал. Есть правильный метод -
набираешь в IDE(там где собсссно текст программы) DecodeDate,
наводишь на это слово курсор мыши,
жмёшь Ctrl+F1,
читаешь описание функции,
если не понятно - тыкаешь ссылку "delphi exemple".


 
Almaz ©   (2004-07-15 23:29) [4]


> voe   (15.07.04 22:15) [2]
> Я пробывал у меня что то не получается. Можно с куском кога?

Плохо пробовали ;) Попробуйте так:

procedure TForm1.Button1Click(Sender: TObject);
var
 Year, Month, Day: Word;
begin
 DecodeDate(DateTimePicker1.Date, Year, Month, Day);
//  Year - год
//  Month - номер месяца
//  Day - день
end;


Удачи.


 
kaif ©   (2004-07-16 00:56) [5]

А еще посмотри модуль DateUtils (кажется так он называется). Там куча полезных функций типа MonthOf.


 
voe   (2004-07-17 20:04) [6]

Как сделать что бы в TDateTimePicker была текущия дата?


 
Cardinal ©   (2004-07-17 20:12) [7]

DateTimePicker1.Date := Date;


 
voe   (2004-07-17 21:15) [8]

НЕ ПАШЕт. Пишет ту дату которя ввереда ему. Но надо текущию!


 
GanibalLector ©   (2004-07-17 21:36) [9]

DateTimePicker1.Date := Now;


 
Cardinal ©   (2004-07-17 23:26) [10]

>НЕ ПАШЕт.

У меня "пашет"

>DateTimePicker1.Date := Now;

фактически делает то же самое. Берет дату из Now и присваивает
DateTimePicker1.Date. Если с "Now", то так:

DateTimePicker1.DateTime := Now

Устанавливает DateTimePicker1.Time как текущее и DateTimePicker1.Date как текущую. А в моем случае [7] изменяется только дата, как и просил автор.



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

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

Наверх




Память: 0.48 MB
Время: 0.022 c
14-1090096367
KilkennyCat
2004-07-18 00:32
2004.08.01
Встреча мастаков в 31-го в Выборге.


3-1089200786
stud
2004-07-07 15:46
2004.08.01
программное добавление юзеров и прав


1-1090323694
RustiK
2004-07-20 15:41
2004.08.01
Autosize of form


3-1089115453
Dzhon
2004-07-06 16:04
2004.08.01
Сохранение вложенного TDataSetField?


3-1089098006
TransparentGhost
2004-07-06 11:13
2004.08.01
Нужно ли отрубать всех пользователей при BackUp?