delphiXE如何判断操作系统是win7还是winXP?

delphiXE如何判断操作系统是win7还是winXP?

delphi7的代码在XE上无效，没有那些函数，有哪位大大知道如何准确判断吗？不知道xe有没有这方面的函数 delphi7的代码在X