Текущий архив: 2003.07.10;
Скачать: CL | DM;
Вниз
WinXP Найти похожие ветки
← →
Ufo © (2003-04-28 09:47) [0]Какой код нужен для того чтобы программа шла только на XP.
← →
Babay © (2003-04-28 09:48) [1]проверить версию виндовс и ежели это не xp то зарываем прогу :=))
← →
jel © (2003-04-28 09:49) [2]GetVersion?
← →
Слесарь Матерящийся © (2003-04-28 10:10) [3]>Какой код нужен для того чтобы программа шла только на XP
Качественный, безглючный + Babay © (28.04.03 09:48) + jel © (28.04.03 09:49)
← →
DVM © (2003-04-28 10:18) [4]function IsXP: Boolean;
var
OS: TOSVERSIONINFO;
begin
OS.dwOSVersionInfoSize := SizeOf(TOSVERSIONINFO);
GetVersionEx(OS);
Result := (OS.dwPlatformId = VER_PLATFORM_WIN32_NT) and
(OS.dwMajorVersion = 5) and (OS.dwMinorVersion = 1);
end;
....
IF not(IsXP) then Application.Terminate;
← →
REA © (2003-04-28 10:33) [5]Сделать дистрибутив, в котором галочками отметить только XP.
Страницы: 1 вся ветка
Текущий архив: 2003.07.10;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.023 c
