Там форум глюкнул, файл не вставился. Вот, держите. customver.rc есть прямо в архиве. --- Добавлено в 2026-06-29 20:53:09А вот в виде кода (если вдруг файл пропадёт) Add(StrList,530547,1071,105) { @Hint=#95:Сохранить текст в файле customver.rc (кодировка Win-1251) и положить его рядом с файлом проекта| Strings=#13:/* Настройки:|10:<settings>|80:1 {1 - версия добавляется к программе, иначе нет (и автоувеличение отключается)}|108:1 {1 - увеличивать в версии продукта последнюю цифру при сохранении, предпоследнюю - при компиляции/запуске}|89:1 {1 - увеличивать в версии файла 4-ю цифру при сохранении, 3-ю - при компиляции/запуске}|48:1 {1 - заменять в копирайте YYYY на текущий год}|11:</settings>|2:*/|13:1 VERSIONINFO|83: FILEVERSION 1,0,0,1 /*Версия файла указывается здесь; формат обязательно 0,0,0,0*/|37: PRODUCTVERSION 1,0,0,1 /*не менять*/|20: FILEFLAGSMASK 0x17L|12: FILEOS 0x4L|14: FILETYPE 0x1L|17: FILESUBTYPE 0x0L|5:BEGIN|26: BLOCK "StringFileInfo"|9: BEGIN|24: BLOCK "041904b0"|13: BEGIN|53: //Если строка не нужна - её можно закомментировать|53: VALUE "FileDescription", "Описание файла"|56: VALUE "LegalCopyright", "Copyright (C) YYYY"|117: VALUE "OriginalFilename", "%fname" //Исходное имя файла; если оставить %fname - подставится автоматически|52: VALUE "ProductName", "Название продукта"|95: VALUE "ProductVersion", "1.0.0.0" //Версия продукта, рекомендуемый формат "0.0.0.0"|31: VALUE "E-mail", "@"|11: END|7: END|23: BLOCK "VarFileInfo"|9: BEGIN|40: VALUE "Translation", 0x419, 1200|7: END|3:END|0:| AddHint(39,1,200,39,@Hint) } Add(hiPlugs,2953706,70,210) { Point(onCmdCompleting) link(onCommand,11735780:doCase,[]) } Add(Case,11735780,147,210) { Value=String(build) link(onNextCase,9384841:doCase,[]) link(onTrue,1360486:doEvent2,[(195,223)(195,279)]) AddHint(-14,-31,47,13,Value) } Add(Case,9384841,210,210) { Value=String(run) link(onNextCase,829730:doCase,[]) link(onTrue,1360486:doEvent1,[(254,223)(254,247)(198,247)(198,272)]) AddHint(-3,-30,40,13,Value) } Add(Case,829730,273,210) { Value=String(save) link(onTrue,4950267:doEvent1,[]) AddHint(-5,-30,48,13,Value) } Add(FilePartElm,9599858,567,259) { Mode=0 Point(Part) link(onPart,1786329:doStrCat,[]) link(FileName,6704292:Var2,[]) } Add(LineBreak,4744636,70,259) { Caption="curProj" Type=1 link(Data,2953706:FileName,[]) Primary=[7308970,497,-35] } Add(StrCat,1786329,609,259) { Str2="customver.rc" link(onStrCat,1188465:doFileExists,[]) } Add(FileTools,1188465,651,238) { link(onEnd,3559360:doCase,[]) } Add(Case,3559360,693,238) { Value=Integer(1) link(onTrue,7433747:doEvent1,[]) AddHint(-1,-20,21,13,Value) } Add(StrList,260332,833,217) { link(FileName,1095680:Var,[]) } Add(LineBreak,1437593,609,301) { Caption="customver.rc" Type=1 link(Data,1786329:Result,[]) Primary=[1095680,231,-112] } Add(BlockFind,9203313,833,350) { IncludeBlock=1 StartBlock="<settings>\r\n" EndBlock="\r\n</settings>" link(onSearch,1446550:doEvent1,[]) link(Text,260332:Text,[]) AddHint(-18,38,63,26,StartBlock) } Add(Hub,7433747,742,245) { link(onEvent1,260332:doLoad,[]) link(onEvent2,76169:doWork1,[(767,258)]) } Add(StrList,11865139,945,329) { } Add(Hub,1446550,882,350) { link(onEvent1,11865139:doText,[]) link(onEvent2,16471375:doFor,[(906,363)(906,405)]) } Add(ArrayRW,455002,959,399) { link(onRead,11469206:doCopy,[]) link(Array,11865139:Array,[]) } Add(For,16471375,917,399) { End=3 link(onEvent,455002:doRead,[]) } Add(IndexToChanel,6032332,1043,399) { Count=4 Point(Index) link(onEvent1,3961850:doValue,[]) link(onEvent2,5608677:doValue,[]) link(onEvent3,10916289:doValue,[]) link(onEvent4,13066162:doValue,[]) link(Index,4864450:Var,[]) } Add(LineBreak,8598816,917,441) { Type=1 link(Data,16471375:Position,[]) Primary=[4864450,126,-70] } Add(Memory,3961850,1379,399) { @Hint=#19:Добавлять ли версию| Default=Integer(0) AddHint(-36,-29,127,13,@Hint) } Add(Copy,11469206,1001,399) { Position=1 Count=1 link(onCopy,6032332:doEvent,[]) } Add(Memory,5608677,1295,406) { @Hint=#30:Автоувеличение версии продукта| Default=Integer(0) AddHint(-58,-56,185,13,@Hint) } Add(Memory,10916289,1211,413) { @Hint=#27:Автоувеличение версии файла| Default=Integer(0) AddHint(-74,-88,171,13,@Hint) } Add(Memory,13066162,1127,420) { @Hint=#13:Копирайт YYYY| Default=Integer(0) AddHint(-31,-42,94,13,@Hint) } Add(PointHint,9390493,1547,189) { Width=190 Height=60 } Add(Hub,1360486,210,266) { InCount=2 OutCount=5 link(onEvent1,5662299:In,[]) link(onEvent2,9931403:In,[]) link(onEvent3,2921732:In,[]) link(onEvent4,2458925:doWork2,[]) link(onEvent5,7762957:doEvent,[(290,300)(290,1581)]) } Add(Hub,4950267,322,217) { OutCount=4 link(onEvent1,7489823:doEvent1,[]) link(onEvent2,470719:In,[]) link(onEvent3,5040704:In,[]) link(onEvent4,2458925:doWork1,[(347,244)]) } Add(LineBreak,12600776,399,224) { link(Out,7489823:doEvent2,[]) Primary=[5662299,-161,42] } Add(Hub,7489823,441,217) { InCount=2 OutCount=7 link(onEvent1,1211251:In,[]) link(onEvent2,3509410:In,[]) link(onEvent3,6873696:In,[]) link(onEvent4,13944092:In,[]) link(onEvent5,1911643:In,[]) link(onEvent6,9434323:In,[]) link(onEvent7,16616650:doPart,[]) } Add(LineBreak,15544866,1085,427) { Caption="0" link(Out,13066162:doClear,[]) Primary=[1211251,-616,-210] } Add(LineBreak,4595017,1169,420) { Caption="0" link(Out,10916289:doClear,[]) Primary=[3509410,-700,-196] } Add(LineBreak,6539265,1253,413) { Caption="0" link(Out,5608677:doClear,[]) Primary=[6873696,-784,-182] } Add(LineBreak,4410459,1337,406) { Caption="0" link(Out,3961850:doClear,[]) Primary=[13944092,-868,-168] } Add(IndexToChanel,15422446,364,595) { Point(Index) link(onEvent2,11655807:doEvent1,[]) link(Index,10199054:Var,[]) } Add(LineBreak,5626864,1379,448) { Caption="add" Type=1 link(Data,133846:Var2,[]) Primary=[10199054,-1015,119] } Add(IndexToChanel,13269671,455,602) { Point(Index) link(onEvent2,11458055:doEnum,[]) link(Index,9206294:Var,[]) } Add(LineBreak,11328254,1295,448) { Caption="autoIncVer" Type=1 link(Data,5608677:Value,[]) Primary=[9206294,-840,126] } Add(Hub,11655807,406,602) { link(onEvent1,13269671:doEvent,[]) link(onEvent2,15938293:doEvent,[(438,615)(438,1098)]) } Add(ArrayEnum,11458055,539,609) { link(onItem,13898206:doTrim,[]) link(Array,16404067:Var,[]) } Add(LineBreak,12147703,847,308) { Caption="arr" Type=1 link(Data,2636294:Var2,[]) Primary=[16404067,-308,273] } Add(Trim,13898206,581,609) { link(onTrim,5447374:doCopy,[]) } Add(Copy,5447374,623,609) { Position=1 Count=22 link(onCopy,8048092:doCase,[]) } Add(Case,4633586,672,1099) { Value=String(FILEVERSION) link(onTrue,5839463:doExec,[]) AddHint(-58,-28,95,13,Value) } Add(Case,8048092,665,609) { Value=String(VALUE "ProductVersion") link(onTrue,8921019:doSearch,[]) AddHint(-89,-41,145,13,Value) } Add(LineBreak,4738392,539,672) { Caption="str" Type=1 link(Data,11458055:Item,[]) Primary=[733816,196,-84] } Add(MultiStrPart,7483980,1162,651) { Char="." Count=1 Direct=1 Point(onNotFound) link(onSplit,2535106:doValue,[]) link(Str,12910882:Var2,[]) link(onNotFound,14025214:doOperation,[(1206,664)(1206,755)]) } Add(BlockFind,8921019,756,616) { IncludeBlock=1 Delete=0 UserReplace=0 StartBlock=""" EndBlock=""" Point(doReplaceStr) link(onSearch,15235472:doValue,[]) link(onEndSearch,13678199:doEvent1,[(800,629)(800,692)]) link(Text,733816:Var,[(762,609)(741,609)]) link(Replace,11324026:State,[(769,600)(783,600)]) } Add(Case,1885769,931,637) { Value=Integer(3) link(onTrue,10146854:doEvent1,[]) AddHint(-3,-19,21,13,Value) } Add(Switch,11324026,777,553) { DataOn=Integer(1) DataOff=Integer(0) } Add(Hub,10146854,973,644) { link(onEvent1,8107380:In,[]) link(onEvent2,13797586:doEvent,[]) } Add(LineBreak,12137169,714,623) { link(Out,8921019:doReplaceStr,[]) Primary=[16550131,616,77] } Add(Hub,5865374,854,616) { link(onEvent1,11715980:In,[]) link(onEvent2,9066304:doNext,[(878,629)(878,643)]) } Add(LineBreak,13690642,735,560) { Caption="off" link(Out,11324026:doReset,[]) Primary=[11715980,154,56] } Add(LineBreak,2955470,735,567) { Caption="on" link(Out,11324026:doOn,[]) Primary=[8107380,266,77] } Add(CounterEx,9066304,889,637) { Max=1000 Point(doReset) link(onNext,1885769:doCase,[]) } Add(Memory,15235472,812,616) { @Hint=#7:0.0.0.0| link(onData,5865374:doEvent1,[]) AddHint(-1,-25,48,13,@Hint) } Add(LineBreak,147387,903,336) { Caption="clr" link(Out,11865139:doClear,[]) Primary=[1911643,-434,-91] } Add(LineBreak,5241265,791,224) { Caption="clr" link(Out,260332:doClear,[]) Primary=[9434323,-322,28] } Add(Hub,13678199,812,686) { OutCount=6 link(onEvent1,9066304:doReset,[(858,692)(858,650)]) link(onEvent4,2136099:doWrite,[(858,713)(858,755)]) link(onEvent5,7009797:In,[]) link(onEvent6,6797677:In,[(836,727)(836,734)]) } Add(LineBreak,11517987,812,658) { Type=1 link(Data,15235472:Value,[]) Primary=[11772030,350,-49] } Add(Math,15633619,1162,700) { Op2=1 ResultType=0 Point(doClear) link(onResult,1408381:doStrCatDlm,[]) link(Op1,7483980:Part1,[]) } Add(StrCatDelim,1408381,1218,700) { Delimiter="." Point(doClear) link(onStrCatDlm,15815454:doWork2,[]) link(Str1,2535106:Value,[]) } Add(Memory,2535106,1218,651) { link(onData,15633619:doOperation,[(1262,657)(1262,681)(1150,681)(1150,706)]) } Add(HubEx,76169,763,350) { link(onEvent,9203313:doSearch,[]) } Add(ArrayRW,2136099,889,742) { link(Array,12577345:Var,[]) link(Index,3984249:Var,[]) } Add(LineBreak,14346130,546,651) { Caption="ind" Type=1 link(Data,11458055:Index,[]) Primary=[3984249,350,63] } Add(LineBreak,8839360,861,280) { Caption="arr" Type=1 link(Data,11893838:Var2,[]) Primary=[12577345,28,420] } Add(GetDataEx,4890980,847,266) { link(Data,260332:Array,[]) } Add(LineBreak,16372412,497,616) { Caption="stp" link(Out,11458055:doStop,[]) Primary=[7009797,350,98] } Add(LineBreak,10895628,784,252) { Caption="sav" link(Out,3147464:doWork2,[]) Primary=[6797677,63,476] } Add(Math,14025214,1218,749) { Op2=1 ResultType=0 link(onResult,15815454:doWork3,[(1264,755)]) } Add(HubEx,15815454,1260,700) { link(onEvent,5433174:doWork2,[]) } Add(MultiStrPart,7536919,1176,854) { Char="." Direct=1 Point(onNotFound) link(onSplit,13656201:doValue,[]) link(Str,12910882:Var3,[(1182,635)]) link(onNotFound,8525999:doWork3,[(1222,867)]) } Add(FormatStr,8236270,1232,903) { DataCount=3 Mask="%1.%2.%3" link(onFString,10218925:doTrim,[]) link(Str1,13656201:Value,[]) link(Str3,7536919:Part1,[(1252,895)(1182,895)]) } Add(Math,4750870,1183,903) { Op2=1 ResultType=0 link(onResult,8236270:doString,[]) link(Op1,7536919:Part2,[]) } Add(Memory,13656201,1232,854) { link(onData,4750870:doOperation,[(1276,860)(1276,884)(1171,884)(1171,909)]) } Add(Trim,10218925,1274,903) { Char="." Mode=1 link(onTrim,13940111:doWork3,[(1320,909)]) } Add(IndexToChanel,13797586,1092,651) { Point(Index) link(onEvent1,7483980:doSplit,[]) link(onEvent2,13161676:doWork2,[]) link(Index,10077483:Value,[]) } Add(GetDataEx,12910882,1162,630) { link(Data,11772030:Var,[]) } Add(HubEx,5433174,1316,700) { link(onEvent,16550131:In,[]) } Add(HubEx,13940111,1316,840) { Angle=3 link(onEvent,5433174:doWork3,[]) } Add(HubEx,8525999,1218,840) { link(onEvent,13940111:doWork2,[]) } Add(InfoTip,2942053,1148,588) { Info=#20:+1 к последней цифре| Font=[MS Sans Serif,8,1,0,1] Frame=2 Width=155 Height=207 Margin=3 } Add(InfoTip,293719,1148,819) { Info=#24:+1 к предпоследней цифре| Font=[MS Sans Serif,8,1,0,1] Frame=2 Width=197 Height=144 Margin=3 } Add(ChanelToIndex,8784900,1050,602) { link(onIndex,10077483:doValue,[]) } Add(Memory,10077483,1092,602) { Default=Integer(0) } Add(HubEx,13161676,1134,658) { Angle=1 link(onEvent,7536919:doSplit,[(1138,860)]) } Add(LineBreak,5013136,1008,602) { link(Out,8784900:doWork1,[]) Primary=[470719,-651,-378] } Add(LineBreak,15069156,1008,609) { link(Out,8784900:doWork2,[]) Primary=[9931403,-770,-336] } Add(HubEx,2458925,343,287) { Angle=1 link(onEvent,15422446:doEvent,[(347,601)]) } Add(IndexToChanel,15938293,455,1092) { Point(Index) link(onEvent2,9365072:doEnum,[]) link(Index,13229561:Var,[]) } Add(LineBreak,10578783,1211,455) { Caption="autoIncFVer" Type=1 link(Data,10916289:Value,[]) Primary=[13229561,-756,609] } Add(ArrayEnum,9365072,546,1099) { link(onItem,10276184:doTrim,[]) link(Array,8701310:Var,[]) } Add(LineBreak,1408234,875,280) { Caption="arr" Type=1 link(Data,12710138:Var2,[]) Primary=[8701310,-329,791] } Add(Trim,10276184,588,1099) { link(onTrim,16274589:doCopy,[]) } Add(Copy,16274589,630,1099) { Position=1 Count=11 link(onCopy,4633586:doCase,[]) } Add(LineBreak,2207058,546,1162) { Caption="str" Type=1 link(Data,9365072:Item,[]) Primary=[10805849,189,-98] } Add(LineBreak,10660578,553,1141) { Caption="ind" Type=1 link(Data,9365072:Index,[]) Primary=[3818348,644,-21] } Add(LineBreak,9168965,504,1106) { Caption="stp" link(Out,9365072:doStop,[]) Primary=[5189405,686,84] } Add(GetDataEx,11893838,861,266) { Angle=3 link(Data,4890980:Var3,[]) } Add(GetDataEx,4095948,735,1085) { link(Data,10805849:Var,[]) } Add(RE_Search,5839463,735,1106) { Expression="([\d]+,){3}[\d]+" link(onMatch,2516528:doEvent,[]) link(SourceStr,4095948:Var2,[]) } Add(MultiStrPart,12831414,931,1106) { Char="," Count=1 Direct=1 Point(onNotFound) link(onSplit,5222565:doValue,[]) } Add(Math,16599370,931,1155) { Op2=1 ResultType=0 Point(doClear) link(onResult,15407523:doStrCatDlm,[]) link(Op1,12831414:Part1,[]) } Add(StrCatDelim,15407523,980,1155) { Delimiter="," Point(doClear) link(onStrCatDlm,4107812:doDelete,[]) link(Str1,5222565:Value,[]) } Add(Memory,5222565,980,1106) { link(onData,16599370:doOperation,[(1024,1112)(1024,1136)(919,1136)(919,1161)]) } Add(Delete,4107812,1043,1155) { link(onDelete,2426191:doInsert,[]) link(Str,15770648:Var3,[(1049,1090)]) link(Position,16214798:Var2,[]) link(Count,8941368:Var,[]) } Add(Insert,2426191,1085,1155) { link(onInsert,12449841:doEvent1,[]) link(SubStr,14305731:Var,[]) link(Position,16214798:Var3,[(1105,1125)]) } Add(LineBreak,10476311,980,1197) { Caption="str" Type=1 link(Data,15407523:Result,[]) Primary=[14305731,112,-70] } Add(MultiStrPart,15729788,931,1267) { Char="," Direct=1 Point(onNotFound) link(onSplit,5684523:doValue,[]) } Add(FormatStr,10311436,980,1316) { DataCount=3 Mask="%1,%2,%3" Point(FString) link(onFString,2810209:doDelete,[]) link(Str1,5684523:Value,[]) link(Str3,15729788:Part1,[(1000,1308)(937,1308)]) } Add(Math,2068195,938,1316) { Op2=1 ResultType=0 link(onResult,10311436:doString,[]) link(Op1,15729788:Part2,[]) } Add(Memory,5684523,980,1267) { link(onData,2068195:doOperation,[(1024,1273)(1024,1297)(926,1297)(926,1322)]) } Add(LineBreak,11659430,742,1183) { Caption="pos" Type=1 link(Data,10795652:Var2,[]) Primary=[6204345,308,-84] } Add(LineBreak,756150,749,1155) { Caption="len" Type=1 link(Data,8751959:Var2,[]) Primary=[8941368,308,-28] } Add(GetDataEx,16214798,1050,1120) { link(Data,6204345:Var,[]) } Add(IndexToChanel,2516528,861,1106) { Point(Index) link(onEvent1,12831414:doSplit,[]) link(onEvent2,4691367:doWork2,[]) link(Index,9607124:Value,[]) } Add(ChanelToIndex,12739227,819,1050) { link(onIndex,9607124:doValue,[]) } Add(Memory,9607124,861,1050) { Default=Integer(0) } Add(HubEx,4691367,903,1113) { Angle=1 link(onEvent,15729788:doSplit,[(907,1273)]) } Add(Delete,2810209,1029,1316) { link(onDelete,9425381:doInsert,[]) link(Str,15770648:Var2,[]) link(Position,16707491:Var2,[]) link(Count,7327260:Var,[]) } Add(Insert,9425381,1071,1316) { link(onInsert,2299028:doWork2,[]) link(SubStr,4264058:Var,[]) link(Position,16707491:Var3,[(1091,1286)]) } Add(LineBreak,16748890,980,1358) { Caption="str" Type=1 link(Data,10311436:FString,[]) Primary=[4264058,98,-70] } Add(LineBreak,1733425,756,1183) { Caption="pos" Type=1 link(Data,10795652:Var3,[(762,1174)]) Primary=[3454631,280,77] } Add(LineBreak,3348120,763,1155) { Caption="len" Type=1 link(Data,8751959:Var3,[(769,1146)]) Primary=[7327260,280,133] } Add(GetDataEx,16707491,1036,1281) { link(Data,3454631:Var,[]) } Add(GetDataEx,15770648,1029,1085) { Angle=3 link(Data,4095948:Var3,[]) } Add(GetDataEx,10795652,742,1169) { link(Data,5839463:MatchPos,[]) } Add(GetDataEx,8751959,749,1141) { link(Data,5839463:MatchLen,[]) } Add(LineBreak,2898589,777,1050) { link(Out,12739227:doWork1,[]) Primary=[5040704,-420,-819] } Add(LineBreak,15580619,777,1057) { link(Out,12739227:doWork2,[]) Primary=[2921732,-539,-777] } Add(InfoTip,4461965,917,1057) { Info=#20:+1 к последней цифре| Font=[MS Sans Serif,8,1,0,1] Frame=2 Width=218 Height=165 Margin=3 } Add(InfoTip,1327777,917,1246) { Info=#24:+1 к предпоследней цифре| Font=[MS Sans Serif,8,1,0,1] Frame=2 Width=218 Height=144 Margin=3 } Add(LineBreak,9349395,889,280) { Caption="arr" Type=1 link(Data,12710138:Var3,[(895,271)]) Primary=[13181266,301,826] } Add(ArrayRW,4474408,1190,1148) { link(Array,13181266:Var,[]) link(Index,3818348:Var,[]) } Add(GetDataEx,12710138,875,266) { Angle=3 link(Data,11893838:Var3,[]) } Add(LineBreak,3250802,784,259) { Caption="sav" link(Out,11643033:doWork2,[]) Primary=[12195472,399,945] } Add(HubEx,3147464,819,252) { link(onEvent,260332:doSave,[]) } Add(Hub,12449841,1155,1155) { InCount=2 OutCount=3 link(onEvent1,4474408:doWrite,[]) link(onEvent2,5189405:In,[(1179,1168)(1179,1196)]) link(onEvent3,12195472:In,[(1176,1175)(1176,1210)]) } Add(HubEx,2299028,1141,1316) { Angle=3 link(onEvent,12449841:doEvent2,[(1145,1168)]) } Add(IndexToChanel,7762957,357,1575) { Point(Index) link(onEvent2,3082567:doEvent1,[]) link(Index,9659839:Var,[]) } Add(LineBreak,5627410,1393,448) { Caption="add" Type=1 link(Data,133846:Var3,[(1399,439)]) Primary=[9659839,-1036,1099] } Add(GetDataEx,133846,1379,434) { link(Data,3961850:Value,[]) } Add(IndexToChanel,13366574,448,1582) { Point(Index) link(onEvent2,15683491:doEnum,[]) link(Index,11622175:Var,[]) } Add(LineBreak,9175042,1127,462) { Caption="autoYear" Type=1 link(Data,13066162:Value,[]) Primary=[11622175,-679,1092] } Add(Hub,3082567,399,1582) { OutCount=3 link(onEvent1,13366574:doEvent,[]) link(onEvent2,1415380:doWork1,[(438,1595)]) link(onEvent3,7930170:doStrCatDlm,[(427,1602)(427,2190)]) } Add(Dir,2728772,455,2135) { } Add(WinExec,11667179,574,2170) { RunEvent=1 Point(doConsoleExec) Point(onConsoleResult) link(FileName,15696064:Var,[]) link(Params,5753427:FString,[(587,2158)(545,2158)(545,2228)(503,2228)]) } Add(FormatStr,5753427,497,2184) { DataCount=1 Mask="/fo "%1customver.res" "%1customver.rc"" Point(FString) link(onFString,10402115:doEvent1,[]) link(Str1,8405712:Var,[]) } Add(LineBreak,15206618,567,301) { Caption="fld" Type=1 link(Data,9599858:Part,[]) Primary=[8405712,-70,1848] } Add(LineBreak,6660290,441,2226) { Type=1 link(Data,7930170:Result,[]) Primary=[15696064,133,-91] } Add(StrCatDelim,7930170,441,2184) { Str1=""" Str2="compiler\GoRC.exe"" Point(Delimiter) link(onStrCatDlm,5753427:doString,[]) link(Delimiter,2728772:CurrentDir,[]) AddHint(-79,-73,113,13,Str2) } Add(ArrayEnum,15683491,546,1589) { link(onItem,12351192:doTrim,[]) link(Array,2041627:Var,[]) } Add(LineBreak,7963345,861,308) { Caption="arr" Type=1 link(Data,15673830:Var2,[]) Primary=[2041627,-315,1253] } Add(Trim,12351192,588,1589) { link(onTrim,6237007:doCopy,[]) } Add(Copy,6237007,630,1589) { Position=1 Count=22 link(onCopy,16154228:doCase,[]) } Add(Case,16154228,672,1589) { Value=String(VALUE "LegalCopyright") link(onTrue,11760759:doValue,[]) AddHint(-89,-41,143,13,Value) } Add(GetDataEx,2636294,847,294) { link(Data,4890980:Var2,[]) } Add(GetDataEx,15673830,861,294) { Angle=3 link(Data,2636294:Var3,[]) } Add(HubEx,11643033,819,259) { Angle=3 link(onEvent,3147464:doWork3,[]) } Add(Replace,4792140,1176,1708) { SubStr="YYYY" link(onReplace,2479636:In,[]) link(Str,14493558:Var3,[(1182,1615)]) link(Dest,7408254:FormatTime,[]) } Add(Time,7408254,1190,1666) { Format="Y" } Add(FilePartElm,16616650,518,259) { Mode=2 Point(Part) link(onPart,9599858:doPart,[]) link(FileName,6704292:Var1,[(524,250)]) } Add(LineBreak,561581,784,266) { Caption="sav" link(Out,15295895:doWork2,[]) Primary=[2764636,161,1834] } Add(ArrayEnum,7514552,483,1918) { link(onItem,15131690:doTrim,[]) link(Array,13341558:Var,[]) } Add(LineBreak,2777824,875,308) { Caption="arr" Type=1 link(Data,10110782:Var2,[]) Primary=[13341558,-392,1582] } Add(Trim,15131690,525,1918) { link(onTrim,7535506:doCopy,[]) } Add(Copy,7535506,567,1918) { Position=1 Count=24 link(onCopy,6460426:doCase,[]) } Add(Case,6460426,609,1918) { Value=String(VALUE "OriginalFilename") link(onTrue,9350158:doValue,[]) AddHint(-95,-47,150,13,Value) } Add(LineBreak,3255123,483,1974) { Caption="str" Type=1 link(Data,7514552:Item,[]) Primary=[15356327,210,-84] } Add(BlockFind,11102183,777,1925) { IncludeBlock=1 Delete=0 UserReplace=0 StartBlock=""" EndBlock=""" Point(doReplaceStr) link(onSearch,2290857:doValue,[]) link(onEndSearch,6362801:doEvent1,[(821,1938)(821,2001)]) link(Text,8847200:Var3,[(783,1916)]) link(Replace,7622792:State,[]) } Add(Case,14855721,952,1946) { Value=Integer(3) link(onTrue,10239624:doSearch,[]) AddHint(-3,-19,21,13,Value) } Add(Switch,7622792,784,1876) { DataOn=Integer(1) DataOff=Integer(0) } Add(Hub,12786630,1078,1953) { OutCount=3 link(onEvent1,13653942:In,[(1102,1959)(1102,1924)]) link(onEvent2,1035714:doOn,[(1124,1966)(1124,1952)]) link(onEvent3,15190490:doReplace,[(1102,1973)(1102,2036)]) } Add(LineBreak,13689302,735,1932) { link(Out,11102183:doReplaceStr,[]) Primary=[9389068,420,98] } Add(Hub,5710344,875,1925) { link(onEvent1,13791298:In,[]) link(onEvent2,9235993:doNext,[(899,1938)(899,1952)]) } Add(LineBreak,12976055,742,1883) { Caption="off" link(Out,7622792:doReset,[]) Primary=[13791298,168,42] } Add(LineBreak,4990915,742,1890) { Caption="on" link(Out,7622792:doOn,[]) Primary=[13653942,371,28] } Add(CounterEx,9235993,910,1946) { Max=1000 Point(doReset) link(onNext,14855721:doCase,[]) } Add(Memory,2290857,833,1925) { link(onData,5710344:doEvent1,[]) } Add(Hub,6362801,833,1995) { OutCount=3 link(onEvent1,9235993:doReset,[(879,2001)(879,1959)]) link(onEvent2,1501418:In,[]) link(onEvent3,8229443:doWork1,[(858,2015)]) } Add(LineBreak,5659953,833,1967) { Caption="str" Type=1 link(Data,2290857:Value,[]) Primary=[6067840,161,-49] } Add(ArrayRW,9243220,945,2058) { link(Array,14092111:Var,[]) link(Index,6199148:Var,[]) } Add(LineBreak,9525853,651,1967) { Caption="ind" Type=1 link(Data,9350158:Value,[]) Primary=[6199148,301,63] } Add(LineBreak,13243981,889,308) { Caption="arr" Type=1 link(Data,13502965:Var2,[]) Primary=[14092111,56,1708] } Add(LineBreak,1115230,441,1925) { Caption="stp" link(Out,7514552:doStop,[]) Primary=[1501418,420,77] } Add(Replace,15190490,1113,2030) { SubStr="%fname" link(onReplace,9389068:In,[]) link(Str,15640092:Var3,[(1119,1944)]) link(Dest,1111631:Var,[]) } Add(Memory,9350158,651,1925) { Point(Data) link(onData,12341358:doValue,[]) link(Data,15084449:Var,[]) } Add(Memory,12341358,693,1925) { Point(Data) link(onData,11102183:doSearch,[]) link(Data,8847200:Var2,[]) } Add(GetDataEx,8847200,693,1911) { link(Data,15356327:Var,[]) } Add(LineBreak,10978985,490,1960) { Caption="ind" Type=1 link(Data,7514552:Index,[]) Primary=[15084449,161,-63] } Add(HubEx,1415380,434,1918) { link(onEvent,7514552:doEnum,[]) } Add(GetDataEx,10110782,875,294) { Angle=3 link(Data,15673830:Var3,[]) } Add(Position,10239624,994,1953) { Target="%fname" ZeroPos=0 ShortSearch=1 link(onSearch,1456705:doCase,[]) link(Str,15640092:Var2,[]) } Add(GetDataEx,15640092,994,1939) { link(Data,6067840:Var,[]) } Add(Case,1456705,1036,1953) { Value=Integer(0) link(onNextCase,12786630:doEvent1,[]) AddHint(-1,35,21,13,Value) } Add(LineBreak,10825187,518,301) { Caption="fname" Type=1 link(Data,16616650:Part,[]) Primary=[1111631,609,1701] } Add(IndexToChanel,8536832,868,2058) { Point(Index) link(onEvent2,4329216:doEvent1,[]) link(Index,1198920:Var,[]) } Add(Switch,1035714,1155,1932) { DataOn=Integer(1) DataOff=Integer(0) } Add(DeferredEvent,10098206,574,2226) { Delay=50 link(onDeferredEvent,15076361:doEvent1,[]) } Add(Hub,4329216,910,2065) { link(onEvent1,9243220:doWrite,[]) link(onEvent2,2764636:In,[(934,2078)(934,2106)]) } Add(LineBreak,4984026,1155,1974) { Type=1 link(Data,1035714:State,[]) Primary=[1198920,-287,56] } Add(DoData,1390214,812,2058) { link(onEventData,8229443:doWork2,[]) link(Data,12341358:Value,[]) } Add(HubEx,8229443,854,2058) { link(onEvent,8536832:doEvent,[]) } Add(Hub,15076361,616,2226) { OutCount=4 link(onEvent1,11544649:In,[]) link(onEvent2,13220440:In,[]) link(onEvent3,2989769:In,[]) link(onEvent4,6841205:In,[]) } Add(LineBreak,8437198,770,2058) { Caption="rst" link(Out,1390214:doData,[]) Primary=[11544649,-126,168] } Add(LineBreak,13529414,1113,1939) { Caption="0" link(Out,1035714:doReset,[]) Primary=[13220440,-469,294] } Add(LineBreak,10943523,784,273) { Caption="sav" link(Out,15295895:doWork3,[(823,279)]) Primary=[9775543,224,1498] } Add(LineBreak,9302537,546,1645) { Caption="str" Type=1 link(Data,15683491:Item,[]) Primary=[11055521,210,-84] } Add(BlockFind,13908316,840,1596) { IncludeBlock=1 Delete=0 UserReplace=0 StartBlock=""" EndBlock=""" Point(doReplaceStr) link(onSearch,425634:doValue,[]) link(onEndSearch,14882079:doEvent1,[(884,1609)(884,1672)]) link(Text,5573420:Var3,[(846,1587)]) link(Replace,2794457:State,[]) } Add(Case,2608469,1015,1617) { Value=Integer(3) link(onTrue,8911723:doSearch,[]) AddHint(-3,-19,21,13,Value) } Add(Switch,2794457,847,1547) { DataOn=Integer(1) DataOff=Integer(0) } Add(Hub,5906847,1141,1624) { OutCount=3 link(onEvent1,6081799:In,[(1165,1630)(1165,1595)]) link(onEvent2,12822874:doOn,[(1187,1637)(1187,1623)]) link(onEvent3,4792140:doReplace,[(1165,1644)(1165,1714)]) } Add(LineBreak,14044525,798,1603) { link(Out,13908316:doReplaceStr,[]) Primary=[2479636,420,105] } Add(Hub,14776119,938,1596) { link(onEvent1,7248676:In,[]) link(onEvent2,12291171:doNext,[(962,1609)(962,1623)]) } Add(LineBreak,6646740,805,1554) { Caption="off" link(Out,2794457:doReset,[]) Primary=[7248676,168,42] } Add(LineBreak,10190617,805,1561) { Caption="on" link(Out,2794457:doOn,[]) Primary=[6081799,371,28] } Add(CounterEx,12291171,973,1617) { Max=1000 Point(doReset) link(onNext,2608469:doCase,[]) } Add(Memory,425634,896,1596) { link(onData,14776119:doEvent1,[]) } Add(Hub,14882079,896,1666) { OutCount=3 link(onEvent1,12291171:doReset,[(942,1672)(942,1630)]) link(onEvent2,444376:In,[]) link(onEvent3,6893607:doWork1,[(921,1686)]) } Add(LineBreak,7165897,896,1638) { Caption="str" Type=1 link(Data,425634:Value,[]) Primary=[5037901,161,-49] } Add(ArrayRW,14003112,1008,1729) { link(Array,10207900:Var,[]) link(Index,11361090:Var,[]) } Add(LineBreak,212185,714,1638) { Caption="ind" Type=1 link(Data,11760759:Value,[]) Primary=[11361090,301,63] } Add(LineBreak,16291423,903,308) { Caption="arr" Type=1 link(Data,13502965:Var3,[(909,299)]) Primary=[10207900,105,1379] } Add(LineBreak,2459394,504,1596) { Caption="stp" link(Out,15683491:doStop,[]) Primary=[444376,420,77] } Add(Memory,11760759,714,1596) { Point(Data) link(onData,2821383:doValue,[]) link(Data,12411568:Var,[]) } Add(Memory,2821383,756,1596) { Point(Data) link(onData,13908316:doSearch,[]) link(Data,5573420:Var2,[]) } Add(GetDataEx,5573420,756,1582) { link(Data,11055521:Var,[]) } Add(LineBreak,5717827,553,1631) { Caption="ind" Type=1 link(Data,15683491:Index,[]) Primary=[12411568,161,-63] } Add(Position,8911723,1057,1624) { Target="YYYY" ZeroPos=0 ShortSearch=1 link(onSearch,8095136:doCase,[]) link(Str,14493558:Var2,[]) } Add(GetDataEx,14493558,1057,1610) { link(Data,5037901:Var,[]) } Add(Case,8095136,1099,1624) { Value=Integer(0) link(onNextCase,5906847:doEvent1,[]) AddHint(-1,35,21,13,Value) } Add(IndexToChanel,4213047,931,1729) { Point(Index) link(onEvent2,2400156:doEvent1,[]) link(Index,5363730:Var,[]) } Add(Switch,12822874,1218,1603) { DataOn=Integer(1) DataOff=Integer(0) } Add(Hub,2400156,973,1736) { link(onEvent1,14003112:doWrite,[]) link(onEvent2,9775543:In,[(997,1749)(997,1777)]) } Add(LineBreak,2310637,1218,1645) { Type=1 link(Data,12822874:State,[]) Primary=[5363730,-287,56] } Add(DoData,10774565,875,1729) { link(onEventData,6893607:doWork2,[]) link(Data,2821383:Value,[]) } Add(HubEx,6893607,917,1729) { link(onEvent,4213047:doEvent,[]) } Add(LineBreak,12054068,833,1729) { Caption="rst" link(Out,10774565:doData,[]) Primary=[2989769,-189,511] } Add(LineBreak,3159641,1176,1610) { Caption="0" link(Out,12822874:doReset,[]) Primary=[6841205,-532,637] } Add(GetDataEx,13502965,889,294) { Angle=3 link(Data,10110782:Var3,[]) } Add(HubEx,15295895,819,266) { Angle=3 link(onEvent,11643033:doWork3,[]) } Add(GetDataEx,6704292,567,245) { link(Data,7308970:Var,[]) } Add(Hub,10402115,539,2184) { link(onEvent1,11667179:doConsoleExec,[]) link(onEvent2,10098206:doDeferredEvent,[(563,2197)(563,2232)]) } Add(InlineCode,4200889,1071,161) { @Hint=#45:IC добавить в схему, внутри раскомментировать| Code=#15:unit HiAsmUnit;|0:|9:interface|65://Раскомментировать строку ниже для добавления версии к программе|20://{$R customver.res}|21:uses kol,Share,Debug;|0:|4:type|28: THiAsmClass = class(TDebug)|10: private|9: public|5: end;|0:|14:implementation|0:|4:end.| AddHint(38,2,160,26,@Hint) }
Редактировалось 2 раз(а), последний 2026-06-29 20:53:09
|