Форум: "Система";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];
ВнизИзменение системного времени Найти похожие ветки
← →
Freaky © (2004-01-13 21:31) [0]Люди, может кто знает, кинтье плиз код, чтобы можно было открыть диалог изменения даты/времени для любой версии Windows. Спасибо.
← →
DVM © (2004-01-14 00:43) [1]var
SysDir: PChar;
si : TStartupInfo;
pi : TProcessInformation;
begin
GetMem(SysDir, (MAX_PATH + 1)* SizeOf(Char));
GetSystemDirectory(SysDir, MAX_PATH);
ZeroMemory(@si, SizeOf(TSTARTUPINFO));
si.cb := SizeOf(TSTARTUPINFO);
if CreateProcess(nil,
PChar("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl"),
nil,
nil,
false,
NORMAL_PRIORITY_CLASS,
nil,
SysDir,
si,
pi) <> false then
begin
CloseHandle(pi.hThread);
CloseHandle(pi.hProcess);
end;
FreeMem(SysDir);
end;
← →
DrPass © (2004-01-14 00:57) [2]после отладки кода:
WinExec("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl", sw_show)
← →
DVM © (2004-01-14 10:45) [3]
> DrPass © (14.01.04 00:57) [2]
Могут быть проблемы с нахождением необходимых файлов в разных версиях Windows, лучше уж ShellExecute(), а не WinExec(). Хотя все эти варианты в результате все равно сводятся к моему.
← →
Freaky © (2004-01-14 14:56) [4]Спасибо.
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2004.04.04;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.03 c