Delphi - Operációs rendszer verziójának meghatározása, avagy a TVersion komponens

forráskód letöltése
A TVersion komponens használatával egyszerűen eldönthetjük programból, hogy mi is az adott gépen lévő operációs rendszer típusa, verzió- és fordítási száma. A mellékelt példaprogram megnyitása előtt a Version.pas-ban lévő komponenst telepítenie kell a Delphi alá.

Az operációs rendszer típusa a Platform property-ből határozható meg. Értéke az alábbiak egyike lehet:
  • Win31 - Win32s a Windows 3.1-en
  • Win9x - Windows 95, Windows 98, Windows Me
  • WinNT - Windows NT, Windows 2000

A MajorVersion property-ből olvasható ki az operációs rendszer fő verziószáma, míg a MinorVersion-ból az al verziószáma.

A fordítási szám a BuildNumber property-ben található, míg a CSDVersion property-ből megtudhatjuk NT esetén, hogy hányadik Service Pack lett már feltelepítve, pl.: Service Pack 3, illetve Win9x esetén egyéb a verzióval kapcsolatos információ tudható meg, pl.: Win98 Second Edition esetén egy A betű látható.