如何从Delphi应用程序调用NSBeep?
procedure NSBeep; cdecl; external '/System/Library/Frameworks/AppKit.framework/AppKit' name '_NSBeep';