foksov писал(а):
"костыли" для ввода только цифр в EditЧто-то мне подсказывает, что он у тебя получился сложнее моего, не такой гибкий и кода жрет больше
------------ Дoбавленo в 16.01:
Если нужны только цифры, то мою схему можно еще упростить
Add(MainForm,5803505,217,210)
{
}
Add(Edit,15149547,287,210)
{
Left=30
Top=15
Width=130
Cursor=1
Text=""
link(onChange,8504364:doCopy,[])
}
Add(Copy,8504364,336,210)
{
Position=1
Count=1
Direction=1
link(onCopy,526770:doCompare,[])
}
Add(Delete,3326534,448,210)
{
Count=1
Direction=1
link(onDelete,15149547:doText2,[(493,216)(493,181)(273,181)(273,223)])
link(Str,15149547:Text,[(454,198)(374,198)(374,254)(293,254)])
}
Add(StrMask,526770,392,210)
{
Mask="#"
link(onFalse,3326534:doDelete,[])
}