2012-04-23 73 views
14

打電話NSBeep我正在尋找一個替代的MessageBeep在OS X上看來,正確的函數來調用會NSBeep,但它不是由XE2 RTL支持。如何從德爾福

我如何打電話NSBeep從Delphi應用程序?

+1

什麼用['Beep'(http://docwiki.embarcadero.com/Libraries/en/System.SysUtils.Beep)呢?不過,我已經不知道他們用音符*在Mac OS蜂鳴常規功能有限*的意思是,這意味着它小於*嗶* :-)? – TLama 2012-04-23 19:47:44

+3

在我的情況下,這很可能是不夠好,但我想學習如何正確地添加在OS X上我自己的進口 – gabr 2012-04-23 19:50:38

回答

12

這只是一個普通的C函數:

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

謝謝!我幾乎得到它,但我錯過了外部的最後一個'/ AppKit',它不起作用。 – gabr 2012-04-24 05:46:06