Tad писал(а):
Мой пример почемуто загрузился не полностью, поэтому я его удалил.из за русских кракозябр в кнопке, если скопировать кнопку в хиасм, а потом сюда, у меня получаются краказябры
Add(BitBtn,5018303,120,224)
{
Left=10
Top=66
Width=105
Height=25
Font=[Arial,8,0,0,1]
TabOrder=5
FrameColor=-16777188
Caption="Жми!"
link(onClick,13089735:doEvent1,[])
}
Tad выкладывай свой пример
а я исправил свой
Add(ListBox,4313538,399,84)
{
Left=255
Top=62
Width=35
Height=100
FileName="pochta.txt"
Strings=#1:r|1:f|1:v|1:b|1:m|
}
Add(ArrayRW,863698,413,252)
{
link(onRead,4756942:doText,[])
link(Array,4313538:Array,[])
}
Add(BitBtn,13171637,147,252)
{
Left=10
Top=66
Width=105
Height=25
Font=[Arial,8,0,0,1]
TabOrder=5
FrameColor=-16777188
link(onClick,13089735:doEvent1,[])
}
Add(Hub,13089735,203,252)
{
OutCount=4
link(onEvent1,1052212:doNext,[])
link(onEvent2,2839218:doCompare,[(265,265)(265,310)(265,405)])
}
Add(Counter,1052212,336,252)
{
Min=-1
Default=-1
Point(Max)
Point(doMax)
link(onNext,7177718:doEvent,[])
link(Max,5889732:Var1,[(342,226)])
}
Add(If_else,2839218,336,399)
{
link(onTrue,1052212:doReset,[(380,405)(380,307)(324,307)(324,272)])
link(Op1,1052212:Count,[])
link(Op2,5889732:Var2,[])
}
Add(Edit,4756942,462,252)
{
Left=125
Top=65
Width=120
Height=25
}
Add(MainForm,13737221,91,154)
{
Width=395
Height=275
link(onCreate,16318049:doOperation,[])
}
Add(GetDataEx,5889732,336,217)
{
Angle=1
link(Data,16318049:Result,[(370,226)])
}
Add(Math,16318049,364,168)
{
OpType=1
Op2=1
ResultType=0
link(onResult,1052212:doMax,[(408,174)(408,226)(324,226)(324,279)])
link(Op1,4313538:Count,[(370,148)(412,148)])
}
Add(Debug,7177718,385,252)
{
link(onEvent,863698:doRead,[])
}