既然Delphi XE5可以开发Android、iOS的程式，那可不可以设计像Facebook一样的选单呢?答案是可以的！
接下来就手把手教大家操作。
1首先开一个空的Mobile Project，在上面放一个ListBox元件，将Aligh设定為alClient
2接下来回到ListBox元件按右键进入 Item Editor，建立选单
3.接下来再放上一个Panel，一样把Aligh设定成alClient，接著在上面放一个ToolBar
4.在ToolBar上放一个SpeedButton，设定StyleLookup為detailstoolbuttonbordered
5.回到Panel元件，设定Position的X ，下拉选择 Create New TFloatAnimation
6.接著在SpeedButton 的 forbidden事件
var FloatAnimationX: single;begin FloatAnimationX:=Self.ClientWidth - 60; if (panel1.Position.X=FloatAnimationX) then begin FloatAnimation1.StartValue:= FloatAnimationX; FloatAnimation1.StopValue:= 0; end else begin FloatAnimation1.StartValue:= 0; FloatAnimation1.StopValue:= FloatAnimationX; end; AnimateDrawer.Start;end;
如果你要在Panel加上阴影的話，只要在Panel加上ShadowEffect即可
关键字词:
