delphi 如何在macOS上获取计算机的名称?

ewm0tg9j  于 2022-11-04  发布在  Mac
关注(0)|答案(3)|浏览(132)

如何使用 Delphi 在macOS上获得计算机的名称?
我试图在我的应用程序中自动获取并显示计算机的名称,但似乎无法让它在macOS上工作。我有它在Windows上工作,但无法让它在macOS上工作。

h4cxqtbf

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

6l7fqoea

6l7fqoea2#

这个库支持WIN和Linux,它可以和macOS一起工作。
https://github.com/RRUZ/tsmbios

h43kikqp

h43kikqp3#

在Posix.UniStd单元中使用gethostname()

相关问题