纯真IP数据库解析Delphi D10.1下正常使用

  直接一个单元,代码分享出来。

 

[FMX]开年第二弹:修改 FMX.Forms.pas 避免在控件中滑动被识别为点击

通过修改 FMX.Controls 单元,我们在编辑控制上滑动时,输入法自动弹出的问题算是比较完美的解决了(参考:[FMX]开年第一弹:修改 FMX.Controls 避免按住编辑框移动时弹出输入法的问题),但 FMX 依然存在着滑动时触发OnClick事件的问题。 现在我们要做的就是解决这一问题: 1、找到 FMX.

[FMX]开年第一弹:修改 FMX.Controls 避免按住编辑框移动时弹出输入法的问题

在 FMX 中,当用户在编辑框上按下时,许多场景下,是要拖动位置,但是,FMX.Controls 在 MouseDown 事件中,就调用了控件的 SetFocus ,结果就造成按下时,弹出输入法,影响拖动操作。我们可以将相应的代码那到 MouseUp 中来解决这一问题。同时,我们加一个判断,以避免将拖动识别为点击。 所

[FMX]画个圈圈好过年:在 FMX 中绘制环形

FMX 的 Shape 现在不是很全,至少我想找一个圆环时没找到,所以自己用代码实现了一个,供大家参考:

函数的参数说明: AData : 用来保存圆环路径信息 ACenter:中心点坐标 R1:内环半径 R2:外环半径 AStartAngle:环的起始

[QSocket]QSocket 总体设计框架说明

QSocket 是 QDAC 开源组件的一个重要的组成部分,终于要开始开工了,为了方便大家了解 QSocket,对 QSocket 的总体设计的一些想法,我在这里给大家简要的描述一下。 首先,QSocket 同 QDAC 的其它组成部分一样,是跨平台的,这意味着你可以在不同的操作系统中,体验 QSocket 为你带来的

[FMX]使用 FMX 那些缺失的动画效果

FMX 里的动画做起来简单So easy! TFloatAnimation 不能对一些整数类型的属性做动态效果。 实际上,我们并不需要太沮丧,毕竟天生我材必有用,今天吃饱了明天还饿,这只是因为官方忘了将TIntAnimation注册到面板上而已,我们只需要动态创建它并设置相关属性。 [crayon-5a365b8ec0

[教程]Delphi下的移动教程之二:使用第三方 SDK

【价格】 以人民币计价: 个人用户:50元 企业用户:300元   【视频长度】 预计 >45 分钟 【视频语言】 中文,普通话 【视频编码】 格式:H.264 MP4 分辨率:1920×1080 【教程源码】 有 【上架时间】 预计 2017 年 1 月底~2月初 【付款方式】 申请加入 QDAC 视

[教程]Delphi下的移动教程之一:移动开发环境设置

【价格】 以人民币计价: 个人用户:50元 企业用户:300元   【视频长度】 75 分钟 【视频语言】 中文,普通话 【视频编码】 格式:H.264 MP4 分辨率:1920×1080 【教程源码】 百度定位 Android 接口 【上架时间】 2017年5月14日 【付款方式】 申请加入 QDAC 视频

[教程]Delphi 下的移动编程之番外篇:移动支付(微信、支付宝)集成教程及实例

【价格】 以人民币计价: 个人用户:50元 企业用户:300元   【视频长度】 29 分钟 【视频语言】 中文,普通话 【视频编码】 格式:H.264 MP4 分辨率:1920×1080 【教程源码】 包含微信和支付宝支付的 Delphi 示例,以及移动支付集成向导工具源码 【上架时间】 2017 年 1 

[教程]如果在 Delphi 中将一个Java传回的父接口转换成支持的子接口类型

好吧,我原本以为可以直接 as 实现,但现实告诉我想多了,所以这块我们需要额外的处理,基本的逻辑步骤是: 引用 Androidapi.JNI.JavaTypes 单元,以便我们引用 TJLang_Class。 使用 TJlang_Class.JavaClass.forName  获取子类的 Java 原生类型信息。 使

[教程]如果在 Delphi 中重载父类重载的接口中的某个非虚函数

好吧,这个问题可能够无聊,反正父类已经实现了,为啥不用父类的一类的问题就不要问了,反正这个事也没啥可争论的,只是告诉大家一种关于接口的写法。 我们都知道 Delphi 中接口对象一般从 TInterfacedObject 继承,但 QueryInterface 函数却不是虚函数,所以想重载是无门的,为此 QPlugin

[教程]如何降低 Delphi 编码后的 Debug 版本的程序体积

又是一个悲伤的教坏孩子的故事:Debug  版本的体积太大,而 Release 版本有时候却有问题,上帝知道问题出在那儿了,反正 我是找不出来了,妈妈,快告诉我怎么办?:) 实际上,Debug 版本本身并不会比 Release 版本大多少,真正大的原因在于内嵌了大量的调试符号信息,这些信息用于告诉调试器,某个地址对应的

QXML转义问题

我一直都在寻找各种业务功能的最简单写法,用减法的模式来开发软件。如果有比我的写法更简单的方法,请留言告知。  

 

Qjson中把json字符串,当做子节点的方法

我一直都在寻找各种业务功能的最简单写法,用减法的模式来开发软件。如果有比我的写法更简单的方法,请留言告知。

 

[FMX]从摄像头获取照片并转换为特定的格式

首先,我们要使用 TTakePhotoFromCamera 这个 Action 来获取一幅照片,在其 OnDidFinishTaking 事件中,可以得到一个 TBitmap 的图片。这块我们跳过代码。 然后,我们要将这个位图保存为我们希望的格式,如JPEG。默认调用它的 SaveToStream 它会保存为 PNG

qjson中把记录或类型或泛型数组转换为json字符串

我一直都在寻找各种业务功能的最简单写法,用减法的模式来开发软件。如果有比我的写法更简单的方法,请留言告知。

 

新版 THttpClient组件同步下载文件方法。

我一直都在寻找各种业务功能的最简单写法,用减法的模式来开发软件。下面是我下载文件的写法,如果有更简单的方法,请留言告知。  

 

[iOS] 测试应用在 IPv6 环境下是否能够正常工作

在前面的文章中我们为服务器分配了一个 IPv6 的地址,但是仅仅有它还是不够的。就我的应用环境来说,为了通过苹果的 IPv6 Only 环境的兼容测试,我需要我的 Web 服务器能够在 IPv6 的地址上进行监听并进行响应。我的 Web 服务器使用的是 nginx,默认的编译方式下,并没有启用 IPv6,我们需要重新下