попробывал по другому
-------------------------------------------------------------------------
1)поместите mozctlx.dll в папку Windows
2)запустите схему Она ниже
-------------------------------------------------------------------------
Внимание Если есть браузер мозел фокс могут быть ошибки
Add(MainForm,14780758,189,133) { Width=565 Height=294 Caption="Hiasm_mozctlx.dll" BorderStyle=3 Position=1 link(onCreate,9981358:doExistsKey,[]) } Add(StyleXP,6785869,189,84) { } Add(Registry,9981358,259,133) { Key="Interface{1339B54C-3453-11D2-93B9-000000000000}" Point(doExistsKey) Point(onExistsKey) link(onExistsKey,8132221:doCompare,[]) } Add(If_else,8132221,301,140) { Op2=Integer(0) link(onTrue,9841863:doMessage,[]) } Add(MemoryStream,4519903,476,154) { Stream=[ZIP0020000078DAED597D7014E7797FEE24D9020B59B1754675A9B31081E5188ED37D0286585F27432CC1C1E1537084E545B7E256DCEDAA7B7B08B9C62372BEC4EA552DD38F4C269F43C84C32F9A3CD74DA0E6D3E7CB148202D9E91DBD461268C8BA7B473AE68C21FC4A8ADCCF6F7BCBB7712085A77A67F348D179E7DDFE7797FEFF3F53EEFBBBBA7FE674F520D11D5822C8BE80CD95707FDF7D73CA8F1C37FD5487FB6E2F5B5675C7DAFAFDD9F52B3D298A11F36E48C342C6B9A6E4A8714C9C86992AA493D7BE252464F2ADE55AB56B63A3A267AA27FB063FDE3A50A9D73F94B4F8A3652DA2ADA23367F8FBF1414988F96D60979B8F431D13697B68B5673DA8744BB4F1D4EB1BEBBF91E8B12F5B9EAE88F8EFFAC1AEA656A5C7B9FEB5EA295601EB065BFFF106E4D2049B04DA2EFB6F345B4D8D2F38B8CDB810A6CB5B59BB136A2AFA1ED594F74CC4974AAE64E0E12D5BBE87F7EC1CF93FFC5B0D7548E996877D73B0EAD5C1A4455C5F35E23299B3251F30A2776C635DE8A83EB1D5E1B46832CF039C1B72CC395BC46D6182627D60EC7E6C377D06728691DC05E979D03A1EF9165B82EFAE0FA5FB98A3DADF5F932998D3B73EBD0AF3DDDE1A3A6B9D5A77AD0144A6663CCF2B449D4945FCF020A943A5E6BA0678A57CFF02294F7D4112506BEC7F591982E50C9B24629560ED4D9EC659B6D059B3FDBE20062AF965AA969C0F26C84562B575F0CF9D0B1D131EBCDD4775A9770CE942A5F0C0517C103D69B56A8095E599E2D123B7B9A5D34EBE0E35C833313984069E8B91FCDC0E513579BDDC2DD3A945622604D17AEBE675903B172BE961D6C48D8829815EA104AD7402964D76F0AD07355100B6215ACA7851D8A2EC4524FD2FD346085D660EED4F18514523B69799099A6ADC7174C9F33CDF24890C41C6ED4353060E5162C4FADC8053AF5E8B0FFEE255E77DC4314AFBAFDD3E9C22C2CC763E50B35158F666F777BBA50FA77E164E9DF447351B80C2F2B584F8F1D5CE93F84AA135055DCF13C64713BA5B74C6150CCFAC974F46295F10C724D9CDD5E28E5B643CDF905A1661BD4C4E3B7CCE5119E6B77CAAFC17AFE6C2B0AABAE1AE6272B71BA459C6738CE58E0A753D16B987593154F1D5C28BFE516D18A54FF1A0E0538DA0C475F857872C049F4C1856288F36BEE9F8E5E8BD9B3E1C7F518C02D009F8B5EE7534564BA6169CA1D28EC586F164A2F791CBEFC20DC2D940EDC5FD883795B0FD6DFFF721B3AD02671AA436D3E4E98E715681895A6A3B3484104FED8B3A7A2174F6DE462885E127ECF42FDECD4C11F5B9E63C03F313315BD6E6AD3D17988E72DCF8BC2FF79731019162B94BB6E792645599B0147567E04CA9F9839F052E3F4CB75AF4232B96530E77EA5C519769CB63CDB31AD189D878A627DCCDADB8CBEE8D457101CE3A138A7322ECA361E77B2894436D98934BD557045F1A8CB49E3F2929D6BC650ABC8896F31274BCD3D544929D70F527AEBFAE77788D325B7F10E1B3AB7BAFC8B059E936BB4CCD6DAF2ACBD26662D14CC8C52C56E107770C270A03433EA2A7FDDB281AB53E75B19D12334B7DA39755B976DD4892AEAE21D5167EA3A6812671EA00907FA68EAEA72E803096BB678ADF0EE8B75E59308B1F8C3E766C454B6F11B551BB4FEAE3666ACF59F8064073F94B38D372ED69CCD976A0BF487458ACDEC9DEE6BAD3FF10E0F6DE25BC165C3AE3E7EBE78B6E02ABE5DAC2F76D4C6662E58EB53BCF838D3395F5BEB76C2D24B5E6B15B7F9795771558C87574CADEAE3CCEE494DF276F0EC179E1C38BD9F85C8EBDC445EA253CC9D8EE156E66771EA4F57A3F751F4CED5B6D6429A221EFA575620CC1C987B924F03318D8B76EE4158F3B1B5C28FCC7BAD37C4407E138B6AB7D671937D0BC59A160F171EA303D5A74BBC78B03E51CC3514DE1D281E6FCAADC8EF600B34B7217FD365D6E56FBA73EB4E7DC2B6B3622011B766D16940A7EC16991631EC66FE119C7F9833156D80B2522E32108B97DF421D16DE653535B90D0C7AFDA69854B336DA903FDE40E6872ABAEB856E4C2E461B50A707E11C323CC61EEFD82F36C23DD6FA9D60531C4E4A88CCD686F297499C5533A25EDF804B372EFE7AE9C6C5033B67461B522D2881F2A7803817BDB205FD13C745935D975716A818BD522458BECF9A9DBB970BBCA894F3FD0B563E7AA576EEEFCB9FC634D6D1C63A3E66EBE8B07574BC5F1DFCE6845AEB63B777B65053F29478DB44CD344DA55B9BA6418F5FC6398C53634A29C78AD1857351EC3F3ED0E671AC264F337CA6D87F2D39B58ABB077807EF85C6A45479CFFDE0FAE5B97A1F250A82368052A0C4A3B6FC2F3610FD35E89BA0ABA03ED049D0CBA051D0B3A0CB1B6CEC35CC89E1BBA60BE407B581FE16B24BA02BA067C1DF44DB8C764D9B3DE75BE0BF0AFA6DC75E83D3EE4F2952BFFE829A4ECBD2B0AE99869E469B4B2725E75B32ADCB492509996128C3667AC22B898F4EFCB7618024738A64EA92CC1F9D47E5B49AC4A461D954750DA3AA7658CA8E29C3EA880A3523BA21994B4CA6E5093D674A69F590211BAA9295309E51B3599E35A2A6211831F48C049001E55953C62456EC5DB932A16655534A99E6D8B6CD9BC7C7C7BDAA9EF6AACAE69760FC88BC39635BA8B4DE949911D6556D5352193353883477080652BA6EB2353979541D56BC9575BA535EC6E5AC94D364CCE270B3A66E2822986AB4FAC8D2E096C5864F721E3694C36AD6342A99CCC8134B92C880949E35AB5FF5F896D7D8BF71D54C710A722323EAB0AA684028864895AE6579E6B8A19AC21F4341760EE83909B1F10AC1FDAC9A548CAA2AB6518949D786150971752633AAC66EC9262F912E294EA0EC22AC19136289935C0B00C869533134447D54494F4819FDA8728B567BE9907A54CC316F329D4671241D5EB0AAE6C49A95330AD625CDFEC10D16E91CC362DAEC2589A9C347A4710EEE96FA39849C2655AE4C1D1EC255B1164A72A3A4780F7BA5B6E16D834E010C02FAD8FB59D7A462429D634B14DE5D8BD559BA113DA725BD12A77C1C40EC9C711623FDE39A242FF16F0C4120342E43686263B6BB1C52C64B153BDD8E5F51C3D00DC47EBB7C4036781DA9BB2FBEAB67F0B7DA0381AD5DA160F7A6403014D8D4DEDEE3DFB435D0B575936FC9757C70971633F4E1B8621C558C809FBA54ADA7E2574C36F9FB89E2FA88392E1BCAA063907F63585C33BC0BF33A74EEDFC9D89E74BA5BD69ED1F878D8AD8F33FF946276A7E56C76CFA151E8B531FB44AD2B866DD7963DA319B74BF9B730CBFA025E79BEB2DA7EAA31FF0FE8FFE3EAE54FB91FAF5FECDFC499886F42EAD9B0287B18671BDE4BE93B4B702F3E6AFFAE125C82FB2164C7F8B79625B27A9C973DD22FC7D9FD4FD46B284A9F28C709F2BAFBB0160ED749F48E3BAE9851EDA86AE85A063B38819AE51AEFA4DFAB4963A3A3F080EA723D7517D497052AAD68407D9E51F1946E985C2BBBB1673B496159BF9ECCA5955E6C775B489FB3758FB107538CE0AAEB4C260D259B257A3ABA6F77B42FE0B7EBE992AB1F52F9B0D2A51FEBA467E2D17D9591F32E144E775ACF2A4F2B1334CF1C8249C8E99C120594DE66C99E3145C3300B2E08BCA1602F39923996ECCD29C6C4E2ACCE9E44676C57C5C628C577B27F08A817CF985D3D7DA849A0145BDE8F478D3E4C1DE0BA0C7D3CABF4EA46AF38A78089EF8CF655C278C79D51325905053FEF1AC213CAA4175D4319F98832C6DBEA06646369D5140C35D6D829C59E8E27BAF7457C42C31FBB47B08EBC164338834D6C8C0CBDEDCED80ED0F768484E8EE6B2E6D048523D4AA4D1D01066E99A724C35E9DBAE21A7F70B1A528E0DE3D13694C2619BC62EAFD46DE537D712EA29E9FC14C8F439F0DF009D01FDA499E83D509B8748065D80EC12E8675C838FF16C17B9A986969CE9EFE30C587E02DC6DFFFFAA5EDFC2A7ED1741AF80FA4041D01AD0E447A8690BE81B6BA9E9E4076FFAFF4F2F9758D816A2C9DBE52EFBE7FD65F215D8B8FC007E1E3BBAFE0E7FC7A8AF09E29EA0380DE11EA57DE8EDA23DB41BFC2EDC7BD1E7EBBBB53FBF49B4FC0F1E4FB20EE77C70DF369672F38C389964908A73E830B4A994C689B90BDC08E9FC7C17185FF55F900E893F53B408EFBB81C9E09F02BC4959D649EB20EF83E430C9D0C588319A10160E6394DF23FAD01F1673B2B86FC363BC9F62904AD44E5ED0667ACAE1FDE07DE0FB6E91B4F3B39B1EACDA1F83250D3676A3655FF8EAC7C80B229A34A412F03AE5804A823321D7D1E7AB4DC45189BB0794856FECEDD82D383FAD58824B800C2017C7638E84798E9BAFB09813835C87DD1CF49ACB66DE699E247CDA2572CAA3F6C862745BB0A24B73BC1F181916148CCBE81F112B717B0E2AB1EE71D64275F45662D2AAFA6DFB31813B2AF2A55017FC675C52D471FDB2B8EE9E7BD490D09710BE2DAF30A256519D76145C13E9DBD608A76AEDFFD92D8F0D7F09CD877C2DBE8FF81EF319BE09DFA77C277D7FE27BD5F703DF055F73FBC3ED1DEDB1F6E7DAC7DA0BEDBFDBFE37ED6FB4DF68BFCFFF803FE2FFB6FF9C7FD65FF6CFFB5D8170607BA03B7030900D7C26F0C5C0DF0556049B829B835B829DC18F0763C181E0678227839F0D7E29F85AF07C70367825F82FC16BC195A1A6D043A150E8895067480B99A11742BF139A0DBD15FAE7D0CF433742B5E186F0C3E10F871F0B87C2DBC2D1F0DEF0C1F068782C3C1E9E0C7F3AFCF5F05F863D117F644BA433D21B793AF29B91E39197237F1EF97EE47C643EF25EE4E35BEC42E0F36C4D480A6D0CF942BCF1D770C8BE6644BBC627F95A7D6DBE8DF81C09FA7E554FFCFF04CF5D5BF6] } Add(FileStream,10094159,532,189) { Mode=1 AutoCopy=0 Point(doCopyFromStream) link(FileName,4275142:Var2,[]) } Add(Dir,4082447,497,84) { Point(MyDocumentDir) Point(WindowsDir) } Add(StrCat,15362384,532,140) { Str2="mozctlx.dll" link(Str1,4082447:WindowsDir,[]) } Add(Hub,10197850,434,140) { OutCount=3 link(onEvent1,15362384:doStrCat,[]) link(onEvent2,12266426:doData,[(465,153)(465,209)]) link(onEvent3,4898339:doStrCat,[(458,160)(458,258)]) } Add(DoData,12266426,476,203) { link(onEventData,10094159:doCopyFromStream,[]) link(Data,4519903:Stream,[]) } Add(WinExec,15948660,532,252) { link(onExec,6421096:doMessage,[]) } Add(StrCat,4898339,476,252) { Str1="regsvr32 " link(onStrCat,15948660:doExec,[]) link(Str2,4275142:Var1,[(489,242)(575,242)(575,180)]) } Add(GetDataEx,4275142,532,175) { link(Data,15362384:Result,[]) } Add(Message,9841863,343,140) { Message="Для работы программы необходимо установить mozctlx.dll кантрол. Сделать это сейчас? (Install mozctlx.dll now?)" Caption="Hiasm_mozctlx.dll" Type=2 link(onMessage,1025132:doCompare,[]) } Add(If_else,1025132,385,140) { Op2=Integer(6) link(onTrue,10197850:doEvent1,[]) } Add(Message,6421096,581,252) { Message="Необходимо перезапустить программу. (You must restart the program)" Caption="Hiasm_ICQ_ActiveX" link(onMessage,14780758:doClose,[(626,258)(626,305)(177,305)(177,160)]) }
|