如何使用 Delphi 在macOS上获得计算机的名称?我试图在我的应用程序中自动获取并显示计算机的名称,但似乎无法让它在macOS上工作。我有它在Windows上工作,但无法让它在macOS上工作。
h4cxqtbf1#
此代码将检索macOS上的计算机名称:
uses Macapi.Foundation, Macapi.Helpers; function GetComputerName: string; begin Result := NSStrToStr(TNSHost.Wrap(TNSHost.OCClass.currentHost).localizedName); end;
如果您希望使用跨平台的方法,请参考GetDeviceName方法(之所以这样命名,是因为它也处理移动的设备),此处为:https://github.com/DelphiWorlds/Kastri/blob/master/Core/DW.OSDevice.pas
GetDeviceName
6l7fqoea2#
这个库支持WIN和Linux,它可以和macOS一起工作。https://github.com/RRUZ/tsmbios
h43kikqp3#
在Posix.UniStd单元中使用gethostname()
3条答案
按热度按时间h4cxqtbf1#
此代码将检索macOS上的计算机名称:
如果您希望使用跨平台的方法,请参考
GetDeviceName
方法(之所以这样命名,是因为它也处理移动的设备),此处为:https://github.com/DelphiWorlds/Kastri/blob/master/Core/DW.OSDevice.pas
6l7fqoea2#
这个库支持WIN和Linux,它可以和macOS一起工作。
https://github.com/RRUZ/tsmbios
h43kikqp3#
在Posix.UniStd单元中使用gethostname()