Движущееся изображение

[Александр Ст 0]

Добрый день!

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

Подскажите пожалуйста, как правильно реализовать это?

[krapotkin 934]

onPaint вызывается не когда вы хотите, а когда система считает нужным 

а чтоб она посчитала нужным, вызывайте Invalidate.