• 0
ENERGY

При скроле прямоугольники в ScrollBox меняются местами

Вопросы

Видео и исходный код см. ниже в теме.

Странная проблема с VertScrollBox (и ScrollBox ).

Добавляю несколько TRectangle и указываю их стиль в ScrollBox. Проблема: При скролле вниз и обратно - прямоугольники меняются местами.

Видео

Детали: 

Добавляю в рантайм свой класс: TFormatBlock = class(TStyledControl)

В конструкторе этого класса указываю стиль StyleLookup := 'CascadeBlock'; и TAlignLayout.Top;

Сам стиль CascadeBlock состоит из TLayout > TRectangle > TLabel and TGlowEffect  (TLabel  добавляется в райнтайм позже)

Далее в цикле создаю этот класс,  применяю там же стили :

vBlock.NeedStyleLookup;
vBlock.ApplyStyleLookup;

Нахожу прямоугольник в стилях так:

vRect := (vBlock.FindStyleResource('rectangle') as TRectangle);

Создаю Label и добавляю его к vRect.AddObject(vLabel); (или можно через Parent )

 

Далее во время скрола вверх-вниз (даже не отпуская кнопку мыши), прямоульники меняются местами как на видео. 

В чем проблема никак не пойму. 

См. тестовый проект в аттаче.

testproject.zip

Изменено пользователем ENERGY

Поделиться сообщением


Ссылка на сообщение
Поделиться на другие сайты

0 ответов на этот вопрос

Ответы на этот вопрос пока отсутствуют

Для публикации сообщений создайте учётную запись или авторизуйтесь

Вы должны быть пользователем, чтобы оставить комментарий

Создать учетную запись

Зарегистрируйте новую учётную запись в нашем сообществе. Это очень просто!

Регистрация нового пользователя

Войти

Уже есть аккаунт? Войти в систему.

Войти

  • Последние посетители   0 пользователей онлайн

    Ни одного зарегистрированного пользователя не просматривает данную страницу