DateTimePicker - присвоение значения

[Dux]

Добрый вечер. Подскажите, что не правильно?

Var Date1: String;
Begin
Date1:='12.09.2010';
DateTimePicker1.Date:=StrToDate(Dat e1);
end;

Выдает ошибку - '12.09.2010' is not valid time

[Karabash]

StrToDate использует настройки "Языки и региональные стандарты" из Панели управления. Например, разделитель частей даты (DateSeparator). Которые могут не совпадать с тем что мы пишем в строковом представлении даты. Отсюда ошибки.
Если по каким-то соображением изменять настройки в Панели управления не представляется возможным, то в Delphi применяется глобальная структура TFormatSettings.

var
  Date1: String;
  FS : TFormatSettings;
Begin
  GetLocaleFormatSettings(0, FS);
  FS.DateSeparator := '.';
  Date1:='12.09.2010';
  DateTimePicker1.Date:=StrToDate(Date1, FS);
end;

Ясно, что при необходимости можно изменить и другие настройки в структуре TFormatSettings для локального применения.

[_SERGEYX_]

В некоторых СУБД (например, MySQL) формат даты "yyyy-mm-dd". Я иногда пишу так:

var df: String;

  df:= ShortDateFormat;
  ShortDateFormat:='yyyy-mm-dd';
  {...мой код...}
  ShortDateFormat:= df;