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.