Форум: "Система";
Текущий архив: 2003.07.10;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.008 c