Я использую TVertScrollBox в приложении Delphi FireMonkey, которое должно работать на Android, iOS и Win32. Мое приложение отлично работает на Win32, то есть, когда ящик больше, чем доступная область, я получаю полосу прокрутки, и я могу ее прокрутить.
Тем не менее, на Android в коробке отображается только столько элементов, сколько возможно, но отказывается прокручивать. Ожидаемое поведение заключается в том, что я могу перетащить точку в поле и вызвать прокрутку окна.
Вот соответствующий код:
with TVertScrollBox.Create( Self ) do begin Parent := Self; Align := TAlignLayout.alClient; // AddObject several times here... UpdateStyle(); Visible := True; end; Вы должны убедиться, что компоненты / объекты, которые вы помещаете в свой VertScrollbox, являются Taller / Higher, которые VertScrollBox.
Если компонент внутри VertScrollBox меньше или короче, VertScrollBox не будет иметь никакого эффекта
С TVertScrollBox.Create (Self) do begin Parent: = Self; Выровнять: = TAlignLayout.alClient;
// AddObject несколько раз здесь …
// попробуйте установить yourobject.Height в TVertScrollBox.Height * 2 // выровняем yourobject в alTop
UpdateStyle ();
Видимый: = True; конец;