上一页 1 ··· 7 8 9 10 11 12 13 下一页
摘要: 将控件 StyledSettings 的勾取消(如此才能自定样式及字型,如果勾选则依 Style 而定)。设定 TextSettings 里的 Font 属性。使用代码寫法:CheckBox1.StyledSettings := [];CheckBox1.Font.Style := [TFontSt... 阅读全文
posted @ 2014-12-11 09:57 龟山Aone 阅读(1620) 评论(0) 推荐(0) 编辑
摘要: ListView 使用LiveBindings 预设加载 200 条记录,这也许是速度的考量,但当需要全部加载的的情况时,该如何做呢?只需加入下面二行代码即可:FDQuery1.OptionsIntf.FetchOptions.RecsMax := -1;FDQuery1.OptionsIntf.F... 阅读全文
posted @ 2014-12-09 08:54 龟山Aone 阅读(1403) 评论(1) 推荐(2) 编辑
摘要: 适用:XE6 或更高版本说明:ListView 在基本的项目里提供了 Accessory(项目右方「>」符号),但要如何分辨是否按下>或者项目本身呢?在 XE6 提供了OnItemClickEx 事件可以辨识,如下例:procedure TForm1.ListView1ItemClickEx(con... 阅读全文
posted @ 2014-11-24 09:11 龟山Aone 阅读(1937) 评论(2) 推荐(1) 编辑
摘要: 测试实机:iPhone 3GS(v6.1.2)其它机种也可以正常发布,方法以此类推开发环境:Delphi XE7 Update 1(选择 iOS 8.1 SDK)发布时需要到 Project > Option > Delphi Compiler > Linking > Minimum iOS ver... 阅读全文
posted @ 2014-11-21 12:43 龟山Aone 阅读(847) 评论(0) 推荐(0) 编辑
摘要: VCL 和 Firemonkey 的 Bitmap 处理像素的方式不相同,下例为将图片内不是「白色」的像素全部改成「黑色」:procedure TForm1.Button1Click(Sender: TObject);var x, y: Integer; vBitMapData: TBitma... 阅读全文
posted @ 2014-11-03 13:34 龟山Aone 阅读(1414) 评论(0) 推荐(0) 编辑
摘要: procedure TForm1.Button1Click(Sender: TObject); begin Form2 := TForm2.Create(Self); Form2.ShowModal(procedure(ModalResult : TModalResult) begin ... 阅读全文
posted @ 2014-09-24 12:09 龟山Aone 阅读(2127) 评论(0) 推荐(1) 编辑
摘要: XE7 提交 App 后,在「Prerelease」里被提示了:Build 1.0.0 does not contain the correct beta entitlement. For more information, see the iTunes Connect Developer Guid... 阅读全文
posted @ 2014-09-16 10:56 龟山Aone 阅读(1185) 评论(0) 推荐(0) 编辑
摘要: 更新: 下面代码 Android 实机没问题,但在 iOS 实机没有动作。 阅读全文
posted @ 2014-09-05 11:47 龟山Aone 阅读(3969) 评论(5) 推荐(1) 编辑
摘要: 如果想要修改 Android Style 可以将它导出成 *.style 后再加入 TStyleBook 内来修改(iOS 的方法亦同): 阅读全文
posted @ 2014-08-25 09:38 龟山Aone 阅读(831) 评论(0) 推荐(0) 编辑
摘要: 问题:当 Memo設定為 ReadOnly = True 後, 选取一段文字后,無法有複製的功能。适用:XE6 Android 系统(目前 iOS 还找不到方法)修正方法:请将源码 FMX.Platform.Android.pas复制到自己的工程目录里,再进行修改。找到TWindowManager.... 阅读全文
posted @ 2014-06-19 11:50 龟山Aone 阅读(816) 评论(0) 推荐(0) 编辑
上一页 1 ··· 7 8 9 10 11 12 13 下一页