Die Windows os Version erkennen
Diese kurze Funktion gibt welche Version von Windows zurück, die die Anwendung derzeit ausgeführt wird.
Typ
TWindowsVersion = (wvWin9x, WvWinNT, wvWin2k, WvWinXP);
GetWindowsVersion-Funktion: TWindowsVersion;
beginnen
Ergebnis: = wvWin9x;
Wenn Win32Platform = VER_PLATFORM_WIN32_NT then
Fall Win32MajorVersion
3..4: Ergebnis: = WvWinNT;
5: Win32MinorVersion von RS
0: Ergebnis: = wvWin2k;
1: Ergebnis: = WvWinXP;
Ende;
Ende;
Ende;
Die Windows os Version erkennen
Die Windows os Version erkennen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.
Diese kurze Funktion gibt welche Version von Windows zurück, die die Anwendung derzeit ausgeführt wird.
Typ
TWindowsVersion = (wvWin9x, WvWinNT, wvWin2k, WvWinXP);
GetWindowsVersion-Funktion: TWindowsVersion;
beginnen
Ergebnis: = wvWin9x;
Wenn Win32Platform = VER_PLATFORM_WIN32_NT then
Fall Win32MajorVersion
3..4: Ergebnis: = WvWinNT;
5: Win32MinorVersion von RS
0: Ergebnis: = wvWin2k;
1: Ergebnis: = WvWinXP;
Ende;
Ende;
Ende;
Die Windows os Version erkennen
By Wiezutun
Die Windows os Version erkennen : Mehreren tausend Tipps, um Ihr Leben einfacher machen.