Вверх ↑
Этот топик читают: Гость
Ответов: 92
Рейтинг: 1
#1: 2019-12-10 19:40:29 ЛС | профиль | цитата
Подскажите, можно как то определенные слова в RichEdit выделять другим цветом?
карма: 0

0
vip
#1.1контекстная реклама от партнеров
Ответов: 8885
Рейтинг: 823
#2: 2019-12-10 21:19:24 ЛС | профиль | цитата
Vandjer, и цвет и звук


Add(MainForm,7038509,280,91)
{
Width=172
Height=256
BorderStyle=3
}
Add(Memo,16745362,371,77)
{
Left=10
Top=10
Width=140
Height=70
Strings=#16:Привет от HiAsm!|23:Конструктор super cool!|0:|3:\t@|
}
Add(Button,13234235,280,147)
{
Left=10
Top=90
Width=140
Caption="Do it!"
link(onClick,16426240:doEvent1,[])
}
Add(Hub,16426240,322,147)
{
link(onEvent1,5768648:doClear,[(733,153)(733,167)])
link(onEvent2,104405:doEnum,[])
}
Add(RichEdit,5768648,742,154)
{
Left=15
Top=120
Width=135
Height=95
Color=-16777201
Ctl3D=0
WinStyle=1
InsertCRLF=1
Point(doAddBitmap)
link(onChange,8802220:doProcessMessages,[])
link(Color,12482063:GetData,[])
}
Add(PlaySound,14309836,665,161)
{
PlayType=0
Sound=[ZIP6802000078DA3551B18ED4400CCD5151429596828E5FA00189D36E8BB48010C5DD81161171AB5D6D9489C6B2655B33CA448BEEB48740474173F535881A3E808E864FC877E049EE2699F8C97EF673ECE7F3C3C3A33B45F1F2C98B67CBD3FAC1BDA2280EECB9FFA818EF4171B778775C1F3F360E3313915DB3F61504114F1A90A4DFFA486D937610CE1A8AC3FCEFF0A31C7E95575E4B9A0DC3E2E96A28CBB9947F7EBF1EF6B393EFF4B0623DF9F7B3FA5AB95983CBEAFAFABDBBA0055C80FF8675F5F1EDE2D3A6EF28717DB46C5EC165EAF684BE79B3BEDCAF39F9D30D027C4EBB2FFB2DCAA691B4BB3A8B7EEB3E90E3F3F3149B66E55A27BD685CC7B8E2A0218982B6D859B73D0BB2C300A9D79D74C8C229085A82E7D0859810BC735E39F642D0D46D4B2C1AC803A126520D000C2831449184CC9151C9629E3D231A0B591555D9936F01B38080754C40D64AC766AD828804B63A8CE6340A831D1B2C8BD56A694CCB384F5DED351E639E3E9A0325FB32B61C634A8E61CE11CA62B6220EA660C64AC884685C9E29E43D8E9469A938D6B4E4510C79B279CF131A6B18CCC2E3419E926FBD7843BB8D8FF806DA3FF07FA4A7221A]
}
Add(PlaySound,11350300,469,161)
{
PlayType=0
Sound=[ZIP7F1D000078DA5D59CF8B1C4976D6DE7CB4FF00834FBED818CC62165F86F5B2DE611806812CDAA2A1698A364592A41382D8201CDAE898A850982008828424298A82A26904A21183400C622F6218F6E2830FBE2DBE18FF2BFEBEC86A8DB05A559D9D19F1E2FD7EDF7BF9ECABDFFC46FFF99327FFFC0F17FFB8FDD7DFFEC59F3E79F2E467F8F9B3BF7AD23E3F7BF2274FFE65F3DBCD3F618DFFFFFF1C3FF8F778FDD35FEBE5FAB7FBFCF6E7773F91719F7EB94FBFF0718F1BDAFF76C17BA1ADB0E7BB5C13D6DD163FDEDBCF0EFBE921D65A17B8C4191F572A317A177857B75DD6DA181A03C1BB4746F138B4CD3638DB8846DC6BEB4123364671DF0577FE67CFE77355FBB833EB67A6820FF81FFD676A7A1471E5D8AE14EC7A8A37E0002784F551C4EF108C5B0FF6D193BF47F98C01970112711FEFE1116E625FDB15AD8F3182671B1E2DE6A00C678C7367C5716B3BD835D1B90B7B5248D81782764D4E631BFF967AD42E1A8D1F49A6C1984F64D642B506AB83514E499E1970B39690123E609AE26845D5BBD89412680C70AF74B02007AE35D8E21565874C31D9909A6952749021380A4A55E04488469148AD29635598E55E6D46D0F2063C7139B4008D6AAD40023A33A09DE00A5064046339454A450DE274B2D9780F866A8762B01A1A84E4500E2452DAE247597049DDBBB3EFE1900413276AD18253FA494ACEB7D3A1CF82ADD1E09F6F7440180682C8D282BA85381A6C281B55740A4C2B6F820C7B1FC4A2AC342907928346C846D436FA1CF4ACA2E46E9A8E27CBA8275D5CA227382FADF0563A1DB435C1836032169670209C0C44CF2627D80E9BA75C420EC54BA5A0361A918E2EB90DCA852B651B612258166705E8354104283442F336E940B5079F29322DD4A202771C0E64AC35FD53EB54A7A3F85A8174E6C20CAD51DF508EA772E8445E27862B983441582FC0B1B7100B5CC0339330DA5AE99548A12453E5621628D1CDA20C708C3AEA216477F0750CD360B54885BE268384E60D3454226E502B29A6C96BEDA1547834CE1B4FB218BFDF44697DDAEED365721B6C3070A7128EDBB7DDFD68F6A13ECF498F69536F6C9050C0F1A8C3E16A1177C63C6CC27DAFCCFDD73F7EF3A1DF97A7FBAE7FB84EA39D84787FF9F0F4C38BEEFB2F7EF8E2A193D376BA9A5EC4837BBDF98F2F7FB8F86E33EFBB8FDD9DFCAE9F955A2E8FEE7839CEEE3AAB5ED8CD72552E1773B177DD552DEE38CE7B73BF07CFEFFD773E8FA5B7C38B8317973677DB7ADC4ED2983BD795A23BBB99F378514A16FA4EFC6ABF79FFD5F5D58550DFEDEB953F5DABF9C7F0FAE3FEDDDD87E9F59BBB32BD9DCAC55F862F7FB99157CF5EFCF5977FBFF4CB8FFEF5AF875FCB53DA889B8BE7EAAE1CD4767FFCCFB77FFC9FFEBF3FBC3DE48FEFEEFD1C44DA7CF885955FFFDDCDD5CDDB5FFE570C5FBF30DFF4D7FF7BD83C7DB8F87912EF2EFE707AAED3E9F278F7FE0B11C6512EDDC7939FDF7FFFF0C7F8C1CC37CFCCB85CBC4BF7DD7578FAF0DCA9E3C5901FD2F3E922FEE28597C2FCA1FFFDD73F26FFDDB31FBE32C5BDD773979E7FF345B8D6F532C78F378BCFEFC3A1FFD1BF1FDF1CBFCC7F137EFEECE98BA817F5D1BF2EF9FE50C6E34554A3FEB2FEBCBFCA0589EBEEC5C36571BD11D3D51B7D5FC5752C37779B6397E5C574B974AFCBBC0FEF6DECE654E71ACDF48515B3F355F8EDE9A2B363F4D3B3ADCD3A959AD3B43D88B9AFF5EAEDB8C0B5E52CF7E2A4B3DA1CC5BECB08727B823F563F8BE5644F3777A3F35B7B05FFBDDE23CEB6F16652F7488F767F952E4D9A433AE9073D7B3FDB451DBBC9D66C8A5AAEED6017FD462D7D1DC48D48FD71BB37B5C879381A1C344F6FC637F21ED94887CD244B87CC94AFE2C57C8D40ABE37EB31F10B97B7514A73E4865BB7C9D86245204B9839AFDBCAF551CCC2C7351F966BF8D9D715DDC1C6E728F78DD8FCB7044140EFE3A6C6B179C4CA2C8839D743A8ABC99066456B77543D93A9B663789454FDE2F6AE90E66317619A61EB4AD9FCDD4CD6A42B61FCB761AD34D6F61812AAB89492F431D1684B79EBA3A56268E93A8E382C81FF3308D336A813940BB15B9542EAA74C84B71AC721609C12B27330F4818760C025280A0238F19255346554484B170078F04B27692D091CAD125B54712451ECA504455283765985491A871882C3121195BFCC27939FA79840D150C5AE4D483A4D109D1378DA80845946D510994C7DAE531689D86DC559DACAA7A1EAB02D7B0221453AC297A3F4C7A76E0671927915100870C3A496937CEB8447ECA58BC17930949CDDD3414D4A5A18E730F11B32CFD3266E9BC28E3D44714B5B10C7B593534340DF35820BD8011C6247D82A2A6B1281764EDE73E4B502EDD222B32A6AA5D1D8AF25157B1573CCB4EE00717414D0274342ECA50A15BEF14960E0590492630825DDE4C721E279340196715D5164F43C52E180E72A81824E4EA8B0CB0CF00D70528C09AFD38491F74E562AC5179584411A8E675984535212A101449007AA47E12159282C38972217B8F338C87D36B0F9B69EFE8245070409862F10CC791759C0654A5A4F008CCA35C82EE5800186486BF648D420C61E06510071E34508732437608181005D3080FC21DF84B92287DF40538A95745C183405967A805468114E02F8367ACA9A0EC28609105171207C037A1E709FC650B67ABF43B6B13EF08D4D0086EAAC29AA4E10722A1FE8179E802F54765011775068B659128905154316B3AA4820C0AA53B8DB3AAB084C5C9381B96C82057605A83CDA2A228AA0CEB44729CE05FE4D84CA08CB8E0010860F067CA184770034BE82A03FC0094410E4848C38525A002B66AA81FFEADE1E6123804C6C6D98031780429A33351E26C8578CDD07226C2842E5484892003B006E003E4C4CFA70B200F3ED2484DD164C5233D98C005B05854098C836ED058A1084414EE012100A0C0BA30908583D84CF4D3F0097121EEE043E8C15581A80A891AD8034228DC213AC46205D4031C838805F0F42E2BAFD815809344248CC4005E088E5404651C100D32882726B4190895ED8522182394C3BDD03035F04ABB03164C03C409559A580C680DDCF132F011D680C94074C5BF98B62056062FAD4B81617D0202D384C9AD29A15C04B296CB891FC9A826DCD238241094796441CD4E079BB36B4D02D6608BB26442910AB259740D4DD33CC4C2DAEBA00CE11748BA44368A658F04680327F2005AD925EE014D68F4ACA4A888EB80B292218E5510A6352340989E52710FA01ABE9AC03839012F47A50979ABCECEC1136197C9C1ABFC5847F884C61908AA50AC479EEC27052088A68301A698912DF274A107C852B715B49DEBE31805322E7C10C6C16140F207E50B7851618CDD7209C386BEAA29D55490E90D4A691CE568AC027E84598C224AD70B1E6554B511B9B62F36799581E4018927CA0866AD852304A13580392C011D087A1EEA06A03D5C83E1E8E0A6E88434E28BF85FD3C5B80B76407964638596813E839687CE0445C32950A212413DA84810A653C073E87C584A512CEC0C00E722A242F21E4A01902B9CB6F57091F81CAE057345C25ABA2E57182BD9A012968379C3E8414062B505BEF6FC4AAEF935744C8302B93354C9806DDD0F82D4B0E7E379A8395E40AB09E1CC00411CC1770C0DDCBA65F63D8AFD347C10DE8CD6913EC528412C210AE06781AE94B26F9B917518E01E49A1750490D9B06F6A21041D67ECC9ECDBD77ECFB28B75D63D86065656A40E361A30220D89D049BCF4683D792A9B4B098785DAC13E524FF35CF44899410CA6A56D6ECE1882A288D2784800773850B36306F719A19FF3DAF595C0A6946D39B8475882556E8364681E40C29CFBF89C127D1FC758361D082866F558EC02E5BB54833682700967B327124949C9BE3AE768E09306325AF642EC0EA130345529517874449432C4294379138718684BA2ECC30648EE9BC3B0A8B7551E62DE6EBA7EDADEEFBBE3366D8EAFFDF3E4ABFDDEDEE401F93ECB6533CAD3625EFF6AB97CDA97E54ABD7DFBF1E6E1B94AFB411DDF2D57EF4E5B3BEABF95E2F9E5DDBD3BEDAFCD7CD0FDF4FBE5CDE935D8EDC66FBAFE525C849B2B7BE79F4DF510E7787A7F778A0FA319813B5F54DDC9613F6D37CA0BF430F954466800C1047CD8298D0E539AC1C92979A14FF0983B7D9873180FC7D3DD72DC2FF2E60AAE3B8E3737AED78340119A5D7153DEFB49DB4315002CE6C68F0C055151980E73A5ABD6C18C68B1819D4CBC09355456028DA6D1F6C98E2D9502A4C5540B953F080D603AA140C1F9625AF6875C17405F8BF265D829CF5ADC8C7ED47DF60BB35A8555C3EC1654C382FEDC04E05D24B60A3FA886FEE9F601E92008D539145CB805A235C69A33BCAC861961650E48448B56DBABA19328F5C948D9BBEB34E5A99CD264596CFD314CC8E7D60AA32A9CC5C42E096F46C70AEBA744175676D03DF296EE1D6711E015FE3DD73A193B009CC177B00FB98CBD33AA35A73F5900B920DD9B829F0A203286C1754AA134D4699F53AD2595B82F19B127C3A0070E77A4B11372579A128EB42C0D8C7A888EC4C39C8436C220CAA758A7142532F0388CCCA6CC5DE8990D533DF24B6A53267E3916078E40349DBBFD4294970AABF9AC8DE2C4C341CF89AD799BCE0090B67189467821143549336A2C638683959A0B4383B15072650D85F214CE92A22523456C80BF274E7290AAADA69A91D5E062B18590C94B758341A071528010F500FA526B2287CD563A34D03AE6C8580CB2CB8703BA6A56DF1B0148E397C35EB9D1A65435BA945CB1B8673D75D5148B3047E87242957265E1E534CD885866CE9BE4280CF48E040B1FF1424864D36CE013A066DD88023623CB0414AB10E0724EEC1DA76F328E39940909794144E1F0447013A41B90B9E0CBBE440222AB47A321AF02F0CF4CB150974B7962F6A3806DE487D428C5A039F6726E2EC47B707EC0055410C9E10DEC57A071383262C215141DA4A1C8FA87852C16AC0FC418A8941C29C2F9A461F16566D49A231ED489081A264389F05E941BD7100EE76596259B753FA25F621247E182B15BD169B0A6CDEE7C1B5C82170E024D9B30458E721B1DDA13E2111C7174C7795A206C002FC42358CBEAC591216A0F67952004CAD847E8C59C8F3AC6B2A12925CF6BC916EEA2E1AA0473609B33CD5676DB0C101ECC22E138A56B52532E97024B22C7CBAD2CD93620E6E8909ECF43E8AF2C06BC8F82AF09A01A904481776D32C6E13459E4933650733C9FE84053140245C611BCC2B6F13455D2A6D254CF3AA06E735A6A4F731D8BD9796ECB7DAC6E8DC3765C1B304302E21758605DECE90C646B553B0CDE467A6D244A05F3D4F3B038D26BD6BACCB5947A95975F641408C637F28D2DDAD6F3A4360364C6C6656C65BF8D9D69F1F3509DB1DA3CA02D26F936D82687E715EDA4D8765065EB656848993172B6EDBAC3356DF176E05C1C6CB54B8ED07D5CDF0EB4C5A12DF66DB33D2FF66D31796B2A72F454AE58A56EA3665AA04D9D916FDA0AA27C4EB6EDBA98F35F620BFF4879E56565CB3530EFCFE4BD3B8F4EC35986B343AD52D2C0AE2D26A2A46F85F696609DF8AF6F47421BDD07F7D9662A60758CC6CB6A8CF62AA3F1D2CC7CF689B698F2BA7652A063D89FCCC5D47E26BF925B55B4926B5213B07D3257582F57C6CF066DB3FAB6D9AC6F66ECCA965F7DDE7BF7C88B759FBCC19DAD7F7ED9D2E8ACEF683E6D7E3CA9AD588BCDA793ECA383FD64DB36A10FAEA928367D9E5D6765135AD8350B904DFBE877DCBCC3BEDDCEF3F90ED477AF78C7EF78D2EE9393F20D156DBBBE2B6A327031BFACC76E3CE7257798B347B355F4BB57AF707B07A220B46B949BCA5EADEFC676EBEB2252B6FF66DA7B2BE35FEDCE6FCCDC27B6B0E6D56EE75EBD6ACFF079B93240B65EBE6C1E6E57367117BFB0A79D070AFFBE6B529271EEE566AEDB9D65E06DE75F362977E70377BB55E3B72FD797597E77EB5ED24CB7678E57FE40E29652F3EECE9DF7357D363AB78FAF10DB0AACBD75FEF6F677B7A4B32A915FEDF2F6B651269D767EE075C01F20C915BBF31BB79F16F31B946F7F476AB74DD4DB7545B31C36D2F376BCDDCEFE8C8DF3FBBBDDD9CC4DC39E34CE6F293FAD68AFCDDABE95E7B515D8350BB4EFB05B6570DF7EEBFDB7DFFE1F4F249268]
}
Add(Application,8802220,791,154)
{
Wait=1
}
Add(Hub,1793128,616,154)
{
link(onEvent1,5768648:doAdd,[])
link(onEvent2,14309836:doPlay,[])
}
Add(Str_Enum,104405,371,154)
{
Delimiter=""
link(onEnum,7014564:doCase,[])
link(String,16745362:Text,[])
}
Add(Case,7014564,420,154)
{
Value=String(\n)
link(onNextCase,3049461:doCase,[])
link(onTrue,11350300:doPlay,[])
}
Add(PlaySound,14497380,602,224)
{
Sound=[ZIPBA04000078DA45545F68E2761CF7600F63EC617B1E833D5C59DBADA5EDD16E5CEF68AFB44ADBE3EACDEB8C522D49242A6D64D6B38A4948824662440D1A3111A3D4967AA516ADA8C55EB9BBD25A3C0F36D85E06638F7BDBDEF6BEFD4C77ECF3FDF3FBFEBEDF2F1F925F7EF97EB7ACD7373ED0E9CC8FBE5FC2F0E75F7CA2D3E9EE00F9F42B9D6677741FEA1CF07338017A188666356540446B762BB73B2D60589A1D384D1966D00F9641081CA831B7595653464B68A0DFFB01A9B6DCBA5B508094A2B5925606FB81851936C284C36C3802840903B601400894E3699663B908C93024190A51E8DC826DC78BE78F94FE392770341F632334165CFF92C43EBA0F437618C69C5B1EAF2F182269861352E5E3A4D8BE6C56F60ECF6A8A2CA592B128C3F89F2EE91F2C431622087BA2C5BA420749922482A14060D7EFF3ED00F1C3EBF3C36BB83340CB8D033519205D309310254956CB8707FB47F56AB5D668B63B9D66EBE2ECAC53AFD58E8F8F2B2F2A87FBE55249CDE773525A4C083C1761292A14F4EF842C21F5E3A10B689EFA6CE4E8647C3430B958DD1E7DE8A2D7D6EC7326276236B9B72DD013832BF4546F87607CD3E6B0A2DB9009C3100F0E414E1CC5FC6EF0DE2E9AC042EC76E9E71C15BAF783FCF9304D567E22A7ED44282189998252DA2F9D9E96EBAD56EFD7BFFEFCFDB757E77FFFD37DFDC72F57E72F1AB56C84E51219769723B6E8785AA1880C9F2C4B8A4A04D34525CE271529B37778522915F76B9583937AB375DA7EDDA8368E0F2A2FF664752F9B56B242468EF1295E10F8549815589AF6E2386AB343E675836175E5F1A3D987F373B30FBE5D58989A9E991C1F1B9F98181FBA3B327C776464687874786864ECEBB1A9F1C9E989A999D1A9FBF7BE999D995D5A58342C3F59339ACC56EBBAD104D9362C3604D980DD1E8FC71708117E025C0E4194B292922FAAF942A95CA91E55EBD593FA69BBDDBEB87C73D5BDBCEEBFBAEC5F76DF75BBBD7EBFD77BDBBBB9E9BFFB1104DD9B7EBFFFF6E6EAFAA60BB477FDB273710EF01248A7737ED66A359BAD7AAD5A3928E65539979324F0CD62F19810E7A23CC7852314C590344910BB8180CFEFF378718FDBE9401CC80682200E1471383097DBE571234E7473D30A41E66746A36975756569C5B0A85F5E5AD01B9657568D6B8F4DCF8CEB6693C56C8620ABC562B35A37EC362B0A6F222882A2182074C00E047500520CB53BB04DD4B1E97462EE2D007C1BC7B770AFC7E3F5FB77FDDE204590618A8A86D9682CCAF1713E2AC462F1B8108FC713C004414826E2E9544ACC4869299F95554551E49C2C4BD9B408AEBE9848A5122931994C8AC99428A6D3223858D09ACE64A49C9C11D362126445504A49609791321220C803140A6AB15854D5825A008C7939A70C584103A0100161023C428C8F45A3D1C1B945586D060CFE7192A2298AA2FF07F3DF5C783F2A56FF052379506C]
}
Add(Case,3049461,518,154)
{
Value=String(@)
link(onNextCase,1793128:doEvent1,[])
link(onTrue,16468417:doEvent1,[])
}
Add(Hub,16468417,560,161)
{
link(onEvent1,14258137:doFrame,[(592,167)(592,209)])
link(onEvent2,14497380:doPlay,[(585,174)(585,230)])
}
Add(InfoTip,8312484,511,133)
{
Info=#7:Picture|
Width=141
Height=137
}
Add(IconAnimation,14258137,602,182)
{
IndexArray=[]
Bitmaps=['Bitmap'=[ZIP4204000078DA8593CB6B135114C623BA96E042684DD2699AA4490AA2D5BF2095111457AE6B17715B57EA3F6037C28C9BBA0B8A21A2427D2CB4540DB420EA58AB4DA5B40D267D18CDA3B6A649CC74F29A7CDE3399E92349F1303FEEB9DFF9BE810BF7FA2EF98E98B4F231DC0CB3CE2113673A4C03367F7FB4C16EC1F85ACA1288F096C0AC680D4424464E47D235DE744059EFCF71B67BDF84CEA731F9F85406C7E68A30C76A30C76B5A4F1ACDACCCC3E0F6666DC179CEF6603E6409277162A9848E04D0C9A0B5E3A7BE92162D813CE4A58C91EF7AB820D8275370AEA970FD027ADEACC27AEEF63E1C4C73260117F3D827D3E80A2D0894E51E4779C7AB35F974BC8CB369E0E4DB467635B101A3A8278D666752C029E6758CFF90BB9F44F9EEB1B8D83FF30703EBD068CE36FF63E03734FA3F67611F8B89F6172BD2F965059737A161E49762192C7E4F6B506FE40D1F6528EB7899C80D6DA8B8BA05F8B7D072EE66C8435ECAF4B0AC732299BB965571BD80FF93DFED29E39C48E55CE175693855C148111891DB738BD622F679865365B8C219A9776A531C8C6D635481C65DA57106A31F2DB5D1188331199475BFCBF2BED9822CE66A0856A041DE60193BFB1D4DEFEFE46BF0450A722FCBD21D707F28084371058FCA753CAB01CFDB516DACE4B9C2BC9E8F79C1B87F9EE922E799FE1BF22F97102CAA785D47035547DF076515FE9512BC9F8A21CAEC7D037D3332C7102E2E2AF2CD640581828AF16A5D83FA1BC92A2EB099F7CBB6E065DE83DE61DF578567880C8991D39174ADE5FDFE0312CA9A71]]
Point(doIndexFrame)
Point(doFrame)
link(onBitmapFrame,5768648:doAddBitmap,[])
}
Add(Random,2561185,798,98)
{
Max=100000
link(onRandom,12482063:doData,[(837,104)(837,90)(739,90)(739,104)])
}
Add(EventFromData,12482063,749,98)
{
link(onEvent,2561185:doRandom,[])
}

