Формат даты в dbf таблицах

Вопросы программирования и использования среды Lazarus.

Модератор: Модераторы

Формат даты в dbf таблицах

Сообщение Sergey_Afanasyev » 10.10.2015 11:40:09

В программе на Лазаре для Windows дата в соответствующих полях dbf таблицы отображалась в полном виде чч.мм.гггг, как это и задается в установках Windows. При переходе на Лазарь для UBUNTU даты в этих полях приобрели сокращенный вид типа ч-м-гг. Как сделать чтобы дата отображалась в полном виде ?
Sergey_Afanasyev
новенький
 
Сообщения: 49
Зарегистрирован: 22.02.2012 19:30:27

Re: Формат даты в dbf таблицах

Сообщение Снег Север » 10.10.2015 13:19:51

задать в программе нужный shortdateformat
Аватара пользователя
Снег Север
долгожитель
 
Сообщения: 3053
Зарегистрирован: 27.11.2007 16:14:47

Re: Формат даты в dbf таблицах

Сообщение Sergey_Afanasyev » 10.10.2015 16:48:52

Т.е. где-то нужно написать: ShortDateFormat := 'dd.mm.yyyy';
или переправить переправить имеющееся определение. Так где и как это сделать?
Sergey_Afanasyev
новенький
 
Сообщения: 49
Зарегистрирован: 22.02.2012 19:30:27

Re: Формат даты в dbf таблицах

Сообщение Снег Север » 10.10.2015 17:31:34

Да, прописать
DateSeparator := '.';
ShortDateFormat := 'dd.mm.yyyy';

например, в секции initialize модуля формы или прямо в .dpr файле.
Аватара пользователя
Снег Север
долгожитель
 
Сообщения: 3053
Зарегистрирован: 27.11.2007 16:14:47

Re: Формат даты в dbf таблицах

Сообщение Sergey_Afanasyev » 10.10.2015 18:23:56

В файле проекта Kadstu.lpr было написано

{$R *.res}
Var DateSeparator, ShortDateFormat: string;
Begin
DateSeparator := '.';
ShortDateFormat := 'dd.mm.yyyy';
RequireDerivedFormResource := True;
Application.Initialize;

И это не помогло.

Тогда эти новые строчки были удалены и записаны
в событии OnActivate формы и это тоже не помогло.

Попробовал не объявлять
Var DateSeparator, ShortDateFormat: string;
тогда транслятор не пропускает
Sergey_Afanasyev
новенький
 
Сообщения: 49
Зарегистрирован: 22.02.2012 19:30:27

Re: Формат даты в dbf таблицах

Сообщение Снег Север » 10.10.2015 21:29:11

уберите из .lpr
Var DateSeparator, ShortDateFormat: string;

добавьте в uses
SysUtils,
и напишите так:
DefaultFormatSettings.DateSeparator := '.';
DefaultFormatSettings.ShortDateFormat := 'dd.mm.yyyy';
Аватара пользователя
Снег Север
долгожитель
 
Сообщения: 3053
Зарегистрирован: 27.11.2007 16:14:47

Re: Формат даты в dbf таблицах

Сообщение Sergey_Afanasyev » 10.10.2015 22:16:12

Огромное спасибо! Теперь получилось.
Sergey_Afanasyev
новенький
 
Сообщения: 49
Зарегистрирован: 22.02.2012 19:30:27


Вернуться в Lazarus

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 224

Рейтинг@Mail.ru