Add(MainForm,2953706,420,154)
{
 Width=497
 Height=353
 Ctl3D=0
 BorderStyle=0
 DragForm=0
 Picture=[ZIPE672020078DAEDDD0B7C93E5BD07F03FA022C690A61742C0299455944D9CD7462484A1E84741E7F4C88917DCC6BCCD34396DA3E21D868229B505A150691B145014C18AD4160EF2719E8A80D3214C4501CF51369DB7A9737AF4382F3DFFE779DE3779932669B17969127FFF376FD2A6699BF69BDFF33C79AF13CEFB5B655F1275EA4144C7F0EDFB7D88CEE4B90F1D2AEF5F1BE84B05169233DF29EBF8021B8D2EB2D3A99643E8E4810368ECC144AE430FA213EC563A65FC389A526CA3DF388982AE42BA8D6EE7EFE8A03B6826CF219AC59FCD220B55F36D35DFDE4945FCF950FEB890AAF8B68E7FC902BEBF91BFDE4887D37CCAE7FB8EA07B0F3F8AC23488EF73F2E34B78FE29DD433FE6EF3B8E6A068CE49F7312CFA7F1E72751759FB1B4A06F09FF9C9FD0C2C34BE87E7EDC121A4D0BE9645AD8C74D8B07BAA8A9DF49D4C41F37584FA0FABCE36871FE58FAFDF1442BF8F7AEE1B9996CF4203FA7E5FC9C56939D9EE4FB9EE4E7F314DF6EA401B49E9FF783FC3C1EE2DFD1CC3FBF996F1FA25379F6D0E37CFB18B9691DFFCE27E814FEBEB1FC3D27F1F39D4835077B69C1411368719FF3A86EC039B4B4DF99FCDC7E4161CB5954DFFF526A28F8379AD567062DEEF73B6A386C3A35165C47F7DB6FA147E95C5A76F0E5F4A0E3526AA1F1B496CEE3E73281E749FC7B2EA4E5FDAFA5E5036EA1E5F9BFA3FBCF217AE03CA24D57123DC7CFF7059E5FE6792FCFED3486DEE1DB0F78FE9CE76F848EC5421D4545D4316A14759C7C326DA1B3E879F2F2F79C4FAFD1E5B48DAEA43D740DEDA60A7A97AEE5EFBF9D3EA3203D1320DA3D83BFFFECB3A9E3E28BA9E39A6BA82318A43BFBDCC93ED534C73287AFAB29343044B359721635510DDD4BF714DD43F386CEA38643E6B0491DCF8DB4E8B0266AE08F9BFA2DA5B0750985EDE2F1CB795EC3732BCFFF49757D57505DFF35B4C8F21885FB3D404D7D57D392433752D3A055B4347F3D2D3A6611359ED2480F0C08D1B2C3EEA3E58E59F4484103FF9415F440FFC7D971353D54F4287B3CC91E1BF9676EE1793BBBFC896F77F0FC06BF765EA5EABE7BA97AC09B547FE8567EB66FF0EF7B99EE3B6427DD67D945E1C3F652E3A06DB428FF4D7EFC5F797E8F1FFF0EBFB2DFE3BFE35DFE0BFF977FDFE7B472D24A5A77D53ADA74D326FE5FDFC909A8E6B981E787795E4FCFF57B8E76F4DF41BB87ECA6AD7CCFEB3CEF29DE431D7DFFC81EBBE863FEFCDB833BA8C3BE8F3A1C1DF4D1CF3EA28E62BEF7D80EFA66CC37D471197FCDCFDF534BF4CF30D1C78F107DFB07B6D864A78F9F7653C74B6C327B36752C59421D2B57D2E6AACDF4E27D2FD22B0FBF427BD7EFA58E1AFEFE3A9EF786E8F3BD4DF4F6F36FD387AF7F489FECFB843E7BEF33FAE2AB0FA9E3DB77E95F5FBF4F5F7EFA257DF5F957D4D1D121F3FF1DEA8751B086350AD6E6557F547A2A0BAC3F3B15958ECA0AEBF7AE45F5BCB2C3FADDB7AF43F5B4B2C6FA4E540F2B8BACAF7B1BD593CA2AEB6BDF7B17F5BD2BCBAC0FFBFC33D4F7AC6CB33EF5D0AFBE4F7D9D86FA973E6569659FF5803E5FA2BE4F65A33581ED07638D5CC31A056B14AC610D6B58631C0E6BE41AD6C835AC610D6B58C31AFD35728D82350AD62858C31AD6B08635AC610D6B58C31AD6B08635AC610D6B14AC51B08635AC610D6B58C31AD6B086757AAD0F011B728D42AE51C835AC916B5823D7B046AE618D5CC31AB98635720D6BE41AB94621D72858C31AD6B08635AC610D6B58C31AD6B08635AC610D6B58C31A95D3D6FDC0865CA3906B14720D6BE41AD6C835AC0FB8F5416083350AD62858C31AD6B08635AC610D6B58C31AD6B08635AC610D6B14AC51B08635AC610D6B58C31AD6B08635AC610D6B58C31AD6B086350AD62858C31AD6B08635AC610D6B58C31AD6B08635AC610D6B58C31A056B14AC610D6B58C31AD6B08635AC610D6B58C31AD6B08635D8608D82354AD6D7B046AE618D5CC31AB98635720D6BE41AD6C835AC916B5823D728E41A855C23D7B046AE618D5CC31AB98635720D6BE41AD6C835AC916B5823D728E41A855C23D7B046AE618D5CC31AB98635720D6BE41AD6C835AC916BB021D728E41A855C23D7B046AE618D5CC31AB98635AC610D6B58C31AD6B046C11A056B58C31AD6B08635AC610D6B58C31AD6B08635AC610D6B58A3608D8235AC610D6B58C31AD6B08635AC610D6B58C31AD626D457B046AE610D6B58C31AD6E8AF618D5CC31AD6B08635ACD15FA3906B14AC610D6BF4D7B046AE610D6B58C31AD6E8AF618D5CC31AB98635728D42AE51C835720D6BE43A43ACDFFFDB3B7F9D05EB1F42AE83F5D68156AB3514B258ABF9EAE36FA097B3B90ED6D7D60E0CB17528E415570F432F8773DDD0501B626C8B90E6687F02BE5CCD75657D5363438DCCB52564E568AF0476AEE6BAA23E1C6E6AA895D8A2E68742F0CBCD5C5706EAD7AD5BD7D450135AB850463B3417AD788EE63A5056DFD222B0AB76EE53A3B32556043B3773ED17D62D2DDC8CCF7B4B6BC52DB0CEC95C07CA7CF5ADAD9CEC70636D350FC655B70DC05CCC7599CF2DAD5B442B6ED5DE62C33A17735DE6F338D99AB539D8357AAC619D8BB976963AEDC25AF4D8C29A736DA986752EE63AE0749C6753B9E646BC56C5BA7A2EAC7330D71EA763B0C1BA4A0EC291EB5CCC75C0EDBCC5A65BF3BBAE2A7D913800732DD701B7EBDC09CA5A0EC46B0786609DA3B9F6B99D33ED36631B2E5776C13AF7AC031E97E3269BC1BA01B9CE516BBFC7E31A6C8FB116E370AF15E3F05CB30E30B5F3569BCD163B0EE7367C21729D5BD67E8FDB5D2A9BF0E8385CF4D758969273D6DC80BB5DA5A7DB74EB16437F8D5CE794758053CDB13ED316DF865BB02C25C7ACFD6EB676953AECF1D6568CC373CCDAEFE254BB5DCE21B604B9C6F2F01CB2F695BA5C2ED984DBE3AC1B067A91EB5CB2F6394A05B6CBE574D862ACC5F270916B2BAC73C3DA63B73B9C12BB34C6BAC5D85F63DBC21CB076DB98DAE114D8A5A58EB85C0B6BAFD81D00FD75F65BBBD9D5AEB099DAA977D771EBAFD15F67BFB55BBAB2B5DD2982ED8C34E1466B8BDAA90BD6596C5DE6D46165AE25B5BDB3F5407D3F1F0066A97514DA16E9AFA32333E3F270B97DB805D6596A6D848E74D722D7F6186B350EB7EAFB600330CBACFDEEC179363125A276D893E55A1C620180BD661D0804FC7E7F595999CF37DE337EDCB8D34E1B3366CC51470D1D9A5FC0352C49151614E4E519436D636941ED348EC28DFDB555A6DA02EBDEB1F6BB1D058505C935B90A535AE7C5A75A48973AED9DAD1BB5EDCD60DD1BD6654E819594B330A5B5FC6A9E21D42AD56260C6B18E0ECD0CCB48ADDA6E9AB03EC0D66A5495CA5ACF75F25782DE86DB55A8D510BC34B60937ACFB40AE7BC35A1F3EB395B44EE8A992ABBE9CA00CD476BB31D5B143B34EDB915AB1FFF501B476471C84751E7B26D714970215F0F8CA53D6CA39926A575C138E5CF7A2B5DB165B4C969740B250D34CFCD508B59E692DD4AE54D603D15F1F506B8FAD53E525E394D4E2CB459DABA048A756CE4E3DD56ABD07FAEB5EB7F6D86D092BAF80F1E22F457A7F9C5F94A8F20D4332BDA7161B29C40DCD3AE7DA0BEB0360EDB1D9F58173E4624FCA999FAF8DB0F3F38776AAFCFC7CBBFE8E5A1F7ECBED51E4AA6BE4BA97ADCB44DB6A8F0C9C632A05A7DD61CF1F9CA88C9976E9D2628B942E720D6BD3ADCB643FAA951A393BEC72167724B0CC8F3CCCE118DC69D286DE916E5A6C51C893DCFA2889B5CA75086DB8D9D665227076D1BC3AA284C64AC299AA62FA6989ADBAEB94B9C6F1CDCCB60E680A512443A5C4940F48304532AD9855A5B496B9F6623D97C9D67E8F5488AD52C3B5F0763A3A6BAA5519892B1A69B7BB3BD6D82EE5405807C4BE74AED2A8B6F8B0345AC9388D0F288DBFC465DA13B5B6A7188763BB1473AD033EB18395EC4C0D15FB99128DC74CFCB8C8570CD2A204B6188623D7BD66CDD43E8F51DB259D22EF925C49395D5D9596688F47B3EEBABFB6621C6EA275B9CF27A8356C65DBFD726B53C2AFE8D0F2C5D4A5F540FDA41F38BF8B59D66582DAA7B7B1B1566A97CAC496BA668A8A245AE376BB52B5E155F280A4DC617F014173ACCBC57664BE482BABDBBABB579AA63BC1144116CEF23724CE754B5CAE2DA17F40D0146BA696D831DA89922901136AA628F1537D3E8F4F6BC593E6BAD5B83CDCFB11044DB1D6361055A5A36ACADDD18C4437C94549AB1F9EBCBF161B9C3546C6E1CF43D00CEB7241CDD86531D8FA9516CCE49C0AD29374D298D547EE84B9AE6B6D6D13D86179E62619ECF91034C35A6DF8AD95C6ED8B6982BB14D53D93979E6B4F64598AC17A0143B7B176B8B1461E54DA8281B839D6E54CCDD87E83B52FA65D8E4AA5B44C35451F92B00DBF7C850C768B766200AF189D61206E82B55FE53A865B1F49F9623A5B5F579A5D96D65F3B633737B34D7980A9DB7870D658E3D5DF6063209E7EEB4AB9F70E473B9A6ED173EB2DB321933D2D8FCF300E8F69C32F5C2AAD5BC58901B41DB02D1888A7DFBA42ECAA25B9A3DAC666B9ABC67BFFB823B98ED9AAEDFC3AEEADF9D212DDF1C38BC159FAAD03E53C05D4BE7991515AE751553AA0B55C97C66F6E663BE6BE0D6D6DC23ADC58A5EF808D256769B7AE2C57D27ABAA3AD789AA5B5962261AE7FB664539BEAB01B6AB4FDAF2DA11760987E6B3DD84A5BC34E57271DDF86ABF75C71B93EF9D167DA54B09BB437D8E26CB9304CB37585A8723DDC7A33EE2BF3995132D7EECEE3F01F5DB642B756478B97CB53D088A73BD71595466E7D84668EB4C44EF0FEBA68CAFD2CDDDED6B6659D5A9A6211DE7F0462DAAD15B7D6949B9A6B6D4557A7E566B6910B9E646A9E5AC2B5623F4DB54C1CC14EAB755093AE8C44DB1FB32624EDC14E3C38E3606F68E75CB76D08CBD59A7291B8652514D36C2D4B6BC7CDB5F6453756886DC36DB6E31ED9C8A96EE746BCA92614D2C7671F83319DD6C1CA60045B0F769989D8AA118F5F70663BE2AA156D32D8AD61B138455EAC5EAC0049AFB52C4D5B76D932D8E6B5E191C1594CAEF32F128B530CA333AB7C977DEFFF0132CDD632DB7A231E3033D7FA92B34E8DF84F2E5D2147679BB9C756AB3FE4023474D969B6AED4832D1B71F372ED8BD90A29D63AFFDF1F14D6EDED32D855B205E7685BE663306E46AE2B23A333F3629D6C4D579EEDA4051BDBF560572DA8924B4AA5389695A6B9BF0E6AD4E526B7E1A2CB76276CC47F346585CC75DBD696A6DAEA7A793824D96787567E845EBB2BEBF7F66F6CA677D87EB3739DA811CFCBCB3B7EF153EDA2366FE356FC89666D9305B13A7BFE3D2F403BED63B30A3510372DD71E7D1D76FC1153D87AD4D52BA475DB96F5DC8AEF6C966DB8455DCF9DFFC217E04E5B1B1E1D889BB93045DF6D2CAE111787592ABCF8914D12BB7D5B0B633FB1A65A2D29D55AF2D0FCE73FFAC71778C3DD636B89CD3DB6361037D13A3A3A8BE9B0C511B58EBDECC13669BDE515EEB2ABD636CBF55D566D75B65AD129DA75AFBEBC1CD5A99ABB61AD8667E6073BBA4F57CCFA0F79F8B4C2531E7D4605FB953D2D4D9CECB5D5217DFDA6BE6552947AAEBC7435CF354CFA7DF2D5639D1BEAC164999BE0CEB921FD00209690DA8D3C72CB5FB5F670169377AEF16FD1FE222D025EAF7C93DADC1DEB60F45D97A9833363876D6CC40B0A0B7FFCABD5AA157F76F79E96706DD59F775647362B55D4FA1F06EDE4DADDB10E6A0BC5CD5E9A9270870099EB61C75DBD62334BB7B73FB7FB0DD167EF7C734DC8D082AB7DB3B5A85B237B0DA4BED6D9B5CD533BDDDF83796EA897668BF6AF88CEA2C9B378E5BF259474FD752CB621D8E62E4E895FFF21723D6CD8F0298BD733F5B3A2197F53EC05B26CDF7FAF09856262ED55E072EB15B54D432F5CEB8D8B37FAFA09455E455E93E66882533C465C75C73AA8AD00518B534C6EC463DF626BD6C75CB2B4F5592E89BD21DC585BF5D6A7BBEA54A623B1560334B5DEB3B7AEA5A9BEEA55BD358C3619BD376BCFAC3BD6C1A01EEC32B35762C7F5D8A20D67EBE1175C52C7D8ED42FB9537B6AE6B6AA899B7EFD35DCBAAA32F694BF47FDDAB17FD2968EF14D495B63CA0F766EDC975CF3A826DEE7BECF860AB530F0C2F2939FE9279129B93BD75CFABE2D43E35F3FEBCEF2FBBEA234D984CB8376ADE5B176DD4A085D9ABAEBCB2ABE9A559BED4446BE36DEE8EB5C036798B8504BBFAD86DF9AA0D97D8F59B9E55EDF8B35B5FDDB02EDCD8505B53B36CED132FBFF572F3C2EA507473B48C286F5C87DDDBA5DAF23589F7FB4882ED377DF31423767E7E51D1A008F6AAA7DA559FDDDEBE6DDBFA75E1A686865AF69E57FFD8DA9D3BD72CACAEAEAECA8C4B5DF3DAB5CD6BD62C14277BCD80B93AC45950EF4E5675CB3A5869588D6DD206A586E529B215B7DB871E716C7171B1B42E39F1AA551BB466BCBDAD7DF3969675CCDDD8A8C0B9AA6A32A6E6CDABABAB5FBA705E554D664C7FF9E7AE6A99EDFAEE59070DEBB1CD1AA17962836DCF1F3AE18C138E2B1EA6927DC125CB366DD6922D771110C75209879B9A1A0539A3674CD5AACA98A753C38D8DEAE5EA13EE7F6D50BEFE86EB0DE3B340F4800B262E3C13C1B6DB8F9C30E99CB3461D2BAC5533BE71839E6CB5478838DF6698C133A99A6435F21CCE90A9B1A1465BCAF44457D637DC78E30DC664C76947AE7A3AC761DB6D0EB69E3CF9EC517A337ECC150B1EDBB45962B745B4E5E955B94147252DD696A78BB7C62F17D78F9762C09E7ED75D3746921DB3D38F7EF89C744D3E9FB115B73B8E9C38F9D793CF52CDB8C09E72E9EA879EDE1C0D765BABA68D4A5562203B50E4BABE4BEB1B67DF3D4760072B2A0CD1361C3A276DA5455B6FC6ED834F9F3869DAE4B305B64CF6D1174CB97CD58AF52AD8ED1A35AA8B121D9D3A98D4C224C7373334E2B33FF8F0EEE9C1D86807FC31E14E23B768C7B5034C3B185B267BC4080D9BB517CCDBF887FFDAD01669C4515D637343DE50D569396902EBE0F4BBFFFEF739D30D6BBDD4202D7A8C8D9E4ED18BAEADB5E3F6218C3DEDD7E79C306AC4700DFBE8F32F59B0FAF1C737B66ED89C05B96E69E9DEC35447D4DA621A76B889FB6C6BB2E3911A46E277DDFDE107B36F88ACF5D2F605891E6323AD25B5E53A2FAD199F3CEDB7D3A69E387AA4C42E39BAE4E85F5EF1ABCB162C5ABA7CF9C68D4F679EAEE6DB92601C61BCDB801CF7E84E9F267E19B4EC5FB01B6B0726CD754C2B7ED79CBB67DF78BD618576744F7C75E8859E5E477F94B6B846659BB51DA74F9C76F3ADB7DD3CF5C4912324B6AA0B7F3165CA5557AF5A5C9FFBB54CBF5DB6AC5E4EE2B26CD95279BD5F3FA93BD63C3E9B3E5DBDF30A46B62E2D8FE14E6B69DA3C22176FBE864CBA69E6EF67DEA169273CFFDFB04CAAE15AF187C5E2523CA8982F838A8F187444A48E3A6AE8917A8D89D6D83163C78E3D4DAF71A78D13E5E6D9336EFC788F36253A789C61C4A38E5466A8809A2295F0BC00310BCED422157D219AB66B76F4A82A69E7F67353CE2DB98CF6C45BFFB47DFBF699B75D71E2C892123DDCDABF33F34A8C2C781A9E99CF8D7BC19F273ADF4730495506A307D910DE3DBD1637B11739F4931DB76CC91D9366BCB463C74B77DC36F5A29123870F37242733AD33F87528C6B73F4F741E9F60D232EC9E6D52A9B65CD7B69F3E63C7EBAF6D7FF1B62B2F1A3D42FE2BC5244EB59E697346634BEB92927189CECF95DC5A6BC8B9E3EEE1A5BC2249A9356B91703BEC6366BCF63F7B77CCFCCD89A347CB7F64E1B0C24C2CFE8FCA4B614662CBEE6F983BD179F78229A3AD35E5E61573FB23DC4EBB63C8B9335E7A6DC74BDB6F9F3A625831FF5F0B326E62EB62A99CA12F43D9E014E6253C9F66D7D83DBF54440EC5639C2B2A0DE92E8B2E3C7538C6FCC78C19B7DE3AED8CA1438B86665C9D31EDE6DF4E3DE158F93ACCB02A2C1C3D75EAB0C2823C9BCD9FF03CB907003BF55411D9DA4DDB744544DCD9F9EC9E1952FCBC868C9938F1A7FC422CCAB0CB84DB5F7FFD1C75227A77E2F35F07536BA7A52A52CCF2686BB1BB81773ED74C26953A735D66BE0EF5ED361DC9CE6B6FBE75B01BB3DA8DD0B89E4D3BC279465D22CBF433AFC482E7C8C6F7C9AC530EC72BD332EF4F13A0B5EAE5995B66AD2BE8F1BA06B7CBD945AE532E56E98529A3AB22FAF6A43C932E32207E8F86ED4E619D54BB1253F6BC1C2BCACB7C0ADB9FD23AF5200D95F1255F81E57E5FA9D32EBBEB94D6D0CE7EEF8A8068C6EDEEAEADC19DEDD61CEC3277A9F3BB6E59833BBBB1CBCBCB3C6E5FB7ADC19DBD55511E28F3F8BFDB1F6B806771339E68BB14546E175BFF3FF03C22F6]
 Position=1
 Point(onKeyDown)
 Point(Handle)
 link(onCreate,5999758:doShadow,[(468,174)(468,194)(408,194)(408,209)])
 link(onKeyDown,2953706:doClose,[(463,181)(463,148)(408,148)(408,181)])
}
Add(InlineCode,5999758,420,203)
{
 WorkPoints=#8:doShadow|
 DataPoints=#6:Handle|
 Code=#15:unit HiAsmUnit;|0:|9:interface|0:|29:uses Windows,kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10:   private|10:   public |15:     Wnd: HWND;|23:     Handle: THI_Event;|22:     onShow:THI_Event;|52:    procedure doShadow(var _Data:TData; Index:word);|5: end;|0:|14:implementation|3:   |60:procedure THiAsmClass.doShadow(var _Data:TData; Index:word);|5:const|34: CS_DROPSHADOW=131072;//$00020000;|5:begin|37:   Wnd:=ReadInteger(_Data, Handle,0);|85:   SetClassLong(Wnd,GCL_STYLE,GetWindowLong(Wnd , GCL_STYLE) or CS_DROPSHADOW);//тень|4:end;|6:      |4:end.|
 link(Handle,2953706:Handle,[])
}