获得主机名和操作系统(Delphi)
来源:互联网 发布:三星驱动下载软件 编辑:程序博客网 时间:2024/05/16 15:14
{判断是哪类操作系统}
function GetOperatingSystem: string;
var
osVerInfo: TOSVersionInfo;
begin
Result := '';
osVerInfo.dwOSVersionInfoSize := SizeOf(TOSVersionInfo);
if GetVersionEx(osVerInfo) then
case osVerInfo.dwPlatformId of
VER_PLATFORM_WIN32_NT:
begin
Result := 'Windows NT/2000/XP'
end;
VER_PLATFORM_WIN32_WINDOWS:
begin
Result := 'Windows 95/98/98SE/Me';
end;
end;
end;
{获得计算机名}
function GetComputerName: string;
var
buffer: array[0..MAX_COMPUTERNAME_LENGTH + 1] of Char;
Size: Cardinal;
begin
Size := MAX_COMPUTERNAME_LENGTH + 1;
Windows.GetComputerName(@buffer, Size);
Result := strpas(buffer);
end;
- 获得主机名和操作系统(Delphi)
- Delphi 实现获得主机IP地址和主机名
- 获得主机名和ip地址
- 获得主机名 和 IP地址
- 获得主机名和IP地址
- C++获得主机名和IP
- 获得本地主机名和IP地址
- [VB.NET]获得主机名和IP地址
- 获得主机的IP和主机名
- [Java] InetAddress 获得ip地址和主机名
- 获得局域网内IP地址和主机名
- 通过sql语句获得IP和主机名
- c python shell获得主机名和ip
- 返回主机名和Ip地址(Delphi)
- delphi如何获得当前操作系统语言环境
- java获得客户机ip,主机名,端口和用户
- .net 根据ip获得局域网主机名和物理地址
- Java-通过IP地址获得域名和主机名
- 巧记不规则动词
- asp程序错误详细说明例表
- 外部托拽文件时,在目标区域改变光标图像,实现部分区域可以拖放。
- java模式之单例模式:- Singleton模式
- 用Select对变量赋值的细节
- 获得主机名和操作系统(Delphi)
- JMail发送邮件代码
- 对一些时间处理的总结
- 五一记事
- Linux-C-Socket编程
- jsp页面url参数传中文乱码问题
- ComponentArt-TreeView,属性,中文,翻译
- 在 javascript 中常用的一些正则式
- 做好个人时间管理