Вверх ↑
Ответов: 199
Рейтинг: 44
#1: 2023-02-16 14:14:58 ЛС | профиль | цитата
Скомпилировал в Unicode режиме (FPC-32U), в итоге выводятся иероглифы, на изменение кодировки вывода никакой реакции, но и так понятно что это только знаки '?'.




Add(MainForm,3171043,224,140)
{
Left=20
Top=105
Width=900
Height=401
Caption="OLEXLS"
Position=1
link(onCreate,11947023:doStrCat,[])
}
Add(OLEdb,2142462,455,259)
{
link(onConnect,14252000:doCreate,[])
link(Driver,9469155:Var1,[])
}
Add(Button,941652,357,259)
{
Left=310
Top=10
Width=75
Caption="Подключить"
link(onClick,2142462:doOpen,[])
}
Add(OLEdb_Query,11136757,609,266)
{
link(onQuery,16321824:doStr,[(657,272)(657,237)])
link(onColumns,5673081:doEnum,[])
link(onError,5776200:doWork3,[(767,286)])
link(dbSession,14252000:dbSession,[(615,247)(549,247)(549,304)(517,304)])
link(Text,9469155:Var2,[(622,243)(468,243)])
}
Add(OLEdb_Session,14252000,511,259)
{
link(onCreate,1603248:doWork2,[])
}
Add(StringTable,6078793,917,231)
{
Left=10
Top=40
Width=375
Height=210
Font=[MS Sans Serif,18,0,0,1]
ClearAll=0
Point(doAddColumn)
Point(doInCharset)
Point(doOutCharset)
}
Add(MT_Enum,5673081,714,273)
{
link(onItem,6078793:doAddColumn,[(833,279)(833,258)])
}
Add(MT_String,16321824,693,231)
{
link(onResult,5776200:doWork2,[])
}
Add(Edit,11108326,399,196)
{
Left=10
Top=10
Width=295
Text=""
link(onChange,9469155:doWork1,[])
}
Add(Dir,5145339,273,105)
{
}
Add(StrCat,11947023,273,154)
{
Str2="test.xls"
link(onStrCat,2808741:doEvent1,[])
link(Str1,5145339:CurrentDir,[])
}
Add(MultiElement,9469155,455,196)
{
}
BEGIN_SDK
Add(EditMulti,3827619,21,21)
{
WorkCount=1
VarCount=2
Width=272
link(doWork1,7246550:doEvent1,[(56,27)(56,55)])
link(Var1,6365623:FString,[(27,175)(195,175)])
link(Var2,10216816:FString,[(34,195)(153,195)])
}
Add(StrPart,14854628,77,119)
{
Char="."
link(onPart,10216816:doString,[])
}
Add(FormatStr,10216816,147,126)
{
Mask="SELECT * FROM `%1`.`Лист1$` `Лист1$`"
Point(FString)
}
Add(FormatStr,6365623,189,98)
{
Mask="Driver={Microsoft Excel Driver (*.xls)};\r\nDriverID=22;\r\nDBQ=%1;\r\nDefaultDir=%2;\r\n\r\n"
Point(FString)
link(Str2,1388409:Value,[])
}
Add(Hub,7246550,91,49)
{
OutCount=3
link(onEvent1,7670056:doPart,[])
link(onEvent2,6365623:doString,[(128,62)(128,104)])
link(onEvent3,14854628:doSplit,[(117,69)(117,97)(65,97)(65,125)])
}
Add(Memory,1388409,196,49)
{
}
Add(FilePartElm,7670056,140,49)
{
Mode=0
link(onPart,1388409:doValue,[])
}
END_SDK
Add(MemoryStream,8116148,350,84)
{
Stream=[ZIP0070000078DAED5D075C1349DB9F4D02846A28468A40A4284A911A10E9C88908829E67C1B3A00641290A5811C113CF0287A858E1F43C44D45354101B22589113112BA2A2D845C5762A60CB37B3492059364BB8EFDEEF7DBFDF9BC96F37BBCF3CF3FC9F99E799D999C9ECA4E69266C3B603FAF7012178003AF8C657068A62340C1E5CD10D0BC0783E1F5D8ABE9DE0C19787FF574199090DA9A80042832F2A55021A506402701F7EEF679C8467001EC0E34730133000F8219E17C7F9BF0A3EB80E6118D2A11C3A9E3BBCC2400EA46A023D5C332DFCAC8D9FF7E17CC7F1B33B8C69492EE99132B3A2AF8BD06FC7D0BC70BE5FF0B3097ED60048E2613CCD2D9C62078CC01DF8CD0499C8D569554009F30561200A4482C9200E9EFFD338943BE5F0E88403039EE0388D9AC39192C30AC360AB40C5C1E89403A174CEC1EC94439982A31F88C050FB252A0F7502070704C2F334100112DA4ACF8DA2F46CC09B761B6155A01B3612D2A3010FC44359C3E0F75CF83D02C4425A18886993A9D3894568A047A75675EC9443A5530E4D4A8E379D9637E2E027776691CE39A4A318311C80022C0DCC14580153F8B1854D110756DF528E091808AFAD01598C11C31D3EB67A4A4B360EDA8407A682F114023C811230141760030F2A7462BC116308CC9809B508699A7414360B7A2F176013215B3F4826531AC509B4A2E610C93081DF26A4B15EF8D9883103F4050ED24027C2445490EDF11D0125E344708B617A0F32386271488325E79384F7841FAA3C27024B48A154822AE7645CE40A909541036C1B50F8C0E788F5BACA3988AE20A2BF97D3FF09BAA05F2056CE3402FF41219DB1550A7D9F14FA0A29F4CD52E8D952E8BBA5D0F774519FF552E87F7451BE34FE03FF267D8EE274C50EF41352E8C552E887A5D08BA4D00F48A10BF45112D1B3343537A86E50159503538C5E665C662C2A07E50EFCA2F2B112D05B88FEDC8F94AE2292730D84C04B63115D5592CE16D1D5DAE9F094A2DB814EA82FEAEDFC61B057D9265FA34DFFF07041BE04E5D94D8A1C9614BB6B4A69F7B43AF0EFC5E9DA9DD5F71C4D4DB62A5BB5BDDE2993969B4E7BBE26C14B7D11BDBB54F99652ECD29794CE9652AFD545ED0F53B2FD69A35B686A7A71BC382C21BD07A40FA743F5E649D27545741729FC043A20C15DC8D4010B99E2A37F3F90B5B1E7E724A63548621267066850471D4017CE07881E641AB004681D13605D4D40EB6A027A571330BA9A40A1AB0914BB9A40A9AB09985D4DA0DCD5042A5D4DA0DAD5046A5D4DA0DED5041A5D4DD0ADB304DE84042CDC01A52660E011BC70E472A2EE6147219AB20951A014A2259B10454A21DAB20951A214A2239B1026A590EEB20951A614C29645485520B5757AC82684DA3ABAB209A1B68E9E6C42A8ADA32F9B106AEB18C82684DA3A3D651162EF406D1D43D984505BC7483621D4D631964D08B57538B209A1B64E2FD984505BC744420820172278984A17622A9B106AEB98C92684DA3AE6B209A1B64E6FD984505BA78F6C4224ADB39A20C402D7150941FD254FCF39FC0E425004BF6A135F244449484B4E4EE68BA61D986234D1B484B218CD4B3839A1224613A9D051A9BE04A53CC9957AF7EE5D07A51033512944232A856844A57020A94AF59350EA5312905DA97FAEA488FD0CCBAE764CACBADA31B196F0323A310153A6EA6B238B10BE27B590FEB2082136F3C4FCDB4AE49FDE31FF3F1012D8E199935A604A24F9172F1391D93BFA937D9B3F49ADBEC8FE797979FF422727168F0365F1601D8DE2D86614243C67B4945AC17F91C36F378A054188135EB26465DC11902B090814A5005654F3A57B81735B36DBAA98A417108DE522612C4C9AB1F8FCAA0EC62A2C2CEC602C44231A0BD188C64234E9C61AD0D5BAEC2A51761D9A309176FC148CA2EC064A941D1F007E274D8E5B57DB28F7AEE6CB43225F204C8A139E7B4DE5139E5D55D3ABB3047A8404DE389B94481FAA485FF148A21E83A8F5584B3386A34B7580D9C36C9B4397D3E170802DC395F11DC389E1CEF061D88135CC207888CDB5308CF8EA403A3F2A6D0C0EBB9518BCF0BAFBEFF80AE81A07067C7311A62615A63D09A60905A67D3BA6022FFCCBA31BE4985A54980E2498BD29301DDA311579E14D4D4DE498DA54988E2498FD28301DDB319578E1FC7755E4983A54984E24983614984EED984C5E78FD8B6672CCEE54985C124C7B0A4C6E3BA6322FFCC1EB5BE4986C84E9D805BF3586988E32F86D55E0C1734FC9317B506192F9AD2905A6B8DF5605B65CD84B8EA94B8549E6B77D2830C5FDB62AF0F6EDDBE4987A5498647E6B498129EEB75581FC279BC831F5A930C9FCB63F05A6B8DF560596D6BE22C734A0C224F35B070A4C71BFAD0A3CD770901CB327C2E476C16F3910932B83DFDA3B64EC92624F432A4C32BF35A3C014F75B7B87F7FB53C9318DA830C9FCD6820253DC6FED1D2A2B2BC9318DA930C9FCD68A0253DC6FED1DF875E1E4981C2A4C32BFB5A5C014F75B7B87EC534FC8317B516192F9AD2305A6B8DFDA3BECAAC920C3D40626B0D78AB108BEEA4DC031E42B019614FF84BD91B83302D9C2259C6DB24D89B2ED4964F722C816F743009A92ECC8659B11653B90C83627C816F737C1388B54B63951B62389ECBE04D9E27E05E5950372D9BD89B29D48645B13648BFB0F00E3B2AF93CBEE4394CD25916D47902DEE2700CCDC3B984C7637608106835A0C7B8607C391C18132674BCAA5E9C074EDF168EC84642AF00533490AC26B34DD84CB54447D5BBE6024864166F13BA6C49DB2C41DD2A5AF4097A142B48EBA74C77511C58BEB82E66ADA75F194D40511DA7511DC3125EE9425EED6D2F4403F3872C37519CC7061783306E2A5EA02CF6B98C904ADD87C1540C6294D3F345AFB5F96150358A630F86B98BD25555160F0E1C80F57C089C185E7A18C0168EA024F6195A20453D8105228F1D53AA4E08071B0F1190F04290DE0385615603D18B60C0758EE03E181CADF15B2A13665A8A4403A8BAF0AC879913FE23E08073783464E179401CA757B6383D06CA4A1D993A0694A41B3A742E37BFE7EE4BE10ADBF34340712342D29680E546882073D0D47B39586865A2277029AB61434477C94D8016D2D4D1D16320360BAB0F67BC0541DF5D7E3338028164D6A757872288A5943E091A23B45A87F5F58AC5A00D387E9510BE385EB1508AF6D19C150AF6058039CA0FBB8C2FB35CC55845AD283AF056449295E6B485B72F15AAD2851AB15256AB5A244AD46FA7787866202CC10A238C3D2B46DABD1CE8472EA06AB11918BACCC316453476453435C7F94335B61CE50455AC31C222919EB096D4ACE2B6AADF196F5454E5B6B8126E284F6853C2900D661278250009B7E23861DDE048984D10049B7A0077082858249F20A2A96A3844C54DCCAA0231F9A941097BB96A6093B2A8A0033C63DD40F1E28D79E04050D60F18B7348E4B5A2BA3DAF40B15D5567A4AA31E40F86ADAABB58FB3B80E0594E50D58E7CA22210359B42B97AC005B5ECC6B0F45D186E906FB0981FC41024ABC0969D8C13FD3CD5A63FBF8A2F724934C9D7DE900BEE981277CA1277C8A4035214A049FB119A650521B247DBF35CBC313707AE8005B05ED03D83A19322B5C82BE10F840CE9F259A0B354A2A64CE25125CA139A504455094D83EA00CC04A67285C5EE03657842759DE063D99721B8E2C26B813182A126C1044D54F93A40D6D4E2A6E403B1EAE0964227293B3A2C3B3398D01DCFA237DE728A3F08DD5314612A7B422A45BE06692AC987A136F040ED93398C46C6F1870990C3133A63983EAC91923CE22E8F662F45F941539C787E329863408698904C7C158826180939268328C003DF8304301FBF0AC297884782D9201A56CA10783507C4C2D8760EF1D716B86012FE42CB52D8786FF1C1572F6106785F05F5F8373375E121B93A4BF49DCB64C14372A9573A7C6E28C1CF498C090F009C9ED3C017D0802F67600AFA9C260C6BD82A320417F6500321CDA99DE600FD5719C33B96A86B600B0F1758E339E00A5DF441ABA295811E62A4913066D1451F01A33EF4D01E1D9907C0EC73C001BAE8230373215DF41167E6C3668309DC1D058B94A630D9F0905C562258AAB69E69A7BE5E2C463D9D064286D21968792813FF25BEF16EB73264F99E34C1EA9A71BEB13109BC98848923E7CFE4C58FB799171DB567F58561A76D597ECDFE5F963CB60EC829F4629A37FE549151F1FBC2F2F39BCCD895370BF37FF8DC1C7865A4CF4E0E3BCAAACEA179CBC08771A5C64AC5A737E6E407EC7BE76369F6C260F0F8BC7BCEC1757B47AD58ACAFEB1696D76DE3FB63278E5B382F4B19B262F388BCC42733A70516BA6764C619676EBFF2C98576C1694EEF94AF291A17670FBFA3FB62C56A978795BEB58FE987F61B8E717FF5B875A3D983CC83C73CB9C3F604F832971495AFB9F67267EB77956C1F9B3F8FF6F960B3DD72C5B68B634F8D6CD5DBFF6C02CFE9B2D3CEBB9C77AAE95AA7F7ABAD9878691A47CFFA49D9C02D2B5EDEBE3136EA787D4661C642EE84AA6127F93A933E783ED3BE5A953C2E9986DA533AA1BCF26EE43F2D47BF176182156513E37851F1FD6DD03975D5A5E9A76DD596BD5E5ABAE472D2F02BA775CDE7F4CFCBF4ED9F9B04EE5B24479818DC3678713BB84251A58499BAFD75F32EF76F0569ADF7B39E72D89B772B9E7EE0EB7921E2FE1CF7B2E49F2A976ECF37678E9B37F3E7DCC4DBC5138F875CCE75BB686790E77FC8769D56B7E575C1C74714F84CBD5CC9BA12E077DB71B25972FEEA59136B8D376ED16BE0065EFDC01E51EB3CA960D5CE4A7ED169DBAA2DC12793F7593DF663C4386705463E9ABC6D67FF87DF9766EEE4EDBE6654537CA4F5C6578C2CA333E6AF672F81572B852B61122278D1BCFE62E7A0B098B069BC38E4216A55412AA7392CAFFB49DBE666D6394F29B1F09B5C78A1A0E423F0CDD1F7AEF8EDCAD6DBB58F1F2E71AEBEA7733D7BA8FA58AB1C25F595BC8B36CB0FBF5968956FB0F3967FCFB35651F72BBA3F699CA75B79F017ED7B43CEC70F4F32BD9EB9746F713DE746B1E5F55EAFADEA271C359BEE9E3678F4B3ABCD7D1FF8BDB0ECAD427321575EEBC562D75DB0A3D6CA11D4860ECADB21B55F8E1D9F66E0DCE344FFF79E6AF1AF5B669C331E9AF3E052D4DA7AB333C302FA171F7A397C9483BDE97CE71D8C80051FEE1EEFDFFF609EF3D243CEA51679AA41917DADBFAADEBEC7F27F56B1EAD9EA7037D3BAB8C292D435EBEB97D6EBB50E18BCAA7A80EBD331C73EDD389DE93AD8E549AA9FF5E185798F5C5DF48B9457845B37DF8D088938A2D1C36233E74F933B711B3696C48E4FFCEB973F22E0A8ED8CC6F9C10B958AEF782D6F1D76E07C856D7A4B776E85E6422E6FD672C6F173450FCCBEABF8CD79FBD9805D232D7F5E3EA8407B1BEBDA9645B33ED53706E7F7A96E6ACC4A3F90189D57161CB6C67FE600DB1D6F43A657586EBB949CB47041DCA7BF1AD75E5D3BF1DEB2A75BEFF3F9592F1FEDB7326F593337F265CF5EB7E2C29E2B0F34BABFECD46C8B07348F88A3E61F1EB2F78DB7FEFDD791CB575A176EBEE3F5757BDCAEF247FB7F7F923E4DA96EFB96A789C573764CC476DE3CF3E1C5D7D0B2F58DDF0347A3D37F6ADBECA85E90F7226F8C7A965B6842F3F3D2E975E5333EFD619073FBC417A7372A59CF9AB96F9678F7D813D1D0DDE2E467837965575FBE0FFCAA92D530C3A065C1AEFABF9EFFBC4841C5628586738D79D9A8A68251D9DE3BD25F85DE0FBA6770CD72D7BB9E0A9733FDB27326FF6932EBC64DD5CB7476372F2F951166FE8F963FEE197C5997569A663160F98AA2C1E118E3414FBFF4D333778DD0CFDAFD66F4B705CF87CCD76D9AB47DC8D02DE5E9B16A43166918574CB5097DA55EF37C7AE634CF2F6FDEBF5D9BBFAA2CF9D349A560E3E4B5D57B47EAC595586C6E8C4B5ED8CAF7F44CBAD7FAF5F6A56F2D6F72A73E9FED56FBF652D9B74B7F1927CF5FBD60CCAC9895D38CB7BA25C7BD7BB996FFEDE3F565ECA6265DC3676F3495EDE6C6DC9FF2D446356C31FB5B0BC763EB190BAF33995ED8B3433B5FA59583BBA126D34FCFDE1F79EAB3DD544383379F1E2C3E395BF78CAAB795C33D351FFA914BBA4DFB6F4E4FC98EB3B9782AD7CFB128D8A87FC29DF1A91951F173874F753952B6D1F79339775D3D30707C1DA2A3EC785A939DF125DD7072D4D8FA9254DD39F57D1E6E9CC5ED5E5D72A69133D9A972794FDDC559AA4D6B585F0A0F6A32461B1CAA2B7B9DA05BBCF7D8B255816651AA83AC1F0DDEA81F7E3C834D5BCA5D67AA33A2BE21D19FC15D739AE7766356924DF95587C04D57B74EAA8EB63F3C65CCBE27EFB333C35EC6DCCBBF5033E8DC4F3D6F25BCEA752E61EA2AC339749DEAE89BBD56D00C3F733D53597ED586BDA3DE2485BF62B56A2CF2BA3C6AEEBD3E3767365FD03EE9EE5FE09AE7E6F5A84FDACD07175E6CD47B3BF0C72B7D4F1DB2BA9AE16B5A7268CAE45F32AA2787A77E343AA76398AB7CAEBAF4B0B59A6B54CC4DB73E49A6297B0AD3A217CFA66F3AD0EF9E69D581DC4F3917758E0E3EA259E8EB36655CCBCBFEB55A97B4FC7AAD3C1C794261426DF4DD65FDA605E51D6E6C0951BA6B52D3CBE7F8985FE2B29768581F393CBD549B933BA7726ECCAA5A5E54CB6BAB44B58F8FE94BCEE97D343FDF107FC16B722D6F4244B6E6EFE718F3CBD3598EBA8712544D7EFE1CAF3976F4BA9BA7FA393B3947BF528CC84A5FD4C7ECF2D0ECADC5872AF889B78C2EAC4F74525F35FEC0EAC2EABAE75143FB96CC50AFE6DEF1DCBFB7719B5F8292AF795DD5D80DE32FF2463FFCF6A2647374626BE186BA1BB37EFC686FF35E774369E082C277D3176C3A9EB4B8FABB2D73CCF23D9EAB59B8FDA5599315E2AA337465F3115785076FD4A7D9A778EF1AFC6BE68397CB671A95E75A25DA6E5B9C7DD6BFD2C54EFB354B538DEEB82CF7F742CB7555F3762F38F7EB8087337FDAFEF3DE63E65B6C4E2571870CF3B9C09BFF7CD3C8D08C411E13DE15CD7229D6523E36EA5270B3FD87954D81BFFE59C0F4AFFB2BB3A6B7C39091D666CFFFF08E349BADA8F65D51668865A2B9D566365B7DD7A2C7BBD5D95ED67FA92C5498DB909678E1833B0BEBE592B3644E92C9D7AC230B1E8F7F5C35BAB131FA9CA309087DF503E3D196988082711BFA8CDE907A4BCF2D3AB3E6D445B36D56B9FA1E46E53D1E3ABA3E7E363622A7B6F6E29D3C45F7481527E3D451C372EFCED34C4BFBA4FFE8463CFD97F781DEA64F8F3CBEB1DB23B54AF7E2B8573AC332EFDBE5F8BE9CD96AAD7659EFCEB574BF9CA896B4A9EBE757F9757BCBB13B12E03A84CB5C517EC077C8CDB8C7EF1C9C6BFC1FB3CEEEFD7171EA9B5B6B66F884CEAF3FBFF86A509F878D3AAB96BE9A133D28D475FE52B5AD8F545EE4077C7930A96F25BBE15598ED80391ACF4C4EA471CE7C5930567FA68FCB8F6659DA338631EF64F15658AD2A2B3E95B563FCD7DD016743EC339EB97945FA5D5E3B9F367A975B6EEE5D7B8388D8C6CD277FDB3CE48ACF3CDBB50AA39C770F0F2ADABD7AE6CDD0D9136DCCACF3CD2F1E0FD71FEB372A2891ED103E66DD62A77113F69C9FB16754EF9F73768C6E319BBD2FFFCE937EB57B3F288F5D07964CFB5834B2DE4187F14BA8C726EF20FBBB81A7EDA7E5E786378DB17E637EAD7A84D9C13D13C7ED1A5F346E94E99EAB271B96F6F33CBF77B0B55AD0E8A41D85078FF16A634FD69DA4FB1BB93F5BD063E4CCC70147AE66683A0EF2BDBED62C927EE8BCEFEA18F579716CBBC8A3AFD77D3954BBB7A5DE67D7FD66D509D72DBBEB2F2A098DF8BCA8F84EF385BC09F9EF982A69CC53855BEFBCE9D610B0C4E66AE222A713B36A8D0B62A20BD2C78E99FA5CA56CE7F23F4ABEC59D3DF222B8A0E5D7D5C72BE71AD2863C2D0DE5D5ECE10E2CF629BA65A4737C42FEF08839337EF5D977636FB36269C1BD080DA3A3D5AB69894DD36BFFF860B034F4E86DEB79C56BB6DF8B603F9F9077E5E3F3A6EFEECDF00CB8AD3B66FE1A8F11E352E677DF372399F4E1AE7E3973EB21B4C817132C56147FB80BBA63C4FE89B07B16A472CA5627B5F9A7B9CCD8D8ABC758AB7BD72FAFD97B8D9EFAC8499DEB6936FC65937A8115D36659D8894D91251B7EADD49E627FD72E62B73ED3B571DDACCD27A38FBCCCF01AC11EB6A26EE0D4FD937ECA88756EEA3E6DF5508BA0DE66232C6CEC36C669F409589B53B372646B4A814BEEAA518F4C7277789F2FA9F16F9E9DF4DBDB6C6CE159B3D2C9ACC4EB406F7DC8667ED15717FD15D3FA1BB3C77F1BEE1D5FB754C1E2F773550DA6D9BB03197F8E3B76ECCC3D20CA3A06C7B7D2FBEB9281A4F74E1440ECC08AAD61C324BAB3C484C40EA1D8BA6F1A75F7902889D83B6B0F3768D2FA6A44194427680F452A32BB44C8500545C10B340A603C1454801748361C68661306A1E990964E187CA2375004BB53B02476A750A5E948BC9AF3E76000BEF8A3D74368F8A89B0687CBDDF06B4D7CFD100B66E9CBAEB757822687784EC4E9FD70BA257EFE09A7A48076707334F706ACB0C530E6244347F832C2129C3B153FF786DCE17878E2D947ECDAA24DCA33CFBE62D74170E009803F1CBCA33D06C2403C1CB4C78100784E809410781D0BC2F17D03E2E1503E16C4E06FC1A3183BFCA741AEF0671F3AB8031CE9DDB6027CA783CDAA8E4C74A504C6D030C112AA7F5BF87ED0A0207C05363CFC43388161F1BCB8005E0227242E369C171F1F191B1316C509B1E3DA72A792A6A7115E1953FE070E912C74E8335880F8A24F28E8381182424A4A0A9A7902F89E3662177CC0EFA0375A873DF56F96D95DBAE0680726D7872C2C988C85398AA565A440254FD694579CBD011DAEE1C597A657FFAC81FF95B2E322C3A2C07F5FD8064CA09F4E85B6461F1AACC50038E0E1AAA7E81B0339CCDEF0902EC5CD4174F50394C10449F894150066CA8304EB4FE13D927FDB74105ECB92F0161260A27840D3686B4905F590496309AFAD70374CC13C719AE055CEED38AD5C48A391D0E824340681568ABFAF26588CD9DB0B9DB95E18F88A66EB852B2E81F00E033E786A7447C3E3686D7718F0C5F54677743C0E6BBB43718AC23B061E476FBB4371E867A65AA0019EC3EF10F898EC897F3C685AE090A24833D1771A7C0AA511967D1AC236844E13363034A40C368DD9034C638A376A18FA218B3E48F02CFBCF0CDFF84058B2920165AC61E9D677ADC111AC3F563381659FA23AB40AFF37E15B3298B06C50D9FA0BA783C708DF438C10BEDD99227C69335DF86AE146A1873D6408DEB94269D0A652A277B088F7C80F8322A7C4C5C6C7862770FCE64DE14509ECF263F4E27EDE75187EAD35F4E70FF09A0EE4411EE4411EE4411EE4411EE4411EE4411EE4411EE4E1EF8CFF69D72F5ECFB13160ADDD00C7FF56AD0568FC7F1C086657513CDA50AE9B70DC8FB6C94133A1688A3F4A38764F108EFB1702C10F11A962F301687E600B613E8021C4168CE5596DBF9F48FB366209F4401336179EBD7D6707D45802894662D4CFED2FD8CA833CC8833CC8833CC8833CC8833CC8833CC8833CFC97064C380617ED7CA7201C39A3DFF899C2B1BE8A70CCAD261CBF6B08C7FD688C8F362FD6128EF3456BE5D8C2F900F49A18DAB416ED398BB68C45CB1A0D85A373B45D2A0708362B457B8DA2AD42CD80E0BFC4D03E9B68D1215A5D853695447B38A22D13AD84F1685F42B4AD209A8F40AF9AA37755D132184761FC57787C93FFB5974C01FD3F512CBE0ED10FC4C0EF3830BF4BFEC3060A984816F2230E533097542E88FE4E9C3765A9433A5AAB21FABF38144643F43830034CC6F598D165FFD502344C3C3FB2A69B3E44F0AD00BEC75FAD44FFD184F23E04964238AE13A22408D7634A0F16101F13D61F59F1D166B48025C21F0411A6E03AF0700B744D1F97BF917F6B31FCFF01CE46B430]
}
Add(FileStream,11349030,399,140)
{
Mode=1
AutoCopy=0
Point(doCopyFromStream)
Point(doPosition)
link(FileName,11947023:Result,[(405,128)(315,128)(315,198)(279,198)])
}
Add(Hub,2808741,322,154)
{
link(onEvent1,3395958:doData,[])
link(onEvent2,11108326:doText,[(345,167)(345,202)])
}
Add(DoData,3395958,350,154)
{
link(onEventData,11349030:doCopyFromStream,[])
link(Data,8116148:Stream,[])
}
Add(ComboBox,2536509,455,315)
{
Left=10
Top=260
Width=140
Height=21
Font=[Courier New,8,0,0,204]
Strings=#12:Detect =9|12:ANSI =0|15:UTF-16 =1200|16:UTF-8 =65001|15:UTF-16 BE =1201|12:OEM (DOS) =1|
DataType=1
ReadOnly=0
link(onClick,9052723:doEvent1,[])
}
Add(StrPart,14818444,609,322)
{
Char="="
link(onSplit,4143904:doEvent1,[(857,328)(857,265)])
}
Add(Hub,9052723,518,322)
{
link(onEvent1,14818444:doSplit,[])
link(onEvent2,1603248:doWork3,[(557,335)])
}
Add(HubEx,1603248,553,259)
{
link(onEvent,16200208:doEvent1,[])
}
Add(HubEx,5776200,763,231)
{
link(onEvent,7756711:doEvent1,[])
}
Add(Hub,16200208,574,259)
{
link(onEvent1,3519520:doEvent1,[(822,265)(822,244)])
link(onEvent2,11136757:doQuery,[])
}
Add(Memo,12745637,1078,217)
{
Left=400
Top=40
Width=375
Height=185
Font=[Arial,10,0,0,204]
ScrollBars=3
InCharset=1
OutCharset=1
Point(doLoad)
Point(doSave)
Point(doInCharset)
Point(doOutCharset)
Point(doOutBOM)
}
Add(Hub,4143904,875,259)
{
link(onEvent1,6078793:doInCharset,[])
link(onEvent2,12745637:doInCharset,[(903,272)(903,291)(977,291)(977,265)])
}
Add(Hub,3519520,875,238)
{
link(onEvent1,6078793:doClear,[])
link(onEvent2,12745637:doClear,[(977,251)(977,230)])
}
Add(Hub,7756711,784,231)
{
link(onEvent1,6078793:doAdd,[])
link(onEvent2,12745637:doAdd,[(813,244)(813,223)])
}

карма: 0

0
Редактировалось 1 раз(а), последний 2023-02-16 14:16:39