直接一个单元，代码分享出来。 unit Net.IPLocation; interface uses System.Classes, System.SysUtils, Winapi.WinSock, Vcl.Forms, System.Math, System.SyncObjs; type TIPLo
月度归档： 2017 年 2 月
[FMX] Delphi 中 TAnimation 设计的几点值得商榷的地方
在 FMX 中，动画是很好用的一个东西，但是 FMX 动画的基类 TAnimation 的设计，在我看来有一点值得商榷，我们来看 Start 函数的实现： procedure TAnimation.Start; var Control: IControl; SaveDuration: Single; begin if
学习中的一些牢骚。栈/堆地址标准写法。
我一直都在寻找各种业务功能的最简单写法，用减法的模式来开发软件。下面是我的写法，如果有更简单的方法，请留言告知。 本人再学习的过程中，遇到很多难题，delphi很多地方自身的设计就很乱。 比如对参数修饰符的理解，网上100篇文章 90篇都有问题 错误率非常高。delphi 的数据类型有很多 同一个参数修饰符 修饰 不同
Android 手机设备制造商 USB 驱动下载地址
原始设备制造商 驱动程序网址 Acer http://www.acer.com/worldwide/support/mobile.html alcatel one touch http://www.alcatelonetouch.com/global-en/support/ Asus http://support.as
[QSocket]单连接多请求和多连接合并处理协议及实现思路
一般的网络业务处理都是请求+应答式的，当然有时候可以不需要应答（我们可以称之为通知）。但是，请求发送过去后，这个连接在服务器端处理完成返回数据之前，是处于空置状态的，而且也不利于充分利用服务器的处理性能，所以在 QSocket 我将为大家提供一个单连接多请求处理协议（暂定名）实现，它的目的是将请求和返回的结果顺序异步化
[FMX]开年第二弹：修改 FMX.Forms.pas 避免在控件中滑动被识别为点击
通过修改 FMX.Controls 单元，我们在编辑控制上滑动时，输入法自动弹出的问题算是比较完美的解决了（参考：[FMX]开年第一弹：修改 FMX.Controls 避免按住编辑框移动时弹出输入法的问题），但 FMX 依然存在着滑动时触发OnClick事件的问题。 现在我们要做的就是解决这一问题： 1、找到 FMX.
[FMX]开年第一弹：修改 FMX.Controls 避免按住编辑框移动时弹出输入法的问题
在 FMX 中，当用户在编辑框上按下时，许多场景下，是要拖动位置，但是，FMX.Controls 在 MouseDown 事件中，就调用了控件的 SetFocus ，结果就造成按下时，弹出输入法，影响拖动操作。我们可以将相应的代码那到 MouseUp 中来解决这一问题。同时，我们加一个判断，以避免将拖动识别为点击。 所