Форум: "Основная";
Поиск по всему сайту: 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.04 c
3-32614           Malder                2002-03-18 00:18  2002.04.11  
Такой чудной ошибки я еще не видел


1-32759           lipskiy               2002-03-30 20:14  2002.04.11  
Сложный вопрос-предложение. Помогите включить поддержку кириллицы


1-32790           madburro              2002-03-31 23:38  2002.04.11  
Help, please :)


14-32955          BJValentine           2002-03-01 16:04  2002.04.11  
Приколы ПО


1-32815           zje                   2002-04-01 12:07  2002.04.11  
Delphi6 и dfm (кодировка unicode)