Лидеры

Давайте поразмыслим как такого эффекта можно добиться для ListBox. Первое что приходит в голову это: Добавляем Item в ListBox (обязательно первым) и выставляем его свойство Height = 0 В тексте Item'a введем что-то похожее на "Тяните для обновления..." Добавляем GestureManager и в жестах отмечаем Down Необходимо отловить тап по экрану и если движение идёт сверху-вниз соответственно увеличивать Height нашего первого Item'a Как только высота item'a достигла определенного значения, сменим текст на "Отпустите для обновления" и считаем что жест успешно выполнен, иначе перекрываем обработчик жестов По окончании жеста вызывается обработчик менеджера жестов и т.д.... Каким образом реализовать 4-й и 5-й пункт ?

Мне кажется, что через обычный MouseMove, MouseDown, MouseUp будет проще. Через них как раз можно определить высоту сдвига. В начале сдвига, на основании ScrollViewPos отображаем стрелку с надписью. В MouseMove следим за величиной сдвига При достижении требуемой величины сдвига, меняем надпись и направление стрелки. При отпускании скрываем надпись, стрелку и отображаем TAniIndicator.

Спасибо.

TJSONObject был перемещен в другое место из Data.DBXJSON в System.JSON. Подробнее тут: What's New in Delphi and C++Builder XE6 Работать так же, как и раньше. Просто изменить название подключаемого модуля на System.JSON.

Сами пишем - сами отвечаем Workaround Решение: On Android, Use TPopup Instead of ShowMessage Хотя в QC висит всё же как не решенное http://qc.embarcadero.com/wc/qcmain.aspx?d=119285 Благодарю за ответ(ы)