карма: 19

0
Ответов: 92
Рейтинг: 1
#3: 2019-12-10 21:36:55 ЛС | профиль | цитата
Леонид, спасибо, но немного не то
Нужно выделить например только слово hiasm
Привет от HiAsm! конструктор super cool!

карма: 0

0
Ответов: 8885
Рейтинг: 823
#4: 2019-12-11 00:33:00 ЛС | профиль | цитата
Vandjer, а в чём проблема-то, парсите текст по словам
По словам


Add(MainForm,7038509,371,133)
{
Width=172
Height=256
BorderStyle=3
}
Add(Memo,16745362,448,119)
{
Left=10
Top=10
Width=140
Height=70
Strings=#17:Привет от HiAsm !|23:Конструктор super cool!|0:|3:\t@|
}
Add(Button,13234235,371,189)
{
Left=10
Top=90
Width=140
Caption="Do it!"
link(onClick,16426240:doEvent1,[])
}
Add(Hub,16426240,413,189)
{
link(onEvent1,5768648:doClear,[(438,195)(438,188)(858,188)(858,216)])
link(onEvent2,8193859:doEnum,[])
}
Add(RichEdit,5768648,868,203)
{
Left=15
Top=120
Width=135
Height=95
Color=-16777201
Ctl3D=0
WinStyle=1
InsertCRLF=1
Point(doAddBitmap)
link(onChange,8802220:doProcessMessages,[])
link(Color,35720:Value,[])
}
Add(PlaySound,11350300,567,203)
{
PlayType=0
Sound=[ZIP7F1D000078DA5D59CF8B1C4976D6DE7CB4FF00834FBED818CC62165F86F5B2DE611806812CDAA2A1698A364592A41382D8201CDAE898A850982008828424298A82A26904A21183400C622F6218F6E2830FBE2DBE18FF2BFEBEC86A8DB05A559D9D19F1E2FD7EDF7BF9ECABDFFC46FFF99327FFFC0F17FFB8FDD7DFFEC59F3E79F2E467F8F9B3BF7AD23E3F7BF2274FFE65F3DBCD3F618DFFFFFF1C3FF8F778FDD35FEBE5FAB7FBFCF6E7773F91719F7EB94FBFF0718F1BDAFF76C17BA1ADB0E7BB5C13D6DD163FDEDBCF0EFBE921D65A17B8C4191F572A317A177857B75DD6DA181A03C1BB4746F138B4CD3638DB8846DC6BEB4123364671DF0577FE67CFE77355FBB833EB67A6820FF81FFD676A7A1471E5D8AE14EC7A8A37E0002784F551C4EF108C5B0FF6D193BF47F98C01970112711FEFE1116E625FDB15AD8F3182671B1E2DE6A00C678C7367C5716B3BD835D1B90B7B5248D81782764D4E631BFF967AD42E1A8D1F49A6C1984F64D642B506AB83514E499E1970B39690123E609AE26845D5BBD89412680C70AF74B02007AE35D8E21565874C31D9909A6952749021380A4A55E04488469148AD29635598E55E6D46D0F2063C7139B4008D6AAD40023A33A09DE00A5064046339454A450DE274B2D9780F866A8762B01A1A84E4500E2452DAE247597049DDBBB3EFE1900413276AD18253FA494ACEB7D3A1CF82ADD1E09F6F7440180682C8D282BA85381A6C281B55740A4C2B6F820C7B1FC4A2AC342907928346C846D436FA1CF4ACA2E46E9A8E27CBA8275D5CA227382FADF0563A1DB435C1836032169670209C0C44CF2627D80E9BA75C420EC54BA5A0361A918E2EB90DCA852B651B612258166705E8354104283442F336E940B5079F29322DD4A202771C0E64AC35FD53EB54A7A3F85A8174E6C20CAD51DF508EA772E8445E27862B983441582FC0B1B7100B5CC0339330DA5AE99548A12453E5621628D1CDA20C708C3AEA216477F0750CD360B54885BE268384E60D3454226E502B29A6C96BEDA1547834CE1B4FB218BFDF44697DDAEED365721B6C3070A7128EDBB7DDFD68F6A13ECF498F69536F6C9050C0F1A8C3E16A1177C63C6CC27DAFCCFDD73F7EF3A1DF97A7FBAE7FB84EA39D84787FF9F0F4C38BEEFB2F7EF8E2A193D376BA9A5EC4837BBDF98F2F7FB8F86E33EFBB8FDD9DFCAE9F955A2E8FEE7839CEEE3AAB5ED8CD72552E1773B177DD552DEE38CE7B73BF07CFEFFD773E8FA5B7C38B8317973677DB7ADC4ED2983BD795A23BBB99F378514A16FA4EFC6ABF79FFD5F5D58550DFEDEB953F5DABF9C7F0FAE3FEDDDD87E9F59BBB32BD9DCAC55F862F7FB99157CF5EFCF5977FBFF4CB8FFEF5AF875FCB53DA889B8BE7EAAE1CD4767FFCCFB77FFC9FFEBF3FBC3DE48FEFEEFD1C44DA7CF885955FFFDDCDD5CDDB5FFE570C5FBF30DFF4D7FF7BD83C7DB8F87912EF2EFE707AAED3E9F278F7FE0B11C6512EDDC7939FDF7FFFF0C7F8C1CC37CFCCB85CBC4BF7DD7578FAF0DCA9E3C5901FD2F3E922FEE28597C2FCA1FFFDD73F26FFDDB31FBE32C5BDD773979E7FF345B8D6F532C78F378BCFEFC3A1FFD1BF1FDF1CBFCC7F137EFEECE98BA817F5D1BF2EF9FE50C6E34554A3FEB2FEBCBFCA0589EBEEC5C36571BD11D3D51B7D5FC5752C37779B6397E5C574B974AFCBBC0FEF6DECE654E71ACDF48515B3F355F8EDE9A2B363F4D3B3ADCD3A959AD3B43D88B9AFF5EAEDB8C0B5E52CF7E2A4B3DA1CC5BECB08727B823F563F8BE5644F3777A3F35B7B05FFBDDE23CEB6F16652F7488F767F952E4D9A433AE9073D7B3FDB451DBBC9D66C8A5AAEED6017FD462D7D1DC48D48FD71BB37B5C879381A1C344F6FC637F21ED94887CD244B87CC94AFE2C57C8D40ABE37EB31F10B97B7514A73E4865BB7C9D86245204B9839AFDBCAF551CCC2C7351F966BF8D9D715DDC1C6E728F78DD8FCB7044140EFE3A6C6B179C4CA2C8839D743A8ABC99066456B77543D93A9B663789454FDE2F6AE90E66317619A61EB4AD9FCDD4CD6A42B61FCB761AD34D6F61812AAB89492F431D1684B79EBA3A56268E93A8E382C81FF3308D336A813940BB15B9542EAA74C84B71AC721609C12B27330F4818760C025280A0238F19255346554484B170078F04B27692D091CAD125B54712451ECA504455283765985491A871882C3121195BFCC27939FA79840D150C5AE4D483A4D109D1378DA80845946D510994C7DAE531689D86DC559DACAA7A1EAB02D7B0221453AC297A3F4C7A76E0671927915100870C3A496937CEB8447ECA58BC17930949CDDD3414D4A5A18E730F11B32CFD3266E9BC28E3D44714B5B10C7B593534340DF35820BD8011C6247D82A2A6B1281764EDE73E4B502EDD222B32A6AA5D1D8AF25157B1573CCB4EE00717414D0274342ECA50A15BEF14960E0590492630825DDE4C721E279340196715D5164F43C52E180E72A81824E4EA8B0CB0CF00D70528C09AFD38491F74E562AC5179584411A8E675984535212A101449007AA47E12159282C38972217B8F338C87D36B0F9B69EFE8245070409862F10CC791759C0654A5A4F008CCA35C82EE5800186486BF648D420C61E06510071E34508732437608181005D3080FC21DF84B92287DF40538A95745C183405967A805468114E02F8367ACA9A0EC28609105171207C037A1E709FC650B67ABF43B6B13EF08D4D0086EAAC29AA4E10722A1FE8179E802F54765011775068B659128905154316B3AA4820C0AA53B8DB3AAB084C5C9381B96C82057605A83CDA2A228AA0CEB44729CE05FE4D84CA08CB8E0010860F067CA184770034BE82A03FC0094410E4848C38525A002B66AA81FFEADE1E6123804C6C6D98031780429A33351E26C8578CDD07226C2842E5484892003B006E003E4C4CFA70B200F3ED2484DD164C5233D98C005B05854098C836ED058A1084414EE012100A0C0BA30908583D84CF4D3F0097121EEE043E8C15581A80A891AD8034228DC213AC46205D4031C838805F0F42E2BAFD815809344248CC4005E088E5404651C100D32882726B4190895ED8522182394C3BDD03035F04ABB03164C03C409559A580C680DDCF132F011D680C94074C5BF98B62056062FAD4B81617D0202D384C9AD29A15C04B296CB891FC9A826DCD238241094796441CD4E079BB36B4D02D6608BB26442910AB259740D4DD33CC4C2DAEBA00CE11748BA44368A658F04680327F2005AD925EE014D68F4ACA4A888EB80B292218E5510A6352340989E52710FA01ABE9AC03839012F47A50979ABCECEC1136197C9C1ABFC5847F884C61908AA50AC479EEC27052088A68301A698912DF274A107C852B715B49DEBE31805322E7C10C6C16140F207E50B7851618CDD7209C386BEAA29D55490E90D4A691CE568AC027E84598C224AD70B1E6554B511B9B62F36799581E4018927CA0866AD852304A13580392C011D087A1EEA06A03D5C83E1E8E0A6E88434E28BF85FD3C5B80B76407964638596813E839687CE0445C32950A212413DA84810A653C073E87C584A512CEC0C00E722A242F21E4A01902B9CB6F57091F81CAE057345C25ABA2E57182BD9A012968379C3E8414062B505BEF6FC4AAEF935744C8302B93354C9806DDD0F82D4B0E7E379A8395E40AB09E1CC00411CC1770C0DDCBA65F63D8AFD347C10DE8CD6913EC528412C210AE06781AE94B26F9B917518E01E49A1750490D9B06F6A21041D67ECC9ECDBD77ECFB28B75D63D86065656A40E361A30220D89D049BCF4683D792A9B4B098785DAC13E524FF35CF44899410CA6A56D6ECE1882A288D2784800773850B36306F719A19FF3DAF595C0A6946D39B8475882556E8364681E40C29CFBF89C127D1FC758361D082866F558EC02E5BB54833682700967B327124949C9BE3AE768E09306325AF642EC0EA130345529517874449432C4294379138718684BA2ECC30648EE9BC3B0A8B7551E62DE6EBA7EDADEEFBBE3366D8EAFFDF3E4ABFDDEDEE401F93ECB6533CAD3625EFF6AB97CDA97E54ABD7DFBF1E6E1B94AFB411DDF2D57EF4E5B3BEABF95E2F9E5DDBD3BEDAFCD7CD0FDF4FBE5CDE935D8EDC66FBAFE525C849B2B7BE79F4DF510E7787A7F778A0FA319813B5F54DDC9613F6D37CA0BF430F954466800C1047CD8298D0E539AC1C92979A14FF0983B7D9873180FC7D3DD72DC2FF2E60AAE3B8E3737AED78340119A5D7153DEFB49DB4315002CE6C68F0C055151980E73A5ABD6C18C68B1819D4CBC09355456028DA6D1F6C98E2D9502A4C5540B953F080D603AA140C1F9625AF6875C17405F8BF265D829CF5ADC8C7ED47DF60BB35A8555C3EC1654C382FEDC04E05D24B60A3FA886FEE9F601E92008D539145CB805A235C69A33BCAC861961650E48448B56DBABA19328F5C948D9BBEB34E5A99CD264596CFD314CC8E7D60AA32A9CC5C42E096F46C70AEBA744175676D03DF296EE1D6711E015FE3DD73A193B009CC177B00FB98CBD33AA35A73F5900B920DD9B829F0A203286C1754AA134D4699F53AD2595B82F19B127C3A0070E77A4B11372579A128EB42C0D8C7A888EC4C39C8436C220CAA758A7142532F0388CCCA6CC5DE8990D533DF24B6A53267E3916078E40349DBBFD4294970AABF9AC8DE2C4C341CF89AD799BCE0090B67189467821143549336A2C638683959A0B4383B15072650D85F214CE92A22523456C80BF274E7290AAADA69A91D5E062B18590C94B758341A071528010F500FA526B2287CD563A34D03AE6C8580CB2CB8703BA6A56DF1B0148E397C35EB9D1A65435BA945CB1B8673D75D5148B3047E87242957265E1E534CD885866CE9BE4280CF48E040B1FF1424864D36CE013A066DD88023623CB0414AB10E0724EEC1DA76F328E39940909794144E1F0447013A41B90B9E0CBBE440222AB47A321AF02F0CF4CB150974B7962F6A3806DE487D428C5A039F6726E2EC47B707EC0055410C9E10DEC57A071383262C215141DA4A1C8FA87852C16AC0FC418A8941C29C2F9A461F16566D49A231ED489081A264389F05E941BD7100EE76596259B753FA25F621247E182B15BD169B0A6CDEE7C1B5C82170E024D9B30458E721B1DDA13E2111C7174C7795A206C002FC42358CBEAC591216A0F67952004CAD847E8C59C8F3AC6B2A12925CF6BC916EEA2E1AA0473609B33CD5676DB0C101ECC22E138A56B52532E97024B22C7CBAD2CD93620E6E8909ECF43E8AF2C06BC8F82AF09A01A904481776D32C6E13459E4933650733C9FE84053140245C611BCC2B6F13455D2A6D254CF3AA06E735A6A4F731D8BD9796ECB7DAC6E8DC3765C1B304302E21758605DECE90C646B553B0CDE467A6D244A05F3D4F3B038D26BD6BACCB5947A95975F641408C637F28D2DDAD6F3A4360364C6C6656C65BF8D9D69F1F3509DB1DA3CA02D26F936D82687E715EDA4D8765065EB656848993172B6EDBAC3356DF176E05C1C6CB54B8ED07D5CDF0EB4C5A12DF66DB33D2FF66D31796B2A72F454AE58A56EA3665AA04D9D916FDA0AA27C4EB6EDBA98F35F620BFF4879E56565CB3530EFCFE4BD3B8F4EC35986B343AD52D2C0AE2D26A2A46F85F696609DF8AF6F47421BDD07F7D9662A60758CC6CB6A8CF62AA3F1D2CC7CF689B698F2BA7652A063D89FCCC5D47E26BF925B55B4926B5213B07D3257582F57C6CF066DB3FAB6D9AC6F66ECCA965F7DDE7BF7C88B759FBCC19DAD7F7ED9D2E8ACEF683E6D7E3CA9AD588BCDA793ECA383FD64DB36A10FAEA928367D9E5D6765135AD8350B904DFBE877DCBCC3BEDDCEF3F90ED477AF78C7EF78D2EE9393F20D156DBBBE2B6A327031BFACC76E3CE7257798B347B355F4BB57AF707B07A220B46B949BCA5EADEFC676EBEB2252B6FF66DA7B2BE35FEDCE6FCCDC27B6B0E6D56EE75EBD6ACFF079B93240B65EBE6C1E6E57367117BFB0A79D070AFFBE6B529271EEE566AEDB9D65E06DE75F362977E70377BB55E3B72FD797597E77EB5ED24CB7678E57FE40E29652F3EECE9DF7357D363AB78FAF10DB0AACBD75FEF6F677B7A4B32A915FEDF2F6B651269D767EE075C01F20C915BBF31BB79F16F31B946F7F476AB74DD4DB7545B31C36D2F376BCDDCEFE8C8DF3FBBBDDD9CC4DC39E34CE6F293FAD68AFCDDABE95E7B515D8350BB4EFB05B6570DF7EEBFDB7DFFE1F4F249268]
}
Add(Application,8802220,917,203)
{
Wait=1
}
Add(Hub,1793128,714,196)
{
link(onEvent1,10261051:doCompare,[(739,202)(739,146)])
link(onEvent2,5255144:doStrCat,[])
}
Add(Str_Enum,104405,511,196)
{
Delimiter=" "
link(onEnum,3049461:doCase,[])
link(onEndEnum,11350300:doPlay,[])
}
Add(Case,3049461,616,196)
{
Value=String(@)
link(onNextCase,1793128:doEvent1,[])
link(onTrue,14258137:doFrame,[(690,209)(690,258)])
}
Add(InfoTip,8312484,609,175)
{
Info=#7:Picture|
Width=141
Height=137
}
Add(IconAnimation,14258137,700,231)
{
IndexArray=[]
Bitmaps=['Bitmap'=[ZIP4204000078DA8593CB6B135114C623BA96E042684DD2699AA4490AA2D5BF2095111457AE6B17715B57EA3F6037C28C9BBA0B8A21A2427D2CB4540DB420EA58AB4DA5B40D267D18CDA3B6A649CC74F29A7CDE3399E92349F1303FEEB9DFF9BE810BF7FA2EF98E98B4F231DC0CB3CE2113673A4C03367F7FB4C16EC1F85ACA1288F096C0AC680D4424464E47D235DE744059EFCF71B67BDF84CEA731F9F85406C7E68A30C76A30C76B5A4F1ACDACCCC3E0F6666DC179CEF6603E6409277162A9848E04D0C9A0B5E3A7BE92162D813CE4A58C91EF7AB820D8275370AEA970FD027ADEACC27AEEF63E1C4C73260117F3D827D3E80A2D0894E51E4779C7AB35F974BC8CB369E0E4DB467635B101A3A8278D666752C029E6758CFF90BB9F44F9EEB1B8D83FF30703EBD068CE36FF63E03734FA3F67611F8B89F6172BD2F965059737A161E49762192C7E4F6B506FE40D1F6528EB7899C80D6DA8B8BA05F8B7D072EE66C8435ECAF4B0AC732299BB965571BD80FF93DFED29E39C48E55CE175693855C148111891DB738BD622F679865365B8C219A9776A531C8C6D635481C65DA57106A31F2DB5D1188331199475BFCBF2BED9822CE66A0856A041DE60193BFB1D4DEFEFE46BF0450A722FCBD21D707F28084371058FCA753CAB01CFDB516DACE4B9C2BC9E8F79C1B87F9EE922E799FE1BF22F97102CAA785D47035547DF076515FE9512BC9F8A21CAEC7D037D3332C7102E2E2AF2CD640581828AF16A5D83FA1BC92A2EB099F7CBB6E065DE83DE61DF578567880C8991D39174ADE5FDFE0312CA9A71]]
Point(doIndexFrame)
Point(doFrame)
link(onBitmapFrame,5768648:doAddBitmap,[])
}
Add(ArrayEnum,8193859,462,196)
{
link(onItem,104405:doEnum,[])
link(Array,16745362:Array,[])
}
Add(If_else,10261051,763,140)
{
Op1=String(HiAsm)
link(onTrue,12671870:doData,[])
link(onFalse,622795:doData,[])
}
Add(DoData,12671870,819,140)
{
Data=Integer(255)
link(onEventData,12115500:doWork2,[])
}
Add(DoData,622795,812,147)
{
Data=Integer(0)
link(onEventData,12115500:doWork3,[(858,153)])
}
Add(StrCat,5255144,763,203)
{
Str2=" "
link(onStrCat,5768648:doAdd,[])
}
Add(Memory,35720,875,140)
{
Default=Integer(0)
}
Add(HubEx,12115500,854,140)
{
link(onEvent,35720:doValue,[])
}

