Delphi XE5实现android 安卓 左侧或者右侧菜单功能


本文整理自网络,侵删。

 介绍

本文章介绍了Delphi XE5实现左侧或者右侧菜单功能,接下来就手把手教大家操作。

首先创建一个空的手机应用工程,在Form上面放一个ListBox控件,将Aligh设置为alClient
选择ListBox控件按右键进入 Item Editor,建立条目
放上一个Panel控件,一样把Aligh设定成alClient,然后在Panel上面放置ToolBar
在ToolBar控件上添加一个SpeedButton控件,设定StyleLookup为detailstoolbuttonbordered
选择Panel控件,设定Position的X ,下拉选择 Create New TFloatAnimation
接著在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;



 

相关阅读 >>

Delphi获取进程的命令行参数

Delphi与进程、窗口句柄、文件属性、程序运行状态

Delphi编写的一款锁屏小工具

Delphi 创建一个进程并读取其控制台输出内容

Delphi savetextfiledialog 用法

Delphi firemonkey中listboxaccessory图标切换

Delphi application.title在win7下失效了?

Delphi controls 属性与继承 tshape 类的小练习

Delphi 获取文件创建时间

Delphi简单的字符串加密解密函数

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...