Detectar la versión del sistema operativo windows
Este corto función devolverá qué versión de windows de la aplicación que se esté ejecutando actualmente.
tipo
TWindowsVersion = (wvWin9x, wvWinNT, wvWin2k, wvWinXP)
la función de GetWindowsVersion: TWindowsVersion
begin
Resultado := wvWin9x
si Win32Platform = VER_PLATFORM_WIN32_NT, a continuación,
caso Win32MajorVersion de
3..4: Resultado := wvWinNT
5: caso Win32MinorVersion de
0: Resultado := wvWin2k
1: Resultado := wvWinXP
fin
fin
fin
Detectar la version del sistema operativo windows
Detectar la version del sistema operativo windows : Multi-millones de consejos para hacer su vida mas facil.
Este corto funcion devolvera que version de windows de la aplicacion que se este ejecutando actualmente.
tipo
TWindowsVersion = (wvWin9x, wvWinNT, wvWin2k, wvWinXP)
la funcion de GetWindowsVersion: TWindowsVersion
begin
Resultado := wvWin9x
si Win32Platform = VER_PLATFORM_WIN32_NT, a continuacion,
caso Win32MajorVersion de
3..4: Resultado := wvWinNT
5: caso Win32MinorVersion de
0: Resultado := wvWin2k
1: Resultado := wvWinXP
fin
fin
fin
Detectar la versión del sistema operativo windows
By Consejos Y Trucos
Detectar la versión del sistema operativo windows : Multi-millones de consejos para hacer su vida más fácil.