Формат даты в TDateEdit

[Climber]

Подскажите пожалуйста человеку, развращенному ораклом и не трогавшему Lazarus года три...
Как задается формат даты и можно ли его менять каким-либо простым способом? Сейчас попробовал использовать этот компонент в Убунте, там формат даты "DD-MM-YY", как поменять - не нашел, в поиске нашел рекомендации взять какие-нибудь сторонние компоненты...

[kosteek]

Код: Выделить всё

procedure TForm1.FormCreate(Sender: TObject);
begin
  DateSeparator:='.';
  ShortDateFormat:='dd.mm.yyyy';
end;

procedure TForm1.DateEdit1Change(Sender: TObject);
begin
  DateEdit1.Text:=DateTimeToStr(dateEdit1.Date);
end;


или

Код: Выделить всё

procedure TForm1.DateEdit1Change(Sender: TObject);
begin
  DateEdit1.Text:=FormatDateTime('dd.mm.yyyy',dateEdit1.Date);
end;

[Climber]

Спасибо.