Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.08.12;
Скачать: CL | DM;

Вниз

Системная дата и время   Найти похожие ветки 

 
omckma ©   (2002-05-15 10:41) [0]

Помогите!!! Как программно изменить ММ/ДД/ГГ на ДД/ММ/ГГ в виндах.


 
Zev   (2002-05-29 16:16) [1]

// установка в системе:
SetLocaleInfo( LOCALE_SYSTEM_DEFAULT , LOCALE_SSHORTDATE, PChar("dd.mm.yy") );

// установка в приложении
// в файле проекта

program P_Report;
uses
Forms, SysUtils, . . .
{$R *.RES}
begin
Application.Initialize;

DecimalSeparator := ".";
DateSeparator := ".";
SHortDateFormat := "dd.mm.yyyy" ;

Application.CreateForm(TF_Report, F_Report);
Application.CreateForm(TF_DM, F_DM);
Application.Run;
end


 
Ura   (2002-05-29 16:24) [2]

var NewTime: SYSTEMTIME;
TimeServer : TDateTime;
Year, Month, Day, Hour, Min, Sec, MSec: Word;
Error : integer;

DecodeTime(TimeServer, Hour, Min, Sec, MSec);
DecodeDate(TimeServer, Year, Month, Day);
NewTime.wYear := Year;
NewTime.wMonth := Month;
NewTime.wDay := Day;
NewTime.wHour := Hour;
NewTime.wMinute := Min;
NewTime.wSecond := 0;
NewTime.wMilliseconds := 0;

if ( SetLocalTime(NewTime) = FALSE) then
begin
//OK
end
else begin
Error;
end;


 
Ura   (2002-05-29 16:26) [3]

Сорри. Не то написал...



Страницы: 1 вся ветка

Текущий архив: 2002.08.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.015 c
1-35307
Alibaba
2002-07-29 17:21
2002.08.12
StringGrid


4-35489
Валет
2002-06-03 16:36
2002.08.12
Поиск в StringList


4-35497
HrUsT
2002-06-04 20:47
2002.08.12
SHFileOperation


4-35502
Pavlik Morozov
2002-05-26 13:44
2002.08.12
System Tray иконки


1-35269
V.Turecky
2002-07-31 12:53
2002.08.12
Информация о памяти.