Virtual Desktop 1.2

Поделиться12023-08-31 22:28:25

Автор: ERNAZAR
Новичок
Зарегистрирован: 2023-08-31
Приглашений: 0
Сообщений: 2
Уважение: [+0/-0]
Позитив: [+0/-0]
Провел на форуме:
47 минут
Последний визит:
2023-09-09 17:21:29

Virtual Desktop 1.2 - виртуалный робочие столи с хоткейм

Код:

Make(delphi)
ver(4.05 build 186)
Add(ButtonRush,1932584,350,42)
{
 Left=10
 Top=10
 Font=[Script MT Bold,10,1,0,0]
 Hint="CTRL+ALT+1"
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="ONE"
 Glyphs=[]
 Point(doCaption)
 link(onClick,9608300:doEvent1,[])
}
Add(ButtonRush,12463032,479,46)
{
 Left=85
 Top=10
 Font=[Script MT Bold,10,1,0,0]
 Hint="CTRL+ALT+2"
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="TWO"
 Glyphs=[]
 Point(doCaption)
 link(onClick,2545919:doEvent1,[(525,52)(525,48)])
}
Add(ButtonRush,830048,631,44)
{
 Left=160
 Top=10
 Font=[Script MT Bold,10,1,0,0]
 Hint="CTRL+ALT+3"
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="THREE"
 Glyphs=[]
 Point(doCaption)
 link(onClick,15125473:doEvent1,[(671,50)(671,48)])
}
Add(ButtonRush,4557624,754,42)
{
 Left=235
 Top=10
 Font=[Script MT Bold,10,1,0,0]
 Hint="CTRL+ALT+4"
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="FOUR"
 Glyphs=[]
 Point(doCaption)
 link(onClick,1994337:doEvent1,[])
}
Add(ButtonRush,10979534,172,210)
{
 Left=10
 Top=75
 Font=[Segoe Print,10,1,0,0]
 ParentFont=0
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="Big Win"
 Glyphs=[]
 Point(doCaption)
 link(onClick,1611824:doSwitch,[(216,216)(216,286)(58,286)(58,356)])
}
Add(ButtonRush,5151311,241,201)
{
 Left=85
 Top=75
 Font=[Segoe Print,10,1,0,0]
 ParentFont=0
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="Hide"
 Glyphs=[]
 Point(doCaption)
 link(onClick,4122919:doWork1,[(285,207)(285,125)])
}
Add(ButtonRush,7182722,459,202)
{
 Left=235
 Top=75
 Font=[Chiller,12,1,0,0]
 ParentFont=0
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="Off HK"
 Glyphs=[]
 Point(doCaption)
 link(onClick,3459737:doStopDSKSwitch,[(503,208)(503,170)(338,170)(338,132)])
}
Add(MainForm,2121902,37,154)
{
 Width=332
 Height=178
 Color=0
 Font=[Calibri,10,0,0,204]
 Caption="1"
 Icon=[ZIP267D000078DAED5DEB6F95477A7FD3A4CAA70AFAA55DB5D516455A695B55ABECB7DD55D5A6DB76A54AFDD0FE07D57E5AA9D24A55574D136D822F6070C0377C4B930D09C1771B03B68F8D6F98F8D83260631B733536603689F139C797E31B2109BBD379669E67E69939AFB10DD860F0919ECCCC73FDFDDE638E8FDF779E4910BC14BC12BCF14620C75DC1F77F1A043F0B82E0F5D7F5BAEA7B41F04BA9DBB50BD73B83E04F7E11043B77EAF52F5E0982D3FF1B04DF97313245901668BD7AFD34D888D76B52FE658DF2EFEBF00D937FF3D6AF054FEFF5E758FF1FA4FC536E5E86D84C819A58FB35C4F2545FE5151F8ACD7A41ADE0197BC9F7E443C005D21D6DDA10A1FCB2D65BC133FA92F87E0418472EF58BDB13D79F88402EE4FEA3600BBCE81A3CC99FF7ADC2DDBF068FFBDE6F45EEFC33B1E554F563C9B3F859B7CD7F9BFF36FF6DFEDBFC57FD4E28CACA4B1E4BF0BBFE96E55FFAFE81C792ADCEFF09FDADB7E1FF4E5F24A9AA3EEC7CAE5454FE460C5F8CBE30D27BAE550067CEFFECF936D1D854F3420870F5F99F1BE8103D7D11D1D3DB2CA2527A7A2328B08E285DB40F6D7DDA4EF3682F4904F511E5DBD34B12B1B1283C0FD48DF27A7DE48FF9FA587C9F9B2BDA67EBE939E665F1C4A107EDE7FADB53F8F70F749AB895C47052EB16BDEE231C21BEFEBCD7AEA318EFE4EC0DCF61C6DE957145399E87600101AE9C7F65D5476260F0B4E83DDB2C7A659E2F276F3F9702EF19F01F18EC12C099F31F1CFE4CF26F51FCAF95FEEAB914C54F0A70E5FCABAA3F1243F0B978F694FC6C3C25EE1CF9B58855A48BA9CA74334E5564A8790C74951946A62A705D91EEDA2BB44C51BCF2A538EE837115A8A77CAC764CD5273C3C46EB6D5D5DC7C155A9E3801370EB931CE1770070E6FC2F5EEA51B63EF9BBE1CE27BF4EE109EB388C55167F9C705665A4F8C68C2FF931BD33FA754272AD949F6A54A5C6C5BD3570EAED037EA724D75E8FFF613172F9ACFCBDD0AAAE817AFF555CA6885785D4A8CA54EB384925AE2B333CFF4C338F57D95C712707CB5549393319874CED8B58E21C13E36FF367624E2BA0074EC0EDAC7C7F2F49AEC099F857D71C1697AF9E93B636FDFE1F7947C4AA31B65A4B8CC62AAB57F3EA4CAC6D7DC9160FB373BFAAD4D8981FCFC76A375FCC8FA996D741496A5EE004DCE03DBE22B90267CEFFCAB501696B57D7E0CEA7EFC8983D225EC339C17A8F9E93BE06F524357B58DC1E1BC773B031017E14C3ED353677A2DAB3634C42D9180EC496E0785012D2069C80FBB9FE3671557275F97F2CAE8D0EAAEF05E7E477A30979AD20265EB357D7AAD96346D2276AD99ACF6B42E6B5786D984EE7DE6BF5B56C0EF999BFCA5F1B9E27E1E4A4D8BD8E0D0438C1F73EE0085C8133F1AFA9FD588C8E0D8BF3F23B20D8E15A25004FED5E353E5CB256B6D584CC6BD692F311E521B981D339F9F37D5EF21B1D1B12C0D9F2FF448C8D8FA8EF45E70680FFBB225197A5B84DD7ED55F3695C27E47ABA96AFF51CFC948EA4762F9B930FF9930D72D9398F99F6F2F018E3C3F01016F037F8582EE004DCFB2F742AAEC099F8D7D67D226EDEBA2C6DA7E535E850D76AFAD83E913896A5462B595A54CE7D7A447DE218AD6D8C8AAFC3D8BA7D76EE49C2F1C93275B49E72B3FAC7B21C3C091EC730F15CEAFDEFEF50FC6FDEBA228033E77F6BE2AA1890FCCF2BFEEF628EFD6246CA74FD3E2D84B91EF45A376374B8AEB7731BB7DFC490681BE96C0D9AFB3EA6C6318C61B5693EE36023EC7AADDE7FC90D380257CEBFEED8113171E7BAB820BF179F97D7E7CED177C5CCF1FD4CB2D5A872910EE7D364AF6773EECB62A6A56DDAF8A1ADDEF571D65CBFD29A70D45B1CD666D7C009DE7BE0085C8133E7FFDBCFC7C485A12EE53361F8672B993D214729B3C7B59839E97134FE68337A66B7F1FB1DDBEC096BE3FECEC86AF0BA1C8B63637AE004EFFD85A1338A2BE77FACFE88F8FC8B9B6250DAE0EFC089A3BBC5ECC96C94F764FC7B6A5482F31966776DD9DAFF04F345BD12850DE2B5703F63E7FA13E497EDE8A8A6CD936DF399781B039C80DBD0D06792EBB800CE96FFA7F2EFC35B6248FE5DA47E3ECA24FF06C873C0C81C48038C98BF01C5F0F76CCE78408D739887FC959E84FC68CED70DEF61DC018B8BD59F33B50023D53B60F5720D9CE0FD1FBCF899E20A9C39FFBB7727E4DF80DD9ABFBC56738D0755DC1C62986B38A8F9833482EEA0F281B963537619DB88718DA43FA805F414D378D0F127FB1C8B33FA8683BAA6A9CFE3C8D7CDC36DC009B80D4B8EC095F3AF3F7E544CC57EABFE2E847F1F70AD924D324713626CCAD173298EBE31C7EAD43C4724616CD4F66423C5B33CA4E3EB26E6C7E6A65693CE956438A05EB2D1B5F3D1C66B5CC009B85D1C892AAEC099F38FC7BF907F1746D567C044599A48467294CCC1D8A4E7C9A65C3DC79C66449F396FB47E368ECB1CD65075988E72CE4572EDBCC9F36B62B82216835B3F176BE42A4E83C83F9EF8C2E17FFCC45191989E54F700E03300AED5BC8C014936E7AA7847427539DA7F05996FCEC59C1A0F8D3C5F58BD79EED3ACEB98F94AB89A53F5C009F88FC8BFFD812B70B6FCCBC4F4CC9418B9DC2B7D3E53D76ABE45D66EC993B8F3647C9ECA416BABCB53BA2413C593A4658518B3CED5638BCD338F3A1BA7732499CE9F732C293E2D3A9F7AFF87BB1547E00A9C89FF89936562762E262E5DEE93EF7FB7B85D2EDFFF532C1F885AE7ABF9821C17688D7E0B2DB4B63EE46F73911DE299DDF8E6639CF55FE0B13C670BAF6BF12DE07C4149BEC1089C801B709C9D8D09E06CF9978BB964425CBED2A73E03D5CFFFA90231DF5A20165A1133AC7184BC5C7C9B8A337EA85B2187F6CD57754CCE56F281FAAE9DF4F39853E95BF30D4E07576B81D10127F8ECBF7CE5ACE20A9C39FFF9F96971F9EA59C5FF76799AAEFB34A4CD1B1F270713E004F778E13E575272E5FC4F36948B858559755F48BDFFF26765B1ED90CCA3651145AF0BBCD1DA165B997FEB212787D617483DE0D173A56FB5F9164DDE02B417D838CF6EEB1684E02CF0E6058AD3F0488FE2085C81B3E55F21161793E2EAB5F3EAF7C36DF9B3B2D87E484B5BA1C9B5D85EA8A50D47695F68D7FA85B6421BD35EE88E6D87426C87988DE555980B914FA1BDB6E4C7F4B63EEADA43EA602C70026EC011B80267E2DFD058219696E7A5AD5FFAF448DF34B1D851A864A95D8B5E17E935B32D1A1B13E553A4C470E3BEEDE4E3E5716A31DF0E37DEF759F2FD42F00027F8D9BE26F90357E0CCF92FDF5B14D7AE0F48FEBDFAFDEF94D83B1946E082B588DB12F89839F9329DE7C34783DB8B57BA4EB716F9031ECE19723B784C0D6BA3B57EFF7B24C77EC5D5E55F29EEDD5B12D74607D4F703F8AC58EA2C6652E4C8A2B70E97E287E88AD7E0BB82BE03751DABF9BAD881133CF780F7F8DE574B023813FFC6A64AF1D5FD65717DF482E27F4BFA2E9F96B15C640ED0919EE6CBA0C75A5AA7FDF8F55B66F10E2EF45FC218CAE3D43D8D7EE84F58949EF3643116A38D014EC0EDBA7C8F812B70E6FCEFDFBF27AEDF18D4FCCBD21C9E7A2CC15C25F6DA74719F1286A1046D25CEB5F2312E7BB66596CBE8BA1EE6E7E109992F2376E004EFFFA8E4085C7DFE5F7FFD95181D03FE7DCA77A90BE3BB341785037484C7D195A01FD9F5E8E060FE4A67E2FC5CEC1A400E85C38A7B4D38469633041F70026EC011B872FE4D912AF1CD37F7950DBE1FDE929F159CD7F320C0E992FCEE7F636C487105CE9CFFB7DF7EAD6C5B86FFE947E1DFA73802D714FE0FBE1137C635FF7307FFF3B99411C96D6C7C58F2FFC6E11F69AE120F1E7C2B6D43CAEECAD00AFA4791216F5CCD6FADF143EBC83DACB80267CBBF5AFCEE770FC4F8F845651FBF89BE721C1FD73276F3A29B87DB945C64732DE3A8A7B92F94C719698E6B8545D61EA7FA37B19689BBE8C48CDF74E31D3CA803AEC099F37FD15E9CFF46F5EB3DEB126CBFB65FDBAF17FA2584FEAF7800E3DFCBC999207859B03119043B60BC1F047F29B423B889DF07C1EEC71FD3348C97B6C78D1957FB3D08E744BC2EE53F027B4E44DAF7B6FF5D3C07AFEF06FA0890272DDFDD60DCDFC11A3FDEA073337E8CF9BFB3197D555BF9DC0BE8BBEFEE6E174A1EE7BB26E6785A7DFC7416413239BD6E7956CE1F78D473459E95FED9E7017F4DED47EB966709FFFF7D7070DDF22CE17F94CFFB2785FF717B4E8F7C5A2A3EF8307F5DF2F127C54FA4DF95F00F0D43FF678F1D2F468D506FA85A0F5B9D3BF638B661E3DBE3C63A756C3EA72ECE87CD3CCC37EAE0DF8ABDA61C7F774F447FAEF53489688FFE7C8B4A5DB4478FFC732FCA7C681D36522E8AD7F9224EBC1A591D572847585CC4C10F6BE094484C2A59A9CF70D29B4FAEC1672DFD8B936BB0012E78CE033853F0F7362BFD9D8FDE7AE60570423F2CC70FBD99843F569626A640CA77E35C8EE5B0D63AB0A9B5D1EF367A33F7FCB52D0D63773B314E0E8C553E905FD5D88DEB34831FF072FCD07B67F0433EE85F5479D2D59AF0C74887F629B4D39CAF751E8CA9E0F1CC4EF30A571733F9B82EFD21F85B2D7ED68369250D259D8DFE7C1D62FA41D356F76142F8012FC70FFD3F067F6578CF64BCD2F692D23A6EE664E731E9A1FD96F1945ECF0CDBF3EAF9F9FDA1841FF072FCE7FB3B0CFEB8D37FC9E6A6A73023552AB94F86DB7FC87B2F1D7B46CA3C56E5F52E623CE9093FE0E5F8A1BFCAE0AFA6FE3E3B269C3E41D6DF676CA8ABF2F572ACDAE3E812D46388B6444A0F62A6ED1744DC947B2DF8798F9DD317A8FAFDB86D6FA86F8AAD764F885F581E2B7E1F2009E107BC1C3FECFF27FCD3D8BB47BD63A60F8DF5CC4D537F1AAD6B59AF19D99D5E37AFEFAE2E8BF9B3189A53AF5AED5EDB4F07BD7A881FF0BAF8BB2C7EEAF9AA63FD68D46F86FD6433C6C7EB2DAB63FD6475596EEF98E945CBB23D698E9FDFCB969AD3E01FEA72F05F183E63F1ABFEA47D76343D60FB6D1FD931DEEFA57B9AFC1E3035073DF6AA99DE30EC255362FACAB04F4AF9DBFEB699FAFDCC77BFC10FFD02EEF7E76E839F7AAC66EB6D9F94917AEC3DAA777BA2CCBC3EDBE92BD3B9587F95E9E30ACF6B73EE77F292107EC0CBF1C3F769C26FFB84A8478AF70C65DB9EA790D1B1D11A63672807EB599A31636A5F524A5F9314C2EF7FFF87BD5984DFF4BC60CF0FF52751EFCF2CEFC7F1746A3CC97C4FF25CD6C67DE7D8E8F42EF1189C137EC0BB227EE89369607D320DB65F26697A85589F4D438EBBC6181587B624EFAD49C9C1E27C69209BC6B412FE4B57FA0C7EDBDF12D6DB921BB25EA90746F768CC85C6E6B2BE169DC3D6B3E31CC721FD093FE0E5F861EFB3C11FC9C3FE903C26BC67240FFB4FD868741887FD1930777B57743ED39F11C19E0EF499776A919EFA41720D7EC0EBE23F6FF0ABBE06D30792AF44F77CE4BBD2ECF55850FF09EB4B31F3165FF2597E1CFD3C2687B559FCE71DFCB0BF9AF087F74E70B136B7EF01752DAE2FACE7BD5E0BDB7F51E0D66BB13D143A4FBE939BF0035E8E1FF6CE1AFCB0D7BF15F7EF9BB9AFB3E362A80F97B05C613E3C5F585C81C10F78397ED8DF6BF0E33EFBC536DCBBBFC2BEFB85947921FA7139E4EECB67713CBF6B67B9DB0B9D18C20F78397E38B780F0EB7DED4521827BD043F4763F3ED39B3CDEBE7CC75EC8E2BC79879FA7C8E007BC2EFE61869FF6AB17A378FBE3696F33FA2C199F626F2F7D71CADE7ABD17BE988D36BFF1EB64B64EBE2F9FE31F76F0C3BE33C2BFD4598252BC8A30BF0EAE2B5E63AC9B67790DB1841FF072FCB0878EF0BB7B8AEDA8EA181BDFC36CF7532B1C6C3FB813EFEC132F61FC4B702F3CD528F6EAD95C841FF0BAF84718FE528F43A9DD87CDE67A9F6CA9F1D102FBA54BD59E69188D9F8A2B75F351BCD9B75D6A6C4B0603E6EDD2738B7F2414FF56D82B0B386FDEBA94F2F3B3D584F017971CDC92FB3401F756DFA3F97CEC1383171B93B01D4C8E6782E05518EFC3B63036FE5EEF2D93F2D25A46BD5B697BF447BADEB04F6B176EC031FBB476AEEF3DDCB163C76B3FFCE1DFC05E8675CB0F7EF0577F0BF14FEB5CE4C3874B76BDFFFEFB7FF834F6E5807F5959F11F575757BFBCD9FB2136EAF93BE45ECBFE978DFCFC5AED1A6CF4DE03F5BE9697AE281B5D3F3DE34DB19A6CF63E852721F67974049F3B47D8336829512DDC1685E7CDA837CFA91D9F88F6E1CFABA39813E36C7D8A69D6D2ABE73D52D7A3462D5A1FB16734A39F3A6718FD758E88737633E5B1F9B58EEAC339A35F7C3EA664B3CEF6ED9335A93E9CF179B5F4BF37ED5CDDAB52E859A37ECED82626CBDEF59E176F9CDC95B5E859A1AADFDF21268F6E6E7D7A56A69E935DE894F5DFD9D4FAF4AC483D67193C2DBEDCC4FAF05EC399D2541FCED0F9525E7FF5BC1DA432DDCE51624CB87E0A9E7557B239F957A639CFD1C90EE35D3CDB87EA0F0F778B2FCB65FDAA747B7E30CEE33437BA0C3BAF023BF9512CCE437DF533E5BB15BB554DAA0FE70C4C4A8CFC3CD8047F2E5BB3C79CF19A60E7BDD279B0096E63E7BB266A788E4C9307AE2F9C6D41F5E18C9F4989CF3E57DCEB3E9B34E76EB2679C75563F5DC7D6EC19E8B41F873E77AB33546F31D5877374A6244E7E26E40C3B1BD23CDB736CEEF3C019E6379372AEA4FBAC3026AF039C6B43F5E1BEF394D4E9F3F4F8F32A7B2EA1599FCCF69E4359DBCC09EF8CBF13F68CBE19F3EC2B5BC4E435A17BF5749F7B4A5E777B0E1A3BFFADC17FEE72C09E21C7CE83E3FEF6B90EF36371B16359E2DA35F3FFC853E758C4E4759B67E767D9B3B9DC73BAE643463AA76B9EAD755C8E33927FFC78B6B9D7ACEE738E0E2A9DF3DCE1943DDF69C139FF09CF7C3AC5CE2F6AC9C3D1F5211B9DF344F6B87C0FE0EC06AA0F3DDE71F9DE3867F0E0FDF1457E4E0F5B2FB6D2F93C642BB0F6105F9E2F21DFB31B37866CFDF16191387900CF75293223CDB51499D1B9274DF76FF97DEBF622734F7AC99C135364645AFE0C8CE1BD5ABA4F9B903A3A2F6499EEBD76B033369CFBB1FA5E33F9711F982FFB3A1607E7724C37E6A8BE62AA0FF79D36FB7E1DDDEBDACCFF0F69D8DF894FFB5E93BAED928672E6552D133B8C6CF47D22B84FB113EF55D07D8A375E5935EC4FFFF9673FF9BB87FDFDFFABFFF9F9BF4ABF3F5B29C16F0EEFFB47E01FF6027D47D7D19FAF06E2D2D5E6BF08BBA652FFD752FEE051FFA693B17FB4117FA73DEA390C4EFC876F8ADB87DF66F216CADBA9F2F1DB29F1E3B0972D650F5666EA39EDF2FB00F8FAF1A31FBC296660FF90DAA393C5F6EEC0EFF72CDCEF93A56CA312AB1F7F59FEED41E7CECED159B06CE473F0F5E3870BFF4BCC37C9DF634D39F83B2F47CF8D2ED79C5709BE7EFC40DE2FC5A273266081592F7ACF9FC1D78F87CF2EFB3BA1D0FBFD50E4E8C0372C7E3DC2E39FE6E7DCC4CB41907C3508EE4B79B063FD9F33FF0FD8EB99A0]
 Point(Handle)
 Point(onMouseDown)
 link(onDeactivate,995697:doCompare,[(223,167)(223,321)])
 link(onCreate,3459737:doStartDSKSwitch,[(209,174)(209,125)])
 link(onMouseDown,13408770:doEvent,[(77,181)(77,188)])
}
Add(CheckBoxRush,161569,378,266)
{
 Left=155
 Top=80
 Width=80
 Color=0
 ParentFont=0
 ColorFrom=128
 ColorTo=0
 ColorText=16777215
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Checked=0
 Caption="Auto Hide"
 Point(doCaption)
}
Add(ButtonRush,12212611,128,279)
{
 Left=10
 Top=105
 Width=295
 Font=[Calibri,11,1,0,0]
 ColorFrom=128
 ColorTo=0
 ColorText=65280
 ColorFromOver=0
 ColorToOver=128
 ColorTextOver=16776960
 ColorFromDown=8421504
 ColorToDown=255
 ColorTextDown=16711680
 Caption="A   U   T   H   O   R  "
 Glyphs=[]
 Point(doCaption)
 link(onClick,9013219:doWork1,[(171,285)])
}
Add(ChildForm,14680314,182,280)
{
 FirstUsage=0
}
BEGIN_SDK
  Add(EditMulti,14534754,14,21)
  {
   WorkCount=1
   Width=538
   Height=452
   link(doWork1,3123048:doVisible,[(28,27)(28,146)])
  }
  Add(MainForm,3123048,42,112)
  {
   Left=35
   Top=105
   Width=508
   Height=338
   Visible=1
   Caption="VIRTUAL DESKTOP  V:1.2"
   BorderStyle=1
   Position=1
   Point(doVisible)
  }
  Add(Label,14788309,140,56)
  {
   Left=100
   Top=45
   Width=320
   Height=40
   Font=[Calibri,30,1,0,204]
   Caption="dev: E R N A Z A R"
  }
  Add(Label,8063261,133,105)
  {
   Left=100
   Top=85
   Width=150
   Font=[Calibri,10,0,0,1]
   Caption="Телега: @trollpk"
  }
  Add(Label,1243355,126,175)
  {
   Left=320
   Top=85
   Width=75
   Font=[Calibri,10,0,0,204]
   Caption="01.09.2018"
  }
