4

Android、iOS、および Win32 で動作する必要がある Delphi FireMonkey アプリで TVertScrollBox を使用しています。私のアプリは Win32 で正常に動作します。つまり、ボックスが使用可能な領域よりも大きい場合、スクロール バーが表示され、スクロールできます。

ただし、Android では、ボックスはできるだけ多くのアイテムを表示するだけで、スクロールを拒否します。予想される動作は、ボックス内のポイントをドラッグしてボックスをスクロールできることです。

関連するコードは次のとおりです。

with TVertScrollBox.Create( Self ) do
begin
  Parent := Self;
  Align := TAlignLayout.alClient;

  // AddObject several times here...      

  UpdateStyle();

  Visible := True;
end;
4

1 に答える 1