如何检测Delphi程序是否在PlayOnMac中运行

Ive*_*aev 1 delphi wine delphi-xe7

我有一个Delphi应用程序,可以在MacOS 10.9.5 Yosemite下的PlayOnMac中顺利运行.

它具有最小化TrayBar应用程序的功能.由于Mac没有TrayBar的概念,如果应用程序在Mac上运行,我想禁用此功能.

检查Windows版本不是一个选项,因为PlayOnMac通过模拟Windows API并报告操作系统是Windows XP,很好地模糊了主机操作系统是Mac的事实.

我如何检测应用程序是否在PlayOnMac中运行?

RRU*_*RUZ 6

因为PlayOnmac引擎使用Wine,所以您可以尝试使用和函数在ntdll.dll模块 上搜索wine_get_versionwine_nt_to_unix_file_name方法.LoadLibraryGetProcAddress

另外尝试这些资源.