![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как выставить время? [D7, Win95/98]
DillerXX © (2003-12-04 16:50:00)
Как выставить время?
DillerXX (2003-12-04 20:50:00) [1]
Сенка б(в)ери мя(а)чь
DVM (2003-12-04 18:24:00) [2]
SETSYSTEMTIME, Логично да? :)
function SetSystemDate(const year,month,day:word):integer;
var D:TSYSTEMTIME;
begin
GETSYSTEMTIME(D);
D.wYear := year;
D.wMonth := month;
D.wDay := day;
SETSYSTEMTIME(D);
Result := GetLastError;
end;