Delphi如何获取本机IP地址

Delphi获取本机IP地址

//获取本机IP
function TKSMsgLog.GetLocalAddress:String;
typeTaPInAddr = array [0..10] of PInAddr;PaPInAddr = ^TaPInAddr;
varphe  : PHostEnt;pptr : PaPInAddr;Buffer : array [0..63] of char;I    : Integer;GInitData      : TWSADATA;
beginWSAStartup($101, GInitData);Result := '';GetHostName(Buffer, SizeOf(Buffer));phe :=GetHostByName(buffer);if phe = nil then Exit;pptr := PaPInAddr(Phe^.h_addr_list);I := 0;while pptr^[I] <> nil dobeginresult:=StrPas(inet_ntoa(pptr^[I]^));Inc(I);end;WSACleanup;
end;

Delphi如何获取本机IP地址相关推荐

Go 学习笔记（79）— Go 标准库 net（获取本机IP地址）
1. 获取本机 IP 地址 package mainimport ("fmt""net" )// 获取本机网卡IP func getLocalIP() (ipv ...
python获取本机 ip地址、mac地址（物理地址）、计算机名、硬盘序列号、CPU序列号、主板序列号、bios序列号、bios uuid号
文章目录 python获取本机IP地址.mac地址(物理地址).计算机名物理地址计算机名.ip地址硬盘序列号 CPU序列号主板序列号 bios序列号 bios uuid号 python获取本机 ...
快速获取本机IP地址AWK功能
有些时候,我们在应用中可能要用到通过linux命令来获取本机IP地址,方法有很多种,例如最常见的就是ifconfig 如果我想尽尽只获取IP地址,方法也有很多种例如:获取eth0的IP信息,利用cu ...
C#获取本机IP地址字符串
1 using System.Net;2 using System.Net.Sockets;3 4 /// <summary>5 /// 获取本机IP地址6 /// </summar ...
python设置本机IP地址、子网掩码、DNS，获取本机IP地址、子网掩码、DNS、MAC
python设置本机IP地址.子网掩码.DNS,获取本机IP地址.子网掩码.DNS.MAC main.py """=== coding: UTF8 ==="&q ...
Java 网络实例一（获取指定主机的IP地址、查看端口是否已使用、获取本机ip地址及主机名、获取远程文件大小）
获取指定主机的IP地址 import java.net.InetAddress; import java.net.UnknownHostException;public class GetIP {pu ...
java获取本机ip地址_代码片段：获取系统所有IP
问题在Windows系统中,可以支持多个网卡,比如有线的以太网卡,无线网卡,虚拟网卡等.如下图所示: 每一张网卡由不同的类型,也可以分别被用户启用或禁用. 对于单独一张给定的网卡,其IP地址可以是D ...
python 获取本机IP地址
方法一: 通常使用socket.gethostbyname()方法即可获取本机IP地址,但有时候获取不到(比如没有正确设置主机名称),示例代码如下: import socket# 获取本机计算机名称 ...
用java获取本机IP地址
在网上找了几个用java获取本机IP地址的代码,发现都少都有些不完美,自己整理了一下.突然之间很想把自己的IP地址给获取了,虽然用系统自带命令可以得到,但自己想写一个程序获取一下,到网上搜索了一下ja ...

Delphi如何获取本机IP地址

Delphi如何获取本机IP地址相关推荐

最新文章

热门文章