Вверх ↑
Ответов: 1946
Рейтинг: 174
#1: 2020-01-03 22:51:17 ЛС | профиль | цитата
Потому что используются визуальные (видимые) элементы - они занимают много памяти. Попробуйте-ка это:
Add(MainForm,2953706,84,84)
{
Position=1
}
Add(FileStream,3591058,343,210)
{
Mode=2
AutoCopy=0
Point(doPosition)
Point(doCopyFromStream)
}
Add(Hub,7672151,217,210)
{
OutCount=5
link(onEvent1,3591058:doOpen,[])
link(onEvent2,7563050:In,[])
link(onEvent3,7228710:doFor,[(259,230)(259,412)])
link(onEvent4,3591058:doClose,[(287,237)(287,223)])
link(onEvent5,5887358:doMessage,[(255,244)(255,678)])
}
Add(DropFile,7368331,161,210)
{
link(onDropFile,7672151:doEvent1,[])
}
Add(Message,5707167,644,518)
{
Message="Замена произведена"
Caption="ОК"
}
Add(Convertor,7177771,490,406)
{
Mode=6
Digits=8
link(onResult,7695569:doCompare,[])
}
Add(DataToFileEx,15470337,441,406)
{
DataSize=4
BigEndian=0
link(onGet,7177771:doConvert,[])
link(Stream,3591058:Stream,[(447,310)(349,310)])
}
Add(If_else,7695569,539,406)
{
Op2=String(003D0BF6)
link(onTrue,7104584:doEvent1,[])
link(onFalse,13499098:doOperation,[(590,419)(590,615)])
AddHint(-32,41,76,13,Op2)
}
Add(Math,6335570,644,406)
{
OpType=1
Op2=4
ResultType=0
link(onResult,15485465:In,[])
link(Op1,13430363:Var,[])
}
Add(GetDataEx,9490686,357,252)
{
link(Data,3591058:Position,[])
}
Add(LineBreak,6470679,371,266)
{
Caption="pos"
Type=1
link(Data,14807262:Var2,[])
Primary=[13430363,273,112]
}
Add(LineBreak,7687455,294,224)
{
Caption="pos"
link(Out,1809828:doWork2,[])
Primary=[15485465,392,182]
}
Add(DoData,13926188,644,455)
{
Data=String(000D0AF6)
link(onEventData,12148725:doConvert,[])
AddHint(-48,37,76,13,Data)
}
Add(Hub,7104584,609,406)
{
OutCount=3
link(onEvent1,6335570:doOperation,[])
link(onEvent2,13926188:doData,[(633,419)(633,461)])
link(onEvent3,5707167:doMessage,[(633,426)(633,524)])
}
Add(Convertor,12148725,686,455)
{
Mode=5
Digits=8
link(onResult,12572938:In,[])
}
Add(LineBreak,2055529,399,413)
{
link(Out,15470337:doPut,[])
Primary=[12572938,329,42]
}
Add(Math,13499098,637,609)
{
OpType=1
Op2=3
ResultType=0
link(onResult,8372668:In,[])
link(Op1,287188:Var,[])
}
Add(GetDataEx,14807262,371,252)
{
Angle=3
link(Data,9490686:Var3,[])
}
Add(LineBreak,8869142,385,266)
{
Caption="pos"
Type=1
link(Data,10305145:Var2,[])
Primary=[287188,252,315]
}
Add(HubEx,1809828,329,224)
{
link(onEvent,3591058:doPosition,[])
}
Add(LineBreak,1926363,294,231)
{
Caption="pos"
link(Out,1809828:doWork3,[(333,237)])
Primary=[8372668,385,378]
}
Add(Hub,15386543,336,406)
{
InCount=2
OutCount=3
link(onEvent1,15470337:doGet,[])
link(onEvent2,12255921:doWork2,[(392,419)(392,503)])
link(onEvent3,6264518:doProcessMessages,[(371,426)(371,552)])
}
Add(LineBreak,2242394,399,266)
{
Caption="pos"
Type=1
link(Data,14392477:Var2,[])
Primary=[2446484,56,-7]
}
Add(GetDataEx,10305145,385,252)
{
Angle=3
link(Data,14807262:Var3,[])
}
Add(Application,6264518,392,546)
{
Wait=1
}
Add(GetDataEx,14392477,399,252)
{
Angle=3
link(Data,10305145:Var3,[])
}
Add(GetDataEx,5130241,350,280)
{
link(Data,3591058:Size,[])
}
Add(For,7228710,287,406)
{
IncludeEnd=1
link(onEvent,15386543:doEvent1,[])
link(End,1149433:Var,[])
}
Add(Message,5887358,280,672)
{
Message="Всё!"
link(onMessage,5773352:doData,[])
}
Add(ProgressBar,10016673,497,490)
{
Left=5
Top=35
Width=380
Smooth=1
Point(doMax)
}
Add(MultiElementEx,10431564,448,490)
{
link(cnt,13369395:Var,[])
link(onEventData,10016673:doPosition,[])
link(cnt1,10016673:doMax,[])
}
BEGIN_SDK
Add(EditMultiEx,5196661,21,21)
{
WorkCount=#6:doData|7:doValue|
EventCount=#11:onEventData|4:cnt1|
DataCount=#3:cnt|3:Op1|
HOffset=70
link(doData,14513411:doData,[(45,27)(45,90)])
link(doValue,8562347:doValue,[(42,34)(42,153)])
}
Add(DoData,14513411,70,84)
{
link(onEventData,5196661:cnt1,[(212,90)(212,34)])
link(Data,5196661:cnt,[(76,52)(97,52)])
}
Add(Memory,8562347,63,147)
{
link(onData,1263160:doOperation,[])
}
Add(Math,1263160,112,147)
{
OpType=8
Op2=1000
ResultType=0
link(onResult,10096636:doCase,[])
}
Add(Case,10096636,161,147)
{
link(onTrue,9465062:doData,[])
}
Add(DoData,9465062,210,154)
{
link(onEventData,5196661:onEventData,[(282,160)(282,27)])
link(Data,8562347:Value,[(216,142)(142,142)(142,191)(69,191)])
}
END_SDK
Add(LineBreak,4068050,399,490)
{
link(Out,10431564:doData,[])
Primary=[7563050,-154,-273]
}
Add(LineBreak,979311,350,294)
{
Caption="cnt"
Type=1
link(Data,5130241:Var2,[])
Primary=[13369395,98,168]
}
Add(LineBreak,13559468,364,294)
{
Caption="cnt"
Type=1
link(Data,5130241:Var3,[(370,285)])
Primary=[1149433,-70,84]
}
Add(DoData,5773352,322,672)
{
Data=Integer(0)
link(onEventData,2586497:In,[])
}
Add(HubEx,12255921,434,497)
{
link(onEvent,10431564:doValue,[])
}
Add(LineBreak,7188552,399,511)
{
link(Out,12255921:doWork3,[(438,517)])
Primary=[2586497,-35,161]
}
Просто киньте нужный файл на форму, кнопку даже трогать не надо. Он ищет непосредственно в файловых данных, считывая за раз по 4 байта и проверяя их на совпадение.
Проверьте, работает ли. Вроде должно.
карма: 10
0
Редактировалось 1 раз(а), последний 2020-01-03 23:40:44