Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / FormatDateTime / 7 сообщений из 7, страница 1 из 1
09.06.2003, 22:54
    #32180023
-=Extreme=-ShamaN
-=Extreme=-ShamaN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
Пишу:
Код: plaintext
FormatDateTime('"Date:" ddd, dd mmm yyyy hh:mm:ss "+0300"', Now))
Выдаёт:
Код: plaintext
Пн,  09  июн  2003   22 : 46 : 35  + 0300

Хочется:
Код: plaintext
Mon,  09  Jun  2003   22 : 06 : 36  + 0300


Как это сделать без использования массивов строк для месяцев и дней недели???
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2003, 00:45
    #32180045
KirillovA
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
... поменять locale settings своей системы.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2003, 00:56
    #32180047
KirillovA
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
а чтоб не извращаца - посмотреть сорцы и поменять ShortDateFormat и по моему LongDateFormat.... - короче переменные там есть такие которые при ините системы заберают инфу об етом ... и вааще - все в сырцах есть - поглади там все вроде понятно ...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2003, 01:17
    #32180054
KirillovA
KirillovA
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
гы.. поковырямшись на сон грядущий - нашел - DateTimeToString (то чо юзается твоей функциклой) в SysUtils - смотрите дальше и дышите глубжее....
и вааще юзайте сырцы - там в отличие от vs - все толково, сухо, по деловому и понятно... ))) гы вот я умный то после бутылки водки и десятка пиваса
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
10.06.2003, 12:57
    #32180435
-=Extreme=-ShamaN
-=Extreme=-ShamaN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
Ничего того, что указывало на формат даты я не нашел, что можно было бы легко изменить.
Я понимаю, что делать надо так:
Код: plaintext
1.
2.
SysLocale.DefaultLCID :=  1033 ;
 FormatDateTime('"Date:" ddd, dd mmm yyyy hh:mm:ss "+0300"', Now);

Но это тоже не помогает!!!
Если в системе (WinXP Pro English) сменить Standarts and Formats на English (U.S.), FormatDateTime возвращает нужную строку:
Код: plaintext
Mon,  09  Jun  2003   22 : 06 : 36  + 0300


Почему не работает SysLocale - я не понимаю! Помогите, плиз, только без "извращений"! :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.06.2003, 04:17
    #32180924
Dikobrazz
Dikobrazz
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
Глубже надо смотреть, глубже! Вот я, покопавшись немного в исходниках, понял, как это сделать. А именно - вот так:
Код: plaintext
1.
2.
  SetThreadLocale( 1033 );
  GetFormatSettings();
  Edit1.Text:=FormatDateTime('"Date:" ddd, dd mmm yyyy hh:mm:ss "+0300"', Now);
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.06.2003, 11:09
    #32181084
-=Extreme=-ShamaN
-=Extreme=-ShamaN
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
FormatDateTime
Видать не доглядел я....
Огромное спасибо, работает :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / FormatDateTime / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]