Пытаюсь нарисовать индикактор на TPanel в виде циферблата и стрелки. Стрелка поворачивается по кругу по событию TTrackbar1 onChange на угол, пропорционально значению value. Рисование и циферблата и стрелки поместил в событие TPanel.onPaint и вызываю это событие Panel1Paint(Sender, Canvas, Panel1.ClipRect) в событииTrackBar1Change. Первая прорисовка(при создании формы) осуществляется правильно на TPanel, а вот последующие(при изменении позиции) - уже на TForm.
Подскажите пожалуйста, как правильно реализовать это?
Добрый день!
Пытаюсь нарисовать индикактор на TPanel в виде циферблата и стрелки. Стрелка поворачивается по кругу по событию TTrackbar1 onChange на угол, пропорционально значению value. Рисование и циферблата и стрелки поместил в событие TPanel.onPaint и вызываю это событие Panel1Paint(Sender, Canvas, Panel1.ClipRect) в событииTrackBar1Change. Первая прорисовка(при создании формы) осуществляется правильно на TPanel, а вот последующие(при изменении позиции) - уже на TForm.
Подскажите пожалуйста, как правильно реализовать это?
Поделиться сообщением
Ссылка на сообщение