Форум: "Основная";
Поиск по всему сайту: 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.024 c
1-32752           michael_B             2002-03-30 17:48  2002.04.11  
Как отображать текст в TPanel или TLabel в несколько строк


1-32749           OlegR                 2002-03-30 15:33  2002.04.11  
Как прекратить обработку события?


3-32627           saf                   2002-03-18 20:18  2002.04.11  
QReport


1-32755           MaxSit                2002-03-30 12:56  2002.04.11  
QuickReport To Text


3-32696           kaif                  2002-03-21 10:59  2002.04.11  
Cached Updates update failed?