//声明:
GetVersion: DWORD;

//举例: var d: DWORD; begin d := GetVersion; ShowMessage(IntToStr(d)); {170393861; 这是我现在使用的系统} end;
posted on 2008-02-07 21:50  万一  阅读(4221)  评论(0编辑  收藏  举报