auslesen der windowsversion

[NicoDE]

Zitat von Luckie:

könntest du mal die {$IFDEF}'s erklären

Delphi-Quellcode:

{$IFDEF CONDITIONALEXPRESSIONS}  // Wird $IF unterstützt?
  // (wenn nicht, dann kennt die Delphi-Version TOSVersionInfoEx
  //  wahrscheinlich nicht, im schlimmste Falle wird es in der
  //  Unit definiert und überschreibt die Windows.pas -Version)
  {$IF Defined(TOSVersionInfoEx)}  // TOSVersionInfoEx vorhanden?
    {$DEFINE TOSVERSIONINFOEX_DEFINED}  // merken :)
  {$IFEND}
{$ENDIF}
{$IFNDEF TOSVERSIONINFOEX_DEFINED}

Zitat von Luckie:

was das soll und warum die erste Funktion

Der Übesichtlichkeit halber (versucht die bestmögliche Version von TOSVersionInfo zu holen).
GetOSVersionText kann sich jeder selbst schreiben. Wer die Struktur selbst auswerten will, braucht nur GetOSVersionInfo.