Delphi数值转IP

本文整理自网络，侵删。

 
//数值转IP

function AddrtoIP(addr: Dword): string;
begin
  Result := format('%d.%d.%d.%d', [Lo(Loword(addr)), //最底位
    Hi(Loword(addr)),
      Lo(Hiword(addr)),
      Hi(Hiword(addr))]); //最高位
end;
 

相关阅读 >>

Delphi 获取窗体坐标

Delphi 解析json生成json

Delphi 检验指定字符串网址是否输入正确

Delphi inc函数和dec函数的用法

Delphi fdmemtable1内存表字段排序

sendmessage在结束进程上的使用

Delphi 计算农历的单元

高手谈做程序员的8大基本原则

Delphi hextoint

Delphi 给变量加引号

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi数值转IP