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

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

StrToDate [D7, WinXP]


Belkova ©   (2004-10-06 13:01:00) 

Мастера, Delphi. Подскажите , пожалуйста. Если в windows установлен  формат даты вида 'DD.MM.YY г.', то Функция StrToDate('12.09.04 г.') не работает. Если 'DD.MM.YY' то все в порядке.
Как-то можно учесть это в прогамме, не меняя формат, установленный в windows?


Belkova   (2004-10-06 13:17:00) [1]

Спасибо.


Anatoly Podgoretsky   (2004-10-06 13:16:00) [2]

begin...end ©   (06.10.04 13:13) [3]
Не пойдет, если пользователь изменит формат на dd.mm.yyyy г, то проблема, копировать надо через поиск пробела, функцией POS


begin...end   (2004-10-06 13:13:00) [3]

Text := Copy(EditDate.Text, 1, Length(EditDate.Text) - 3);
D := StrToDate(Text);

(Если они у тебя все в одном формате.)


Belkova   (2004-10-06 13:09:00) [4]

В прогамме пишется
EditDate.Text:=IBQuery['Dates'];
в результате в EditDate дата выводится с литералом.
в последствии Нужно из Editdate передать параметр
Выполняю D:=StrToDate(Editdate.Text);
в результате ошибка. Как убрать литерал?


Anatoly Podgoretsky   (2004-10-06 13:05:00) [5]

В StrToDate надо подавать только дату, литералы в формате только для вывода


Наверх

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