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

Вниз

Перевод строки в дату.   Найти похожие ветки 

 
r9000   (2006-11-24 09:45) [0]

Добрый день!

Пытаюсь перевести строку даты в дату
dataglobal0:=strtodate("01.01.1900");
если русская настройка, то этот код работет, а как сделать чтобы в этой пременной содержалась данная дата вне зависимости от региональной настройки?


 
ORMADA ©   (2006-11-24 10:14) [1]

по отдельности день месяц год, брать системный разделить даты DateSeparator и форматить всё это в строку


 
clickmaker ©   (2006-11-24 10:22) [2]


> как сделать чтобы в этой пременной содержалась данная дата
> вне зависимости от региональной настройки?

SaveDateFormat := ShortDateFormat;
SaveDateSeparator := DateSeparator;
ShortDateFormat := "dd.mm.yyyy";
DateSeparator := ".";
try
 DateTimePicker1.Date := strtodate("01.01.1900");
finally
ShortDateFormat := SaveDateFormat;
DateSeparator := SaveDateSeparator;
end;


 
r9000   (2006-11-24 10:25) [3]

А можно напримере данном показать как это сделать?


 
Anatoly Podgoretsky ©   (2006-11-24 10:35) [4]

DecodeDate


 
r9000   (2006-11-24 11:23) [5]

Спасибо
SaveDateFormat := ShortDateFormat;
SaveDateSeparator := DateSeparator;
ShortDateFormat := "dd.mm.yyyy";
DateSeparator := ".";
try
DateTimePicker1.Date := strtodate("01.01.1900");
finally
ShortDateFormat := SaveDateFormat;
DateSeparator := SaveDateSeparator;
end;

подходит
A как это можно сделать через DecodeDate непонятно?


 
Anatoly Podgoretsky ©   (2006-11-24 11:27) [6]

> r9000  (24.11.2006 11:23:05)  [5]

А посмотреть справку религия не позволяет.
DecodeDate избавляет от сомнительных операций с DateSeparator


 
r9000   (2006-11-24 12:23) [7]

Я посмотрел, но данный оператор разбивает дату на год, месяц, день,
например:
Present:= Now;
 DecodeDate(Present, Year, Month, Day);
А как быть в моем случае? Подскажите на примере если можно.


 
zdm ©   (2006-11-24 12:24) [8]

а не проще FormatDateTime("dd.mm.yyy",datetostr("01.01.1900")) ? или как угодно-"yyyy/mmm/dd" например


 
zdm ©   (2006-11-24 12:26) [9]

Прошу прощения
FormatDateTime("dd.mm.yyyy",strtodate("01.01.1900")) ? или как угодно-"yyyy/mmmm/dd" например


 
r9000   (2006-11-24 12:38) [10]

Так мне не строку нужно получить FormatDateTime("dd.mm.yyyy",strtodate("01.01.1900")), а дату строки "01.01.1900"


 
Anatoly Podgoretsky ©   (2006-11-24 13:16) [11]

> r9000  (24.11.2006 12:23:07)  [7]

Виноват, вместо DeoceDate использовать противоположную функцию EncodeDate


 
Anatoly Podgoretsky ©   (2006-11-24 13:17) [12]

> zdm  (24.11.2006 12:24:08)  [8]

Завязка на настройки, и ему не в том направление и не для того типа, за данный код компилятор серьезно обидится.


 
Anatoly Podgoretsky ©   (2006-11-24 13:17) [13]

> zdm  (24.11.2006 12:26:09)  [9]

Исправился :-)
Ну так вот у него проблема как раз с strtodate


 
r9000   (2006-11-24 13:30) [14]

Спасибо EncodeDate подходит


 
zdm ©   (2006-11-24 17:32) [15]

а у автора завязка случаем не на определенную БД?



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

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

Наверх




Память: 0.47 MB
Время: 0.039 c
15-1164028744
Prohodil Mimo
2006-11-20 16:19
2006.12.10
как настроить доступ к каталогам в MS Server 2003 ?


15-1163767455
mr1Andersen
2006-11-17 15:44
2006.12.10
Подскажите в чем может быть проблема.


15-1163945818
Логин
2006-11-19 17:16
2006.12.10
ПО для управления компьютерным салоном.


2-1164179823
Dima L
2006-11-22 10:17
2006.12.10
MDI интерфейс


2-1164018221
werb
2006-11-20 13:23
2006.12.10
Win32 console и сообщения





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский