raph писал(а):
перевожу с укр.
code_19044.txt
raph, а в чем проблема то? показывает последнюю буковку!
------------ Дoбавленo в 19.10:
и посмотри как расположил твои элементы и предоставил альтернативу... не делай клубков схем... !
Add(MainForm,13233227,266,42)
{
}
Add(CharArray,7474764,329,98)
{
Point(Count)
link(onLoad,13572209:doOperation,[])
}
Add(ArrayRW,15873338,441,98)
{
link(onRead,16437025:doMessage,[])
link(Array,7474764:Array,[(447,86)(431,86)(431,152)(335,152)])
}
Add(Edit,14661461,266,91)
{
Left=115
Top=45
Width=145
Text=""
link(onEnter,7474764:doLoad,[])
}
Add(Message,16437025,497,98)
{
}
Add(Math,13572209,385,98)
{
OpType=1
Op2=1
link(onResult,15873338:doRead,[])
link(Op1,7474764:Count,[(391,87)(407,87)(407,141)(349,141)])
}
Add(Edit,3993543,266,161)
{
Left=115
Top=130
Width=145
Text=""
link(onEnter,11707128:doCopy,[])
}
Add(Copy,11707128,329,168)
{
Position=1
Count=1
Direction=1
link(onCopy,10050500:doMessage,[])
}
Add(Message,10050500,385,168)
{
}