获取计算机名称的函数
2007-09-24 09:04
253 查看
function GetCompName: string;
var
lsComputerName: PChar;
liSize: Cardinal;
begin
liSize := MAX_COMPUTERNAME_LENGTH + 1;
GetMem(lsComputerName, liSize);
GetComputerName(lsComputerName, liSize); // 获得计算机名称
Result := lsComputerName;
end;
var
lsComputerName: PChar;
liSize: Cardinal;
begin
liSize := MAX_COMPUTERNAME_LENGTH + 1;
GetMem(lsComputerName, liSize);
GetComputerName(lsComputerName, liSize); // 获得计算机名称
Result := lsComputerName;
end;
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- C语言调用WindowsAPI函数获取计算机名称
- c#中获取cpu序列号、网卡mac地址、ip地址、硬盘序列号、登录用户名、pc类型、计算机名称、物理内存
- c#中获取cpu序列号、网卡mac地址、ip地址、硬盘序列号、登录用户名、pc类型、计算机名称、物理内存
- JAVA获取计算机的IP、名称、操作系统等信息
- PB从注册表获取计算机名称的代码
- 获取计算机的名称（方法二）
- c#中获取cpu序列号、网卡mac地址、ip地址、硬盘序列号、登录用户名、pc类型、计算机名称、物理内存
- js 获取函数的所有参数和遍历JavaScript某个对象所有的属性名称和值的方法
- C#获取当前函数名称
- 获取本地计算机的名称和IP地址
- 获取计算机操作系统名称和版本号
- 自定义函数//获取登录计算机用户的名称，获取计算机名称
- c#（WinForm）遍历局域网计算机（电脑）获取IP和计算机名称（转）
- JavaScript获取函数参数名称
- C#中获取CPU序列号、网卡Mac地址、IP地址、硬盘序列号、登录用户名、PC类型、计算机名称、物理内存，Singleton模式
- 【网络编程】调用GetNumberOfInterfaces()函数获取本地计算机的网络接口数量
- C#路径中获取文件全路径、目录、扩展名、文件名称常用函数
- 获取地区名称 Monxin专用（PHP代码函数）
- [Windows API 函数] WinAPI: GetKeyNameText - 根据键盘消息获取按键名称
- js 获取自己的函数名称的方法