2013年10月31日
Delphi加载驱动
摘要： 1 program Project2; 2 3 uses 4 Windows, Native, JwaWinType, Unit_Driver; 5 6 function Is2KXp(): Boolean; 7 var 8 OSVer: TOSVersionInfo; 9 begin10 Result := False;11 OSVer.dwOSVersionInfoSize := Sizeof(TOSVersionInfo);12 if GetVersionEx(OSVer) then13 begin14 if (OSVer.dwPlatformId = VER_PLATFO... 阅读全文
posted @ 2013-10-31 17:15 Max Woods 阅读(915) 评论(0) 推荐(0) 编辑