Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.01.22;
Скачать: [xml.tar.bz2];

Вниз

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

 
john_mag ©   (2005-12-28 09:41) [0]

Доброго времени суток! Помогите перевести в string дату из DateTimePicker если FormatDate=dfLong. Использовал DateToStr, но результат "12.12.2005" при "12 декабря 2005 г.", а мне бы хотелось как оно выглядит на форме...


 
Johnmen ©   (2005-12-28 10:33) [1]

FormatDateTime+F1


 
john_mag ©   (2005-12-28 11:10) [2]

К сожалению результат немного отличается: "12 декабрь 2005", а хотелось бы если уж написано "декабря", то "декабря. Может что-то ещё есть?


 
Johnmen ©   (2005-12-28 11:28) [3]

>если уж написано "декабря",

Где написано?


 
john_mag ©   (2005-12-28 11:35) [4]

да я хочу взять дату из DateTimePicker, где более корректно.)


 
begin...end ©   (2005-12-28 11:52) [5]

> john_mag ©   (28.12.05 11:10) [2]

Можно использовать API-функцию GetDateFormat. Пример:

var
 ST: TSystemTime;
 D: array [0..20] of Char;
begin
 DateTimeToSystemTime(DateTimePicker.DateTime, ST);
 if GetDateFormat(LOCALE_USER_DEFAULT, DATE_LONGDATE, @ST, nil, D, sizeof(D)) <> 0 then
   ShowMessage(D)
end


Описание функции можно найти в MSDN или в Help -> Windows SDK.


 
john_mag ©   (2005-12-28 11:57) [6]

begin...end © Здорово работает, но если юзер в программе захотел исправить в DateTimePicker дату, а она должна будет напечататься в отчете, то как быть?


 
john_mag ©   (2005-12-28 12:02) [7]

Большое СПС! Разобрался! Нужно обработку сделать после изменения и всё отлично работает! Всё-таки API мощная весч!8-)



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

Форум: "Начинающим";
Текущий архив: 2006.01.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 5.382 c
14-1135508385
Kerk
2005-12-25 13:59
2006.01.22
RegExp выделение ссылок


11-1118072963
Ilnur
2005-06-06 19:49
2006.01.22
messagebox properties


2-1136353843
konrads
2006-01-04 08:50
2006.01.22
TQuery


5-1122596203
Fedja2003
2005-07-29 04:16
2006.01.22
Редактор компонентов 2


9-1123357108
DeadMeat
2005-08-06 23:38
2006.01.22
OpenGL поколечат в Windows Vista..?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский