How to call NSBeep from Delphi

Question

I'm looking for a MessageBeep replacement on the OS X. It seems that the proper function to call would be NSBeep but it is not supported by XE2 RTL.

How do I call NSBeep from Delphi application?

Answer 1

It's just a plain C function:

procedure NSBeep; cdecl;
  external '/System/Library/Frameworks/AppKit.framework/AppKit' name '_NSBeep';