END_SDK
Add(If_else,995697,378,315)
{
 Op2=Integer(1)
 link(onTrue,4122919:doWork3,[(422,321)(422,225)(128,225)])
 link(Op1,161569:Checked,[])
}
Add(TrayIcon,8481374,140,105)
{
 link(onClick,3251815:doEvent,[])
}
Add(PopupMenu,7826476,84,28)
{
 Menu=#1:1|1:2|1:3|1:4|1:-|4:Show|6:Author|1:-|4:Exit|0:|
 link(onClick,5984516:doEvent,[])
}
Add(IndexToChanel,3251815,196,105)
{
 link(onEvent1,5787423:doWork2,[(240,111)(240,99)])
 link(onEvent2,7826476:doPopupHere,[(240,118)(240,86)(72,86)(72,34)])
}
Add(IndexToChanel,5984516,126,28)
{
 Count=9
 link(onEvent1,9608300:doEvent2,[(278,34)(278,55)])
 link(onEvent2,2545919:doEvent2,[(348,41)(348,55)])
 link(onEvent3,15125473:doEvent2,[(418,48)(418,55)])
 link(onEvent4,1994337:doEvent2,[])
 link(onEvent6,5787423:doWork1,[(186,69)])
 link(onEvent7,9013219:doWork2,[(163,76)(163,286)])
 link(onEvent9,2121902:doClose,[(170,90)(170,139)(25,139)(25,181)])
}
Add(DSKSwitch,3459737,350,119)
{
 Alt=1
 Ctrl=1
 Win=0
 link(onDSKSwitch,2121902:doCaption,[(394,132)(394,146)(25,146)(25,160)])
 link(DSK,1932000:Value,[(356,107)(548,107)(548,254)(741,254)])
}
Add(LED,16066838,476,112)
{
 Left=30
 Top=45
 Color=0
 Value=0
}
Add(LED,2116203,598,120)
{
 Left=105
 Top=45
 Color=0
}
Add(LED,12316043,707,116)
{
 Left=180
 Top=45
 Color=0
}
Add(LED,6675308,843,109)
{
 Left=255
 Top=45
 Color=0
}
Add(Hub,9608300,399,42)
{
 InCount=2
 OutCount=5
 link(onEvent1,439726:doData,[(420,48)(420,20)])
 link(onEvent2,4625939:doWork2,[(505,55)(505,133)])
 link(onEvent3,13000517:doWork2,[(478,63)(560,62)(560,129)])
 link(onEvent4,4880813:doWork2,[(628,69)(628,122)])
 link(onEvent5,16066838:doOn,[(445,76)(445,132)])
}
Add(Hub,2545919,539,42)
{
 InCount=2
 OutCount=5
 link(onEvent1,12411239:doData,[(571,48)(571,13)])
 link(onEvent2,1866036:doWork1,[(565,55)(565,90)(464,90)])
 link(onEvent3,13000517:doWork1,[(690,62)])
 link(onEvent4,4880813:doWork1,[(823,69)])
 link(onEvent5,2116203:doOn,[(575,76)(575,140)])
}
Add(Hub,15125473,679,42)
{
 InCount=2
 OutCount=5
 link(onEvent1,11151496:doData,[(703,48)(703,13)])
 link(onEvent2,1866036:doWork3,[(705,55)(705,118)])
 link(onEvent3,4115317:doWork1,[(705,62)(705,96)(578,96)])
 link(onEvent4,4880813:doWork3,[(758,69)(758,131)(823,131)])
 link(onEvent5,12316043:doOn,[(700,76)(700,136)])
}
Add(Hub,1994337,819,42)
{
 InCount=2
 OutCount=5
 link(onEvent1,2570945:doData,[(843,48)(843,13)])
 link(onEvent2,1866036:doWork2,[(845,55)(845,87)(455,87)(455,118)])
 link(onEvent3,4625939:doWork1,[(845,62)(845,96)(564,96)])
 link(onEvent4,13000517:doWork3,[(845,69)(845,138)(690,138)])
 link(onEvent5,6675308:doOn,[(838,76)(838,129)])
}
Add(HubEx,13000517,686,123)
{
 link(onEvent,12316043:doOff,[])
}
Add(HubEx,4880813,819,116)
{
 link(onEvent,6675308:doOff,[])
}
Add(HubEx,4115317,574,127)
{
 link(onEvent,2116203:doOff,[])
}
Add(HubEx,1866036,460,112)
{
 Angle=1
 link(onEvent,16066838:doOff,[(464,125)])
}
Add(HubEx,4625939,560,127)
{
 link(onEvent,4115317:doWork2,[])
}
Add(HubEx,5787423,182,93)
{
 Angle=2
 link(onEvent,8481374:doShow,[(128,99)(128,111)])
}
Add(HubEx,9013219,167,280)
{
 link(onEvent,14680314:doWork1,[])
}
Add(WinTools,703818,49,224)
{
 link(Handle,2121902:Handle,[(55,205)(43,205)])
}
Add(Switch,1611824,70,350)
{
 Point(onOff)
 Point(onOn)
 link(onOff,5668387:doWork2,[])
 link(onOn,5668387:doWork1,[(114,370)(114,356)])
}
Add(ChanelToIndex,5668387,126,350)
{
 link(onIndex,703818:doPopup,[(170,356)(170,296)(37,296)(37,237)])
}
Add(HubEx,4122919,124,119)
{
 Angle=3
 link(onEvent,8481374:doHide,[(128,118)])
}
Add(PopupMenu,7038406,147,406)
{
 Menu=#13:Qaraqalpaqsha|9:Inglisshe|1:-|5:Avtor|4:Exit|
 link(onClick,1532362:doEvent,[])
}
Add(IndexToChanel,1532362,196,406)
{
 link(onEvent1,11921843:doEvent1,[(250,412)(250,405)])
 link(onEvent2,9937466:doEvent1,[(250,419)(250,475)])
}
Add(IndexToChanel,13408770,84,182)
{
 link(onEvent2,7038406:doPopupHere,[(132,195)(132,412)])
}
Add(DoData,7906665,378,378)
{
 Data=String(A  V  T  O  R)
 link(onEventData,2570516:doWork2,[])
}
Add(Hub,11921843,273,399)
{
 OutCount=9
 link(onEvent1,7906665:doData,[(333,405)(333,384)])
 link(onEvent2,2325568:doData,[(333,412)(333,419)])
 link(onEvent3,3059947:doData,[(333,419)(333,454)])
 link(onEvent4,399519:doData,[(333,426)(333,489)])
 link(onEvent5,7854004:doData,[(333,433)(333,524)])
 link(onEvent6,11304452:doData,[(381,440)(381,384)])
 link(onEvent7,14476296:doData,[(381,447)(381,419)])
 link(onEvent8,1077856:doData,[])
 link(onEvent9,14490475:doData,[(381,461)(381,489)])
}
Add(Hub,9937466,273,469)
{
 OutCount=9
 link(onEvent1,10769331:doData,[(333,475)(333,594)])
 link(onEvent2,3919844:doData,[(333,482)(333,629)])
 link(onEvent3,15309548:doData,[(333,489)(333,671)])
 link(onEvent4,702586:doData,[(333,496)(333,713)])
 link(onEvent5,10752799:doData,[(333,503)(333,748)])
 link(onEvent6,4758582:doData,[(399,510)(399,580)])
 link(onEvent7,5336741:doData,[(399,517)(399,615)])
 link(onEvent8,2062757:doData,[(399,524)(399,657)])
 link(onEvent9,1354438:doData,[(399,531)(399,699)])
}
Add(DoData,2325568,378,413)
{
 Data=String(Aynalar)
 link(onEventData,14615212:doWork2,[])
}
Add(DoData,3059947,378,448)
{
 Data=String(Oshir HK)
 link(onEventData,7520329:doWork2,[])
}
Add(DoData,399519,371,483)
{
 Data=String(Avto Jasiriw)
 link(onEventData,7211152:doWork2,[])
}
Add(DoData,7854004,378,518)
{
 Data=String(Jasiriw)
 link(onEventData,14427896:doWork2,[])
}
Add(DoData,11304452,476,378)
{
 Data=String(BIR)
 link(onEventData,1124961:doWork3,[(520,384)])
}
Add(DoData,14476296,476,413)
{
 Data=String(EKI)
 link(onEventData,7008833:doWork3,[(520,419)])
}
Add(DoData,1077856,476,448)
{
 Data=String(U'SH)
 link(onEventData,16632705:doWork2,[])
}
Add(DoData,14490475,476,483)
{
 Data=String(TO'RT)
 link(onEventData,13587257:doWork2,[])
}
Add(DoData,10769331,378,588)
{
 Data=String(A  U  T  H  O  R)
 link(onEventData,2570516:doWork3,[(417,594)])
}
Add(DoData,3919844,378,623)
{
 Data=String(Big Win)
 link(onEventData,14615212:doWork3,[])
}
Add(DoData,15309548,378,665)
{
 Data=String(Off HK)
 link(onEventData,7520329:doWork3,[(431,671)])
}
Add(DoData,702586,378,707)
{
 Data=String(Auto Hide)
 link(onEventData,7211152:doWork3,[])
}
Add(DoData,4758582,511,574)
{
 Data=String(ONE)
 link(onEventData,1124961:doWork1,[(555,580)(555,356)])
}
Add(DoData,5336741,511,609)
{
 Data=String(TWO)
 link(onEventData,7008833:doWork1,[(555,615)(555,398)])
}
Add(DoData,2062757,511,651)
{
 Data=String(THREE)
 link(onEventData,16632705:doWork3,[(555,657)(555,557)(536,557)])
}
Add(DoData,1354438,511,693)
{
 Data=String(FOUR)
 link(onEventData,13587257:doWork3,[(592,699)])
}
Add(DoData,10752799,378,742)
{
 Data=String(HIDE)
 link(onEventData,14427896:doWork3,[])
}
Add(HubEx,1124961,516,350)
{
 Angle=3
 link(onEvent,1932584:doCaption,[(520,216)(338,216)(338,48)])
}
Add(HubEx,7008833,516,392)
{
 Angle=3
 link(onEvent,12463032:doCaption,[(520,235)(467,235)(467,52)])
}
Add(HubEx,16632705,532,448)
{
 link(onEvent,830048:doCaption,[(570,454)(570,50)])
}
Add(HubEx,13587257,588,483)
{
 link(onEvent,4557624:doCaption,[(631,489)(631,48)])
}
Add(HubEx,2570516,413,378)
{
 link(onEvent,12212611:doCaption,[(422,384)(422,334)(116,334)(116,285)])
}
Add(HubEx,14615212,406,413)
{
 link(onEvent,10979534:doCaption,[(422,419)(422,317)(160,317)(160,216)])
}
Add(HubEx,7520329,427,448)
{
 link(onEvent,7182722:doCaption,[(434,454)(434,208)])
}
Add(HubEx,7211152,406,483)
{
}
Add(HubEx,14427896,406,518)
{
 link(onEvent,5151311:doCaption,[(422,524)(422,366)(229,366)(229,207)])
}
Add(Memory,1932000,735,210)
{
 link(onData,3459737:doDSKSwitch,[(779,216)(779,178)(338,178)(338,139)])
}
Add(DoData,439726,427,14)
{
 Data=Integer(1)
 link(onEventData,14245694:doWork2,[(597,20)(597,216)])
}
Add(DoData,12411239,588,7)
{
 Data=Integer(2)
 link(onEventData,9359042:doWork1,[(704,13)])
}
Add(DoData,11151496,714,7)
{
 Data=Integer(3)
 link(onEventData,9359042:doWork3,[(758,13)(758,225)(704,225)])
}
Add(DoData,2570945,854,7)
{
 Data=Integer(4)
 link(onEventData,14245694:doWork1,[(898,13)(898,113)(690,113)])
}
Add(HubEx,9359042,700,210)
{
 link(onEvent,1932000:doValue,[])
}
Add(HubEx,14245694,686,210)
{
 link(onEvent,9359042:doWork2,[])
}

0

Поделиться22023-09-01 08:36:06

Автор: Phenix
Новичок
Зарегистрирован: 2022-10-05
Приглашений: 0
Сообщений: 29
Уважение: [+0/-0]
Позитив: [+0/-0]
Провел на форуме:
7 часов 20 минут
Последний визит:
2024-04-11 15:54:59

Простая программа с одним основным компонентом, красиво оформлена но можно на будущее кнопки Русскими сделать всё же в России находишься надеюсь.

0

Поделиться32023-09-09 20:26:53

Автор: envoy_sky
Активный участник
Зарегистрирован: 2021-09-25
Приглашений: 0
Сообщений: 31
Уважение: [+0/-0]
Позитив: [+1/-0]
Провел на форуме:
14 часов 50 минут
Последний визит:
Сегодня 12:33:51

Phenix написал(а):

будущее кнопки Русскими сделать

Интересная программа :cool:
Язык Английский и Каракалпакский.
Я думаю кто разбирается может сам добавить Русский.
Но советую использовать компонент Translator.

Пример сперва сохрани !!!

Код:

Add(Translator,13244755,301,217)
{
 Lang="ru"
 LangWords=['Edit'="правка",'Label'="метка",'This example show how you can add multi language in your HiAsm project'="Этот пример показывает как вы можете добавить многоязычность в ваш проект HiAsm",'Hello world'="Привет мир",'Push'="Нажми"]
 AddHint(59,-30,24,13,Lang)
}
Add(Edit,6652430,189,56)
{
 Left=150
 Top=25
 MakeTrans(Text)
}
Add(Label,8717120,133,56)
{
 Left=80
 Top=30
 MakeTrans(Caption)
}
Add(Label,8392555,161,98)
{
 Left=35
 Top=65
 Width=237
 Height=42
 Caption="This example show how you can add multi language in your HiAsm project"
 AutoSize=1
 MakeTrans(Caption)
}
Add(InfoTip,15815105,105,35)
{
 Info=#18:static translation|
 Width=155
 Height=109
}
Add(Button,14674692,112,203)
{
 Left=85
 Top=115
 MakeTrans(Caption)
 link(onClick,7292687:doStrCat,[])
}
Add(Label,9255622,210,203)
{
 Left=155
 Top=120
 Caption="------"
}
Add(StrCat,7292687,161,203)
{
 Str1="Hello world"
 MakeTrans(Str1)
 link(onStrCat,9255622:doText,[])
}
Add(InfoTip,3445379,105,154)
{
 Info=#19:dynamic translation|
 Width=155
 Height=109
}
Add(ComboBox,11375930,301,119)
{
 Left=5
 Top=5
 Width=40
 Height=21
 Strings=#0:|2:ru|2:en|2:qr|
 Text=""
 DataType=1
 link(onClick,7932201:doEvent1,[])
 AddHint(56,-53,15,52,Strings)
}
Add(Registry,16395214,490,84)
{
 HKey=1
 Key="Software\HiAsm"
 Value="tr"
}
Add(MainForm,14224132,546,112)
{
 Left=20
 Top=105
 Font=[Arial,8,0,0,1]
 BorderStyle=1
 Icon=[ZIP7E03000078DA8D934B6EC2301086FF1044782814845455804497D9C382ABF0460841AF51B1E8AAEA117A823C5A5489EE62B8487B8376C7B27F18C9722325EDC449ECF137CE6FCF04B078351AE0F3067736700DC0E34D176E21FE8BD9F8CB166AD1D9779CC061EBEEBB4BB5CC22C7F1B812560A7E013E74E390CE493C49C1FD43BF1C9409705976DCC86563479C0C191C061A1EC523EDDF9C36E63AEBE3BA1A56656AAAA6E2645F3C59524D60A66614C9F5B7A76D16CFAF5027319E46FBB5CDD8444FAE8960393A76EA513D9FE7F66559097443379FAF853562A5A0C44FFC478FC8A07866B0E81719B83AAEB260E68B80EDDB923839E1E479B1D64B2BC5EB14C870AEE672C2F453A7E55B9AE494CEBB5915C3F7A18448CDE83451AAECCEAC07319932796A967A63C1A4E066D4D435A9F5786F1E8B36459E7BC08703C4FC37760A78FA06AEBE80DEF9F79DF81E39774F46ED80CF07BE9F811FF7A682A8]
 link(onCreate,12129035:doData,[])
}
Add(WinExec,3798068,721,182)
{
 Mode=0
}
Add(Hub,7932201,420,126)
{
 OutCount=3
 link(onEvent1,16395214:doWrite,[(462,132)(462,97)])
 link(onEvent2,14224132:doClose,[])
 link(onEvent3,15061640:doData,[(462,146)(462,188)])
}
Add(Edit,9590918,770,126)
{
 Left=40
 Top=165
 Width=340
 Text=""
}
Add(Dir,8727626,651,28)
{
 Name="Translate.exe"
}
Add(GetDataEx,14974857,651,70)
{
 link(Data,8727626:CurrentDir,[])
}
Add(DoData,12129035,721,126)
{
 link(onEventData,9590918:doText,[])
 link(Data,14974857:Var3,[(727,75)])
}
Add(DoData,15061640,651,182)
{
 link(onEventData,3798068:doExec,[(718,188)(718,188)])
 link(Data,14974857:Var2,[])
}
Add(Translator,362932,301,273)
{
 Lang="qr"
 LangWords=['Edit'="Едит",'Label'="Лейбл",'This example show how you can add multi language in your HiAsm project'="Зис екземпл шоу хов ю кэн",'Push'="Пуш",'Hello world'="Хелоу ворлд"]
 AddHint(61,-26,24,13,Lang)
}

Отредактировано envoy_sky (2023-09-09 22:45:11)

0

HiAsm - Конструктор программ

Меню навигации

Пользовательские ссылки

Информация о пользователе

Virtual Desktop 1.2

Сообщений 1 страница 3 из 3

Поделиться12023-08-31 22:28:25

Поделиться22023-09-01 08:36:06

Поделиться32023-09-09 20:26:53