Zitat von
iaby:
drückt mal strg+space und tipp dann mal
Win32 ein.
dann kommt da irgendwas wie Win32Version oder so, weiß es grad net.
ist ne funktion, die dir nen string zurück liefert.
wenn das dann "Windows XP" ist, handelt es sich auch um XP!
gruss,
iaby
Win32Version gibts bei mir nicht, aber ich lasse die Windows Version so ausgeben:
Delphi-Quellcode:
ShowMessage('Windows '+
IntToStr(Win32MajorVersion)+'.'+
IntToStr(Win32MinorVersion)+
' Build '+IntToStr(Win32BuildNumber)+' '+
Win32CSDVersion);
Mit dieser Abfrage kannst du also bestimmen, ob es sich um WinXP handelt:
Delphi-Quellcode:
if (Win32MajorVersion = 5) and (Win32MinorVersion = 1) then
ShowMessage('Windows XP '+Win32CSDVersion);
greetz
alcaeus