Цитата:
|
Сообщение от NumLock
Код:
p1.ScrollBy(0, s1.Tag - s1.Position);
s1.Tag := s1.Position;
p1.Invalidate;
еще можно использовать TScrollBox вместо панели и скроллбара |
Я так понял, эффект такой же как и от p1.Refresh, т.е. каждый элемент надо отдельно перерисовывать. А насчёт скролбокса, можно как-то у панели на него сменить тип, чтобы не настраивать его заново?