Вверх ↑
Ответов: 1536
Рейтинг: 176
#1: 2012-10-15 13:33:36 ЛС | профиль | цитата
tig-rrr, поставь между точками onMousMove (PaintBox) и docase (Case) вот это:
Add(Timer,16170449,819,406)
{
Interval=10
Enable=1
AutoStop=1
link(onTimer,987962:doData,[])
}
Add(Memory,6240362,777,406)
{
link(onData,16170449:doTimer,[])
}
Add(DoData,987962,861,406)
{
link(Data,6240362:Value,[(867,394)(825,394)(825,450)(783,450)])
}
Это разгрузит процесс.
карма: 1
Не так страшна ошибка, как опасность её не заметить.

1
Голосовали:tig-rrr