Скачать: CL | DM;

Узнать ОС.   Найти похожие ветки 

← →
Andrey V. ©   (2003-12-29 10:49) [0]

Подскажите , как в программе, во время выполнения , узнать под какой системой работаем. Типа , если под ХР - делаем то-то,
а если под 98 - то это.
Заранее спасибо, по возможности бросьте на емайл.

---

← →
N169   (2003-12-29 11:58) [1]

Узнать мона через WinAPI с помощью ф-и GetVersionEx() или используя переменную Win32Platform из модуля Sysutils, как написано в справке:

Win32Platform is used to identify the type of Win32 platform the system is running. This will be one of the following values:

Value Meaning
VER_PLATFORM_WIN32s        System is Win32s.
VER_PLATFORM_WIN32_WINDOWS System is Windows 95.
VER_PLATFORM_WIN32_NT      System is Windows NT.

---

← →
tesseract ©   (2003-12-29 13:36) [2]

GetMem(Port,128);
tb:=GetWindowsDirectory(port,128);
tb:=GetVersion;
k:=low(tb);
if tb<$80000000 then
 begin
end; // winnt/2000/xp
begin
if k>=4 then
  begin
    // win95/98/ me  
   end;
end;

если нужна конкретная версия смотри Help по этим функциям

---

← →
Andrey V. ©   (2003-12-29 19:49) [3]

Спасибо я уже научился - если кому надо пишите отвечу.
Точную инфу о систеие дает комбинация параметров DwMajorVersion и DwMinorVersion (см.GetVersionEx)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



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