`
znhyz1
  • 浏览: 157979 次
  • 性别: Icon_minigender_1
  • 来自: 天津
社区版块
存档分类
最新评论

Delphi获取计算机名称及IP地址

阅读更多
function GetComputerName:String; //获取计算机名称
var
  wVersionRequested : WORD;
  wsaData : TWSAData;
  p : PHostEnt; s : array[0..128] of char;
begin
  try
    wVersionRequested := MAKEWORD(1, 1); //创建 WinSock
    WSAStartup(wVersionRequested, wsaData); //创建 WinSock
    GetHostName(@s,128);
    p:=GetHostByName(@s);
    Result:=p^.h_Name;
  finally
    WSACleanup; //释放 WinSock
  end;
end;

function GetHostIP:String; //获取IP
var
   wVersionRequested : WORD;
   wsaData : TWSAData;
   p : PHostEnt; s : array[0..128] of char; p2 : pchar;
begin
   try
      wVersionRequested := MAKEWORD(1, 1); //创建 WinSock
      WSAStartup(wVersionRequested, wsaData); //创建 WinSock
      GetHostName(@s,128);
      p:=GetHostByName(@s);
      p2 := iNet_ntoa(PInAddr(p^.h_addr_list^)^);
      Result:= P2;
   finally
      WSACleanup; //释放 WinSock
   end;
end;
分享到:
评论

相关推荐

    Delphi根据计算机名称获取IP地址..rar

    这个压缩包“Delphi根据计算机名称获取IP地址.rar”显然包含了一个使用Delphi编程的示例,该示例旨在根据给定的计算机名称来获取其对应的IP地址。这个功能在多台计算机进行网络通信或远程管理时非常有用。 获取...

    在Delphi中获取本机的IP地址和计算机名称

    在Delphi编程环境中,获取本机的IP地址和计算机名称是常见的网络编程需求。通过使用WinSock库,我们可以轻松实现这一功能。WinSock是Windows Socket接口的简称,它为应用程序提供了一种标准的方法来实现网络通信。在...

    Delphi2009通过计算机名称获取IP地址

    本程序可以通过计算机名称来获取相应的IP地址,是在Delphi2009环境下编写的

    DELPHI获取网卡信息和IP地址

    当我们需要在Delphi程序中获取计算机的网络接口卡(NIC,即网卡)信息和IP地址时,可以借助Windows API函数或者第三方库来实现。这篇内容将深入探讨如何使用Delphi来获取这些关键网络数据。 首先,我们需要了解...

    delphi获取Mac物理地址以及计算机名用户名IP地址CPUID等源代码分享

    5. **IP地址**:获取计算机的IP地址可以使用`GetHostByName`或`GetHostByAddr`函数,它们是Winsock库的一部分。也可以通过`GetAdaptersInfo`或`GetAdaptersAddresses`函数来获取网络适配器的IP配置信息。 在Delphi...

    Delphi获取本机IP、名称、网卡MAC等信息..rar

    接下来,获取计算机名称可以使用`SysUtils`单元中的`GetComputerName`函数: ```delphi uses SysUtils; var ComputerName: array[0..MAX_COMPUTERNAME_LENGTH] of Char; Size: DWORD; begin Size := MAX_...

    delphi扫描局域网IP和计算机名称&网卡MAC码

    3. **获取计算机名称**:一旦确定了活跃的IP,你可以使用`WNetEnumResource`或`Netapi32.dll`中的`NetServerEnum`函数来获取对应的计算机名称。这些API函数会返回网络上的资源列表,其中包括计算机的名称和类型。 4...

    Delphi根据计算机名称获取IP地址

    摘要:Delphi源码,系统相关,获取IP Delphi根据计算机名称获取IP地址,相对时间较早的一个Delphi获取IP的程序,在Win7和Vista上是否能获取掉IP没有测试,目前在XP上可以获取到,真心想借鉴的要仔细看代码,部分代码是...

    获取本地计算机的名称和IP地址

    本篇文章将详细讲解如何使用Delphi来获取本地计算机的名称和IP地址,这对于系统管理和网络编程是至关重要的。 首先,让我们了解计算机名称。计算机名称是操作系统为本地机器分配的唯一标识符,在网络环境中用于识别...

    Delphi获取本机所有网卡MAC和IP(支持多网卡).rar

    在IT领域,尤其是软件开发中,经常需要获取计算机硬件的相关信息,例如网络接口控制器(NIC,也称为网卡)的物理地址(MAC地址)和IP地址。Delphi是一款流行的Object Pascal编程环境,它提供了丰富的库函数和API调用...

    Delphi取电脑名称IP.pdf

    Delphi 获取电脑名称和 IP 地址 Delphi 是一款功能强大的编程语言,可以用来开发各种类型...通过使用 `GetComputerName` 函数和 `GetHostByName` 函数,我们可以轻松地获取计算机名称和 IP 地址,并将其显示在界面上。

    Delphi取电脑名称IP.docx

    最后,我们在 btnStartClick 事件中调用 GetHostName 和 NameToIP 函数,获取计算机名称和IP地址,并将其显示在 TEdit 组件中。 使用Delphi获取本地计算机的名称和IP地址非常简单,只需要使用GetComputerName和...

    Delphi通过IP获取主机名

    这个例子聚焦于如何在Delphi中通过IP地址获取主机名。主机名是网络上设备的唯一标识符,通常与IP地址关联。下面将详细解释这一过程以及涉及的相关知识点。 1. **IP地址**: - IP地址(Internet Protocol Address)...

    用Delphi写的获取本机IP和机名

    在本文中,我们将深入探讨如何使用 Delphi 编程语言获取本地计算机的主机名和 IP 地址。这个过程涉及到 Windows API 函数的调用以及网络编程中的基本概念。 首先,Delphi 是一种基于 Pascal 语言的集成开发环境...

    Delphi获取电脑硬件信息(DLL方式),BIOS、CPU、网卡、硬盘序列号

    总结,通过Delphi和DLL,我们可以高效地访问和获取计算机的BIOS、CPU、网卡和硬盘序列号等硬件信息。这种方式使得代码更加模块化,方便在多个项目中复用,并且减少了对操作系统直接调用的复杂性。在实际应用中,还...

    扫描局域网IP和计算机名称&网卡MAC码

    "扫描局域网IP和计算机名称&网卡MAC码"这个主题涉及的是如何在一个局域网内部获取其他设备的IP地址、计算机名称以及MAC地址。MAC地址(Media Access Control Address)是网络接口控制器(NIC)的唯一物理地址,而IP...

    Delphi自动获取IP上传到邮箱..rar

    标题 "Delphi自动获取IP上传到邮箱" 涉及的是使用Delphi编程语言来实现一个功能,该功能能够自动检测计算机的IP地址,并将这个信息发送到指定的电子邮箱。Delphi是一款强大的Windows应用程序开发工具,基于Object ...

    delphi获得ip地址源代码,换积分mac.rar

    标题中的"Delphi获得IP地址源代码,换积分mac.rar"揭示了这是一个使用Delphi编程语言编写的程序,其主要功能是获取计算机的IP地址。Delphi是一种基于Object Pascal的集成开发环境,常用于创建Windows桌面应用程序。...

    Delphi 获取真实物理网卡地址

    对于使用Delphi编程语言的开发者来说,"Delphi 获取真实物理网卡地址"这个主题涉及到的是如何通过编程来获取计算机网络适配器(即网卡)的物理地址,也称为MAC地址。MAC地址是一个全球唯一的48位标识符,用于在网络...

    Delphi读取电脑硬件信息及安装软件列表

    以下是一个简单的示例代码片段,展示了如何使用Delphi获取电脑名称和已安装软件列表: ```delphi uses ComObj, SysUtils; var WbemLocator: IWbemLocator; WbemServices: IWbemServices; Enumerator: ...

Global site tag (gtag.js) - Google Analytics