карма: 19

0
Ответов: 20
Рейтинг: 5
#5: 2019-12-11 01:39:53 ЛС | профиль | цитата

Add(MainForm,2953706,21,105)
{
Width=634
Height=181
}
Add(Memo,8058290,63,119)
{
Left=10
Top=5
Width=255
Height=120
Strings=#40:Привет от Hiasm! конструктор super cool!|21:Проверка работы Hiasm|22:Hiasm приветствует вас|29:хватит !!Hiasmsfdgfsdg мучать|
}
Add(Button,717422,21,196)
{
Left=285
Top=10
link(onClick,14316385:doEnum,[])
}
Add(RichEdit,9654878,665,238)
{
Left=354
Top=5
Width=255
Height=120
InsertCRLF=1
link(Color,12332648:Var,[])
}
Add(ArrayEnum,14316385,77,196)
{
link(onItem,10465041:doEnum,[])
link(Array,8058290:Array,[])
}
Add(Str_Enum,10465041,126,196)
{
Delimiter=" "
OnlyDivGroup=1
link(onEnum,8536727:doEvent1,[])
link(onEndEnum,4044311:doData,[(172,209)(172,447)])
}
Add(Memory,12389122,644,133)
{
Default=Integer(1)
}
Add(Memory,14367362,707,133)
{
Default=Integer(255)
}
Add(GetIndexData,12332648,672,196)
{
link(Data1,12389122:Value,[(678,180)(650,180)])
link(Data2,14367362:Value,[(685,180)(713,180)])
}
Add(ChanelToIndex,4585179,532,196)
{
Point(Data)
link(onIndex,11376981:doEvent1,[])
}
Add(HubEx,3184063,651,238)
{
link(onEvent,9654878:doAdd,[])
}
Add(DoData,4044311,350,441)
{
Data=String(\n)
link(onEventData,6960179:doWork3,[(655,447)])
}
Add(Memory,15564296,147,49)
{
Default=String(Hiasm)
}
Add(Position,15439472,231,196)
{
ZeroPos=0
ShortSearch=1
link(onSearch,977003:doCase,[])
link(Target,10071917:getVar,[])
}
Add(Case,977003,273,196)
{
Value=Integer(0)
link(onNextCase,8900576:doEvent1,[])
link(onTrue,13765591:doData,[(318,209)(318,363)])
}
Add(LineBreakEx,12620243,133,239)
{
Caption="word"
Type=3
link(_Data,10465041:Part,[])
}
Add(LineBreakEx,14976703,350,337)
{
Caption="word"
Type=2
}
Add(DoData,13598927,406,203)
{
link(onEventData,4585179:doWork2,[])
link(Data,12266682:getVar,[])
}
Add(DoData,13765591,350,357)
{
link(onEventData,3993444:doWork2,[])
link(Data,14976703:getVar,[])
}
Add(Hub,11376981,574,196)
{
link(onEvent1,12332648:doIndex,[])
link(onEvent2,10879217:doData,[(598,209)(598,244)])
}
Add(Copy,133322,413,119)
{
link(onCopy,5164162:doWork1,[(494,125)])
link(Str,529223:getVar,[])
link(Position,5919016:Value,[])
link(Count,3568255:Var1,[(433,114)(265,114)])
}
Add(LineBreakEx,529223,413,91)
{
Caption="word"
Type=2
}
Add(Length,1920395,371,287)
{
link(onLength,2529866:doOperation,[])
link(Str,11983281:getVar,[])
}
Add(Copy,12402408,455,287)
{
Count=99
link(onCopy,5164162:doWork3,[(494,293)])
link(Str,919968:getVar,[])
link(Position,2529866:Result,[(468,275)(444,275)(444,331)(419,331)])
}
Add(LineBreakEx,919968,455,259)
{
Caption="word"
Type=2
}
Add(DoData,10879217,609,238)
{
link(onEventData,3184063:doWork2,[])
link(Data,4585179:Data,[(615,233)(538,233)])
}
Add(Hub,8536727,182,196)
{
link(onEvent1,15439472:doSearch,[])
link(onEvent2,14686936:doData,[(218,209)(218,405)])
}
Add(DoData,14686936,350,399)
{
Data=String( )
link(onEventData,6960179:doWork2,[])
}
Add(HubEx,6960179,651,399)
{
Angle=3
link(onEvent,3993444:doWork3,[])
}
Add(Memory,5919016,420,49)
{
Default=Integer(0)
}
Add(Hub,8900576,329,196)
{
OutCount=3
link(onEvent1,133322:doCopy,[(358,202)(358,125)])
link(onEvent2,13598927:doData,[])
link(onEvent3,1920395:doLength,[(357,216)(357,293)])
}
Add(Math,2529866,413,287)
{
link(onResult,12402408:doCopy,[])
link(Op2,3568255:Var3,[(426,268)])
}
Add(GetDataEx,3568255,259,263)
{
Angle=3
link(Data,15439472:Position,[(237,268)])
}
Add(HubEx,5164162,490,196)
{
link(onEvent,4585179:doWork1,[])
}
Add(HubEx,3993444,651,357)
{
Angle=3
link(onEvent,3184063:doWork3,[])
}
Add(LineBreakEx,11983281,371,260)
{
Caption="Hword"
Type=2
}
Add(LineBreakEx,3811495,147,99)
{
Caption="Hword"
Type=3
link(_Data,15564296:Value,[])
}
Add(LineBreakEx,12266682,406,176)
{
Caption="Hword"
Type=2
}
Add(LineBreakEx,10071917,238,169)
{
Caption="Hword"
Type=2
}
Add(InfoTip,5813357,280,413)
{
Info=#6:пробел|
Height=18
}
Add(InfoTip,15729349,231,371)
{
Info=#19:слово без изменений|
Width=113
Height=18
}
Add(InfoTip,3351953,238,455)
{
Info=#14:перевод строки|
Width=106
Height=18
}
Add(InfoTip,10064669,119,28)
{
Info=#13:искомое слово|
Width=85
Height=18
}
Add(InfoTip,9869373,644,112)
{
Info=#6:цвет 1|
Width=43
Height=18
}
Add(InfoTip,7425279,707,112)
{
Info=#6:цвет 2|
Width=43
Height=18
}


