随笔分类 -  Delphi

摘要:Delphi 在面对跨平台开发,程序语言也改进不少,不过有些改进,让原本 Delphi 开发者有些不适应,最显注的就是字串处理函数了,原本 Pascal 语言字串起始由 1 开始,几乎是它的经典了,新版本字串由 0 开始,这个改变,让很多人不适应,也多有抱怨,虽然 Delphi 尽量保有相容性,... 阅读全文
posted @ 2015-06-05 17:15 龟山Aone 阅读(6898) 评论(2) 推荐(1) 编辑
摘要:自从 XE8 提供 ImageList 带来了很多便利,但 SpeedButton 的图标太小(不够大气),还好 FMX 提供了 Style 可供使用者自订图标大小及显示位置,请自行按图索骥,做一遍: 开一个新工程。 放一个 SpeedButton。 放一个 ImageList。 在 ImageLi 阅读全文
posted @ 2015-06-03 17:02 龟山Aone 阅读(3832) 评论(9) 推荐(1) 编辑
摘要:XE8实现iOS 状态栏的几种效果:一、状态栏底色:开一个新工程。设定Fill.Color 颜色属性。设定Fill.Kind = Solid。无需修改任何官方源码。二、隐藏状态栏(全屏):开一个新工程。设定BorderStyoe = None。无需修改任何官方源码。三、透明状态栏(能见底图):开一个... 阅读全文
posted @ 2015-05-22 22:44 龟山Aone 阅读(2550) 评论(1) 推荐(2) 编辑
摘要:说明:TGridLayout 提供计算容器内控件等分的功能:横式(Orientation=Horizontal)可将 ItemWidth = -1(小于0则自动等分)直式(Orientation=Vertical)可将 ItemHeight = -1(小于0则自动等分)问题:当 TGridLayou... 阅读全文
posted @ 2015-05-22 15:43 龟山Aone 阅读(1642) 评论(2) 推荐(1) 编辑
摘要:问题:XE8 for Android 方向传感器无法正常运作(在XE7是正常的)测试:官方示例Samples\ObjectPascal\MobileSnippets\OrientationSensor\适用:XE8 for Android修复方法:请将源码 System.Android.Sensor... 阅读全文
posted @ 2015-05-12 14:43 龟山Aone 阅读(1350) 评论(0) 推荐(0) 编辑
摘要:问题:打开 XE8 的 ShareSheet 示例,发布到 Android 实机,按 Share 选 Gmail 结果显示:没有权限添加附件。适用:XE8 for Android修复方法:请将源码 FMX.MediaLibrary.Android.pas复制到自己的工程目录里,再进行修改。找到下面代... 阅读全文
posted @ 2015-05-08 07:50 龟山Aone 阅读(721) 评论(0) 推荐(0) 编辑
摘要:说明:Firemonkey 可以换肤是一大亮点,但使用它必须要付出一点代价,就是需要一点载入的时间,下面以 *.fsf 二进制文件来做载入测试,有兴趣可以参考看看。 开发:XE8 for iOS 皮肤:Test.fsf (886,594 Bytes) 注:上表的重点不是在 App 启动的时间(因为需 阅读全文
posted @ 2015-04-30 16:10 龟山Aone 阅读(1304) 评论(3) 推荐(0) 编辑
摘要:说明:调整 Firemonkey Android 显示文字有「锯齿」效果适用:Firemonkey Android 平台修改方法:请将源码 FMX.FontGlyphs.Android.pas复制到自己的工程目录里,再进行修改。// 找到这行FPaint.setAntiAlias(True); //... 阅读全文
posted @ 2015-04-21 06:17 龟山Aone 阅读(1460) 评论(1) 推荐(0) 编辑
摘要:说明:ListView 调色盘,用来快速调整 ListView Style 的颜色,能导出 Style 本文,及另存 *.style 或 *.fsf 文件。 适用:Android, iOS, Windows, OSX(由主选单选取) 下载 (2016/05/25) :[原创]Delphi_Berli 阅读全文
posted @ 2015-04-20 16:16 龟山Aone 阅读(1841) 评论(3) 推荐(3) 编辑
摘要:需求:改变 ListView 颜色 适用:Firemonkey 任何平台 操作:Style 是改变控件外观最便捷的途径,ListView 也不例外,下面示范使用 StyleBook 来设定 ListView 的外观颜色,以 Android 平台为例: 如果有需要一个 App 里拥有多种 ListVi 阅读全文
posted @ 2015-04-18 17:10 龟山Aone 阅读(3166) 评论(1) 推荐(2) 编辑
摘要:作用:在 OSX 图标下方显示 App 中文繁体或简体的名称(系统自动选取) 适用:XE7, XE8 for OSX 操作: zh_CN.lproj InfoPlist.strings CFBundleName = "中文测试"; CFBundleDisplayName = "中文测试"; zh_T 阅读全文
posted @ 2015-04-16 12:53 龟山Aone 阅读(1538) 评论(0) 推荐(0) 编辑
摘要:问题:XE8 Firemonkey Windows 无法列印旋转文字(与显示在视窗里的代码相同时)适用:XE8 Windows 平台(其它平台测试没问题)修复前效果:修复后效果:修复方法:请将源码 FMX.Printer.Win.pas复制到自己的工程目录里,再进行修改。找到 TPrinterWin... 阅读全文
posted @ 2015-04-09 13:06 龟山Aone 阅读(772) 评论(0) 推荐(1) 编辑
摘要:问题:XE8 Firemonkey 在 Windows 平台 Memo 卷动时,在第 1 , 2 行会产生重叠现象。更新:XE8 update 1 已经修复这个问题,无需再使用下面方法。修改前:修改后:适用:XE8 for Windows 平台修复方法:请将源码FMX.Memo.Style.pas复... 阅读全文
posted @ 2015-04-08 05:24 龟山Aone 阅读(874) 评论(0) 推荐(0) 编辑
摘要:适用:XE8 Android 平台问题:安装 XE8 RTM 时,如果勾选了 Android SDK 5.0.1 (API 21) 及 Android NDK (android-ndk-r9c) ,安装后记得更新 Android SDK。▼步骤一:打开 Option 可看到许多对应不到的路径。▼步骤... 阅读全文
posted @ 2015-03-31 09:01 龟山Aone 阅读(1386) 评论(0) 推荐(0) 编辑
摘要:系统字型名称在每个平台的取得方式不尽相同,以下示范如何在 iOS 取得系统内所有字型的名称: 开一个新工程,放一个按钮 TButton 及 TMemo,在按钮事件内加入下面代码: 运行结果: 其它平台做法: 阅读全文
posted @ 2015-03-22 19:25 龟山Aone 阅读(688) 评论(1) 推荐(1) 编辑
摘要:问题:将 Frame 含 PopupMenu 放置 Form 后,在 Frame 里的 PopupMenu 失效,无法按快捷键。适用:(XE7 update 1 / XE8) for Windows 平台修正方法:请将源码 FMX.Forms.pas复制到自己的工程目录里,再进行修改。找到 TCom... 阅读全文
posted @ 2015-03-21 11:57 龟山Aone 阅读(970) 评论(0) 推荐(1) 编辑
摘要:说明:展示 ListView 视其每一行 Item 的 Detail 字串长度自动调整高度(可每行高度不同)。 适用:Delphi XE7 / XE8 源码下载:[原创]ListView_自动计算行高(by龟山阿卍).zip 补充:计算最后一项区域并卷到最后一项 阅读全文
posted @ 2015-03-20 14:27 龟山Aone 阅读(2550) 评论(0) 推荐(1) 编辑
摘要:1. 开启工程目录下面的Entitlement.TemplateiOS.xml 档案。2. 加入二行: application-identifier XXXXXXXXXXXXX3. 将XXXXXXXXXXXXX 改成 App ID(见上图)实机测试可以发布了,以上参考网址:https://www.d... 阅读全文
posted @ 2015-01-30 09:13 龟山Aone 阅读(904) 评论(1) 推荐(1) 编辑
摘要:用代码切换 Edit 不同的键盘样式:procedure TForm1.Button1Click(Sender: TObject);begin Edit1.KeyboardType := TVirtualkeyboardType.Default; Edit1.SetFocus;end... 阅读全文
posted @ 2015-01-07 10:04 龟山Aone 阅读(1266) 评论(0) 推荐(3) 编辑
摘要:将控件 StyledSettings 的勾取消(如此才能自定样式及字型,如果勾选则依 Style 而定)。设定 TextSettings 里的 Font 属性。使用代码寫法:CheckBox1.StyledSettings := [];CheckBox1.Font.Style := [TFontSt... 阅读全文
posted @ 2014-12-11 09:57 龟山Aone 阅读(1617) 评论(0) 推荐(0) 编辑