Лидеры

procedure TForm1.ListView1ItemClickEx(const Sender: TObject; ItemIndex: integer; const [Ref] LocalClickPos: TPointF; const ItemObject: TListItemDrawable); begin if ItemObject is TListItemTextButton then begin //Bla Bla Bla вообщем сюда перенесите OnButtonClick . end; //Next Bla Bla Bla end;

1) Кастомный стиль в виде плитки * 2) ListView с горизонтальной прокруткой, профиксил баги, которые появились из-за этого * 3) Отступ сверху от первого Itema, задается вручную. (нужно было сделать, чтобы решить без многочисленных костылей одну ситуацию) 4) Кастомные цвета для отдельных Item'ов 5) разные хелперы и внутренние настройки * можно посмотреть тут скрин выполненной работы

TPresentedScrollBox умеет такое, правда размещением компонентов и пересчет позиции компонентов нужно предусмотреть самому. Могу завтра скинуть пример, недавно для себя делал

Спасибо за добрые слова, редко когда их можно услышать Если хотите что-нибудь новенького, то сформулируйте это для начала хотя бы на родном языке так, чтобы окружающие могли понять. После этого записываем предложение на языке Шекспира и Welcome to https://quality.embarcadero.com В данном случае это не отписка, а вполне реальное объяснение корпоративных правил. Для выполнения любых работ нужно формальное обоснование и одобрение насяльника. Пожелание, или отчет об ошибке от пользователя это довольно веская причина для того, чтобы работы были запланированы.

Нашел такой выход: точность немного страдает, но

WTF? Можно поподробнее?) но кажется вы форумом ошиблись

Так OnChange на то и OnChange ... может вас устроит OnClosePopup ?

The Berlin release contains the following new and improved features.

Пока не знаю. Недавно оптимизировал скорость отрисовки. Теперь у меня документ занимает в ~2 раз меньше узлов дерева, чем до оптимизации. Сейчас работаю над оптимизацией плавной прокрутки на мобильных платформах.