Редактировалось 2 раз(а), последний 2019-12-11 01:42:22
карма: 0

0
Ответов: 92
Рейтинг: 1
#6: 2019-12-11 12:00:37 ЛС | профиль | цитата
Леонид, parara, Спасибо.
Добавил точку doTextSearch в RichEdit.
Работает так, как я хотел. Кому нужно, берите.
gif

upd. Удалил, т.к. очень сырой и недоработанный.

Редактировалось 1 раз(а), последний 2019-12-13 10:53:59
карма: 0

1
файлы: 1RichEdit.gif [31.1KB] [604]
Голосовали:parara
Ответов: 20
Рейтинг: 5
#7: 2019-12-11 18:48:26 ЛС | профиль | цитата
Vandjer,
можно чутка сократить:
это
Control.RE_FmtFontColor := ReadInteger(_Data,_data_Color);
Control.RE_CharFmtArea := raSelection;
p := ReadInteger(_Data,_data_Style);
Control.RE_FmtBold := p and 1 > 0;
Control.RE_FmtItalic := p and 2 > 0;
Control.RE_FmtUnderline := p and 4 > 0;
Control.RE_FmtStrikeout := p and 8 > 0;
на это
_work_doFormatSel(_Data, Index);
и убрать инициализацию p: byte;

сохранится ажно целых дофига байт

Редактировалось 1 раз(а), последний 2019-12-11 18:48:53
карма: 0

1
Голосовали:Vandjer
Ответов: 92
Рейтинг: 1
#8: 2019-12-11 19:27:56 ЛС | профиль | цитата
parara писал(а):
_work_doFormatSel(_Data, Index);

Спасибо, учту. Только начал изучать delphi
карма: 0

0
8
Сообщение
...
Прикрепленные файлы
(файлы не залиты)