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 treeview基本用法

Delphi delete 删除字符串中指定的字符串

Delphi tidhttp获取软件版本信息

Delphi 调用js脚本

Delphi 导出excel报错：ole error 800a03ec

Delphi串口通信编程

Delphi vcl 在trichedit控件中设置wordwrap属性后无法自动换行的问题

Delphi 获取星期的函数

Delphi 隐藏桌面图标和任务栏

Delphi 字符转16进制、16进制转字符

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

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