कष्टप्रद क्लिक ध्वनि TWebbrowser

Question

में मैं अपने डेल्फी अनुप्रयोग में एक TWebbrowser घटक उपयोग कर रहा हूँ, जिनकी सामग्री मैं प्रोग्राम के रूप में लोड:

(aWebBrowser.Document as IPersistStreamInit). 
           Load(TStreamAdapter.Create(aMemoryStream)) 

हर लोड पर घटक एक कष्टप्रद क्लिक ध्वनि पैदा करता है। क्या यह अक्षम किया जा सकता है?
टीआईए

Answer 1

URLMON.DLL में CoInternetSetFeatureEnabled प्रक्रिया को देखें, जैसा कि here दस्तावेज है। आपके ऐप के लिए FEATURE_DISABLE_NAVIGATION_SOUNDS को सक्षम करने से आपको वही करना होगा जो आपको चाहिए।

Answer 2

कोई भी मौका यह है कि यह विंडोज मानक "प्रारंभ नेविगेशन" ध्वनि है (देखें "नियंत्रण कक्ष" - "ध्वनि और ऑडियो डिवाइस")?

Answer 3

यह windows setting है। मुझे यकीन नहीं है कि आपके एप्लिकेशन को उस सेटिंग को बदलना चाहिए।

Answer 4

ठीक है, यहाँ मैं क्या करने की कोशिश की है:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
    Application.OnActivate := AppActivate; 
    Application.OnDeactivate := AppDeactivate; 
end; 

procedure TForm1.AppActivate(Sender: TObject); 
begin 
    with TRegistry.Create do 
    try 
    RootKey := HKEY_CURRENT_USER; 
    OpenKey('AppEvents\Schemes\Apps\Explorer\Navigating\.Current', False); 
    if ReadString('') <> '' then 
     RememberSoundFile := ReadString(''); 
    WriteString('', ''); 
    finally 
    Free; 
    end; 
end; 

procedure TForm1.AppDeactivate(Sender: TObject); 
begin 
    with TRegistry.Create do 
    try 
    RootKey := HKEY_CURRENT_USER; 
    OpenKey('AppEvents\Schemes\Apps\Explorer\Navigating\.Current', False); 
    WriteString('', RememberSoundFile); 
    finally 
    Free; 
    end; 
end; 

यह fugly है, लेकिन यह काम करता है। :-) जबकि मैं मूल रूप से डेवी के साथ इस समाधान से सहमत हूं, कम से कम इसका लाभ यह है कि अन्य अनुप्रयोग प्रभावित नहीं होंगे।
मैं इसे क्लिक अक्षम करने के लिए उपयोगकर्ता विकल्प के रूप में जोड़ सकता हूं, लेकिन व्यक्तिगत रूप से मैं वास्तव में इसे चाहता हूं!