"AND" "OR"
Главная Информер Журнал Форум

Как преобразовать строку в дату.

Компилятор: Delphi

Функция StrToDate преобразует только числа, поэтому, если у Вас месяцы в виде имён, то прийдётся использовать VarToDateTime.

Пример:

  var
    D1, D2, D3 : TDateTime;
  begin
    D1 := VarToDateTime('December 6, 1969');
    D2 := VarToDateTime('6-Apr-1998');
    D3 := VarToDateTime('1998-Apr-6');
    ShowMessage(DateToStr(D1)+' '+DateToStr(D2)+' '+
                DateToStr(D3));
  end;