随笔分类 - Delphi
摘要：ListView 使用LiveBindings 预设加载 200 条记录，这也许是速度的考量，但当需要全部加载的的情况时，该如何做呢？只需加入下面二行代码即可：FDQuery1.OptionsIntf.FetchOptions.RecsMax := -1;FDQuery1.OptionsIntf.F...
阅读全文
摘要：适用：XE6 或更高版本说明：ListView 在基本的项目里提供了 Accessory（项目右方「＞」符号），但要如何分辨是否按下＞或者项目本身呢？在 XE6 提供了OnItemClickEx 事件可以辨识，如下例：procedure TForm1.ListView1ItemClickEx(con...
阅读全文
摘要：测试实机：iPhone 3GS（v6.1.2）其它机种也可以正常发布，方法以此类推开发环境：Delphi XE7 Update 1（选择 iOS 8.1 SDK）发布时需要到 Project > Option > Delphi Compiler > Linking > Minimum iOS ver...
阅读全文
摘要：VCL 和 Firemonkey 的 Bitmap 处理像素的方式不相同，下例为将图片内不是「白色」的像素全部改成「黑色」：procedure TForm1.Button1Click(Sender: TObject);var x, y: Integer; vBitMapData: TBitma...
阅读全文
摘要：procedure TForm1.Button1Click(Sender: TObject); begin Form2 := TForm2.Create(Self); Form2.ShowModal(procedure(ModalResult : TModalResult) begin ...
阅读全文
摘要：XE7 提交 App 后，在「Prerelease」里被提示了：Build 1.0.0 does not contain the correct beta entitlement. For more information, see the iTunes Connect Developer Guid...
阅读全文
摘要：更新： 下面代码 Android 实机没问题，但在 iOS 实机没有动作。
阅读全文
摘要：如果想要修改 Android Style 可以将它导出成 *.style 后再加入 TStyleBook 内来修改（iOS 的方法亦同）：
阅读全文
摘要：问题：当 Memo設定為 ReadOnly = True 後, 选取一段文字后，無法有複製的功能。适用：XE6 Android 系统（目前 iOS 还找不到方法）修正方法：请将源码 FMX.Platform.Android.pas复制到自己的工程目录里，再进行修改。找到TWindowManager....
阅读全文
摘要：注意：XE7 已修正这个问题。Delphi Firemonkey TListView 提供了搜寻的功能，但在 XE6 以前的版本，可以显示右边的清除按钮，在 XE6 确消失了，这里提供一个修正的方案，供大家参考。1、放一个 TListView 后，将 SearchVisible 设为 True ，就...
阅读全文
摘要：提示：Delphi 10 Seattle 透过 TImageList 来指定图标，就能显示原来图标的颜色。 下列方法只适用于 XE6 XE6 Firemonkey 里的 TabControl 可以将切页按钮设置一个图示，但显示的图示皆为灰色，如下图所示： 如果想要显示彩色的图示，则需要修改 Styl
阅读全文
摘要：说明：XE6 的 TSwitch 做了很多改进，包含多语显示处理，但 XE6 似乎只认定一种中文语系「zh」，它无法处理「zh_TW」、「zh_CN」、「zh_HK」、「zh_SG」等语系，不过可以透过修改 XE6 源码来修正此问题，如下：注意：请先将「FMX.Platform.Android.pa...
阅读全文
摘要：说明：展示使用程序码改变 Firemonkey TMemo 的背景颜色。 适用：XE6 源码下载：[原創]Memo改背景色_XE6.zip
阅读全文
摘要：说明：XE5 在 Android 平台上存在这一些键盘操作的问题，目前发现有下列几种：按键盘上的隐藏键后，无法按上一页（需要修改 XE5 源码「FMX.VirtualKeyboard.Android.pas」）。按键盘上的隐藏键后，无法触发 OnVirtualKeyboardHidden事件。关闭键...
阅读全文
摘要：日前整理仓库，翻出了一些 Delphi 产品，以前购买的 Delphi 都有实体产品，包含说明书、光碟片、还有一些广告文宣，而且相当厚实，版本的演进，从外包装也能感受到，到目前的 XE5 版，只剩一个序号：▼ Delphi 2 & 3▼Delphi 2 & 3 & 6 & 8 & 2006▼Delphi 7 & 8▼Delphi 8 & 2006▼Delphi XE3 & XE5▼Orpheus 2.1著名的 Orpheus控件，目前已经开源了http://sourceforge.net/projects/tporpheus/▼V
阅读全文
摘要：源码下载：[原创]展示Popup的使用方法.zip
阅读全文
摘要：注意：XE7 已提供下拉更的功能。说明：展示如何在 Android 平台下，使用 ListView 下拉更新。适用：Delphi XE5 , XE6修改：需要修改到 Delphi 源码FMX.Platform.Android.pas，请见：[原创] 让 ListView 在 Android 可回弹视...
阅读全文
摘要：XE7 源码下载：[原创]取得APP自己的版本号(狠跨4个平台)XE7.zipXE6 源码下载：[原创]取得APP自己的版本号(狠跨4个平台)XE6.zipXE5 源码下载：[原创]取得APP自己的版本号(狠跨4个平台).zip//----------------------------------...
阅读全文
摘要：问题：如果 SearchEdit 里已输入过搜寻字，再新建 ListView 项目后，会无法显示。适用：Delphi XE5源码下载：[原创]修正ListView搜寻问题.zipprocedure TForm1.Button1Click(Sender: TObject);var i: Integer...
阅读全文
摘要：在某一些 Android 的机子上，点入 Edit 显示会键盘，但关闭键盘再点一次 Edit 后，键盘并不会再次显示出来。实机测试： Sony Xperia ST17i：无法再次显示。 Nexus 7 II：可以正常显示。解决方案：在点入 Edit 事件，显示键盘。源码下载：[原创]示例Edit关闭键盘再显示.zipfunction ShowVirtualKeyboard(const AControl: TFmxObject): Boolean;var Service1: IFMXVirtualKeyboardService;begin if TPlatformServices.C...
阅读全文