Delphi取系统版本
摘要:
本来以为是个很简单的函数,发现对D的双精度小数还是不了解,做判断的时候貌似有问题,所以暂时没研究清楚,用一个曲折的方法写出function myGetVersion( ):Integer;stdcall; external 'kernel32.dll' name 'GetVersion';function GetWindowsVersion():LongWord;var j_i:LongWord; j_i1:Double; j_ls:string;begin j_i:= (myGetVersion() shl 16) shr 16 ; //SHL 左移... 阅读全文
posted @ 2013-07-14 02:18 shellcode 阅读(244) 评论(0) 推荐(0)
浙公网安备 33010602011771号