Вот мультиэлемент для отключения щелкающего звука навигации в IE и обратного его восстановления при закрытии программы. Бывает нужен при использовании компонента браузер в своей программе. Кстати, подобный функционал неплохо встроить в стандартный компонент Браузер в виде свойства "отключить звуки". Add(MainForm,2953706,21,105) { Point(onClose) link(onCreate,3209486:Disable sound,[(60,125)(60,139)]) link(onClose,3209486:Enable sound,[(179,132)(179,146)]) } Add(MultiElementEx,3209486,189,133) { @Hint=#22:Disable IE click sound|17:18.06.2013 11-53|17:by Aziz from Baku| } BEGIN_SDK Add(EditMultiEx,127354,21,21) { WorkCount=#13:Disable sound|12:Enable sound| link(Disable sound,11994853:doEvent1,[(39,27)(39,55)]) link(Enable sound,5667001:doReplace,[(32,34)(32,146)]) } Add(Registry,3561841,91,63) { HKey=1 Key="AppEventsSchemesAppsExplorerNavigating.Current" Data="C:WindowsmediaWindows Navigation Start.wav" link(onRead,12048888:doStrCat,[]) link(Data,9073608:Var3,[(97,47)(195,47)(195,110)]) } Add(StrCat,12048888,147,63) { Str1="Disabled by Aziz " link(Str2,3561841:RData,[(160,54)(188,54)(188,103)(97,103)]) } Add(Replace,5667001,49,140) { SubStr="Disabled by Aziz " link(onReplace,12809272:doValue,[]) link(Str,9073608:Var1,[(55,110)(132,110)(132,89)(160,89)]) } Add(GetDataEx,9073608,154,105) { Angle=3 link(Data,12048888:Result,[(153,110)]) } Add(Memory,12809272,98,140) { link(onData,5788257:doData,[]) } Add(Registry,33819,196,133) { HKey=1 Key="AppEventsSchemesAppsExplorerNavigating.Current" link(Data,12809272:Value,[(202,124)(237,124)(237,180)(104,180)]) } Add(DoData,5788257,147,140) { link(onEventData,33819:doWrite,[]) } Add(Hub,11994853,49,49) { link(onEvent1,3561841:doRead,[(81,55)(81,69)]) link(onEvent2,3561841:doWrite,[(74,62)(74,76)]) } END_SDK
|