Sniper36 писал(а):
Ravilr писал(а)
буквы одинаковый потому что.
И что?
все увидел...что не прав.
вот так теперь правильно
Add(MainForm,2953706,70,105)
{
Height=316
Position=1
link(onCreate,8628525:doFor,[])
}
Add(Convertor,16248595,273,119)
{
Mode=4
link(onResult,2518540:doEvent,[])
}
Add(StrCat,1134762,350,119)
{
Point(doClear)
link(onStrCat,6110794:doEvent,[])
link(Str1,9348212:Var1,[(356,107)(332,107)(332,163)])
}
Add(Counter,3745631,224,119)
{
Min=224
Max=255
Default=223
link(onNext,16248595:doConvert,[])
}
Add(For,8628525,133,119)
{
End=500
IncludeEnd=1
link(onEvent,3745631:doNext,[])
link(onStop,11520240:doLength,[(203,132)(203,209)])
}
Add(Memo,14752761,504,98)
{
Width=392
Height=289
Align=5
ScrollBars=2
}
Add(Length,11520240,343,203)
{
link(onLength,4121995:doLength,[])
link(Str,9348212:Var2,[])
}
Add(GetDataEx,9348212,336,154)
{
Angle=1
link(Data,1134762:Result,[(356,163)])
}
Add(Length,4121995,392,203)
{
link(onLength,1970321:doString,[])
link(Str,14752761:Text,[(398,173)(510,173)])
}
Add(FormatStr,1970321,448,203)
{
Mask="
-Отчет-
Сейчас в Мемо %2
Должно быть: %1"
link(onFString,14752761:doAdd,[(492,209)(492,104)])
link(Str1,11520240:Result,[(454,191)(407,191)(407,249)(349,249)])
}
Add(Debug,2518540,315,119)
{
link(onEvent,1134762:doStrCat,[])
}
Add(Debug,6110794,399,119)
{
link(onEvent,14752761:doText,[])
}
Ravilr писал(а):
Sniper36, не используй 0->charа прав, andrestudio.