让 ListView 在 Android 可回弹

说明:让 ListView 在 Android 可回弹。

适用:Delphi XE5

修改:找出 FMX.Platform.Android.pas 档案,并复制到自己的 Project 路径里,找到 GetScrollingBehaviour 函数,修改成如下:

unit FMX.Platform.Android;

function TPlatformAndroid.GetScrollingBehaviour: TScrollingBehaviours;
begin
  Result := [TScrollingBehaviour.sbBoundsAnimation{可回弹}, TScrollingBehaviour.sbAnimation, TScrollingBehaviour.sbAutoShowing, TScrollingBehaviour.sbTouchTracking];
end;

 

posted @ 2014-03-27 10:48 龟山Aone 阅读(...) 评论(...) 编辑 收藏