Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

Как изменить системную дату на компьютере с помощью Delphi. 


vpc_   (2002-03-29 23:44) [0]

Здравствуйте!

Поскажите, пожалуйста как изменить системную дату на компьютере с помощью Delphi?

Заранее Вам благодарен.



SDS   (2002-03-30 00:02) [1]

На что меняет этот код дату смотри сам :)

procedure TForm1.Button1Click(Sender: TObject);
var
s : _SYSTEMTIME;
begin
s.wYear := 2001;
s.wMonth:= 1;
s.wDayOfWeek := 1;
s.wDay := 1;
s.wHour := 0;
s.wMinute := 0;
s.wSecond := 0;
s.wMilliseconds := 0;
SetSystemTime(s);
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.025 c
1-32841           LiNkS                 2002-03-28 15:30  2002.04.11  
Что-нибудь типа ReadOnly.


14-32965          VAlekseyS             2002-03-05 09:43  2002.04.11  
Копирование каталогов


1-32720           vlv                   2002-03-28 16:58  2002.04.11  
Где лежат изображения стандартных VCL - компонентов?


14-32942          SV                    2002-03-02 19:15  2002.04.11  
WinXP. Что дальше?


3-32654           Hermit                2002-03-19 18:07  2002.04.11  
BDE: Программная смена языка драйвера BDE