在 Pascal 中检索运行平台

Question

在Python我可以写

import platform
>>> platform.system()
'Darwin'
>>> platform.release()
'8.11.1'

如何在 Pascal 中找到我的系统名称和版本号？

Answer 1

可以使用操作系统 API 检索平台版本。可以使用条件编译检测平台和架构

{$IFDEF DARWIN}
// darwin specific code
{$ENDIF}
{$IFDEF LINUX}
// linux specific code
{$ENDIF}
{$IFDEF WINDOWS}
// windows specific code
{$ENDIF}
{$IFDEF CPU32}
// X86 specific code
{$ENDIF}    
{$IFDEF CPU64}
// X86_64 specific code
{$ENDIF}

阅读更多 here and here。

Answer 2

没有通用的方法，但是对于包括 OS X 在内的所有 *nixes，有 baseunix.fpuname

在 Pascal 中检索运行平台

Retrieve Running Platform in Pascal

pascal

freepascal

在 Pascal 中检索 运行 平台

Retrieve Running Platform in Pascal

pascal

freepascal

在 Pascal 中检索运行平台