2019年4月10日
delphi 判断端口(Port)是否被占用（转载）
摘要： function IsPortUsed(aPort: Integer): Boolean; var _vSock: TSocket; _vWSAData: TWSAData; _vAddrIn: TSockAddrIn; begin Result := False; if WSAStartup(MA 阅读全文
posted @ 2019-04-10 15:31 MasterQi 阅读(820) 评论(0) 推荐(0)
Delphi调用API函数获取Windows目录信息、获取System目录信息、获取Temp临时文件目录信息
摘要： var Str1, Str2: Array[1..Max_Path]of Char;//开辟缓冲区 Str3: Array[1..127]of Char; begin GetWindowsDirectory(@Str1, 256);//调用API函数获取Windows目录信息 GetSystemDi 阅读全文
posted @ 2019-04-10 14:38 MasterQi 阅读(743) 评论(0) 推荐(0)