摘要： unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TButton; Button2: TButton; Button3: TButton... 阅读全文

摘要： 测试数据提前加入 Memo1 中:{ "name": "张三", /* 注释 */ "age": 33, "sex": true, "weight": 123.456, "tel": ["86-1111111", "86-2222222"], "addresses":{"address":"A省B市", "pc":"100001"}, "children": [ { "name": ... 阅读全文

摘要： SuperObject 构建一个 JSON 的常用方法: 从字符串、从文件、从流.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Button1: TB... 阅读全文

摘要： 一直盼着 Delphi 能够直接支持 "正则表达式" 与 "JSON";Delphi 2009 刚来的时候, 有了 JSON, 但不好, 那时尝试过一点. 这是以前的链接: 什么是 JSON?Delphi 2010 带了两个相关单元: DBXJSON、DBXJSONReflect 貌似很强大, 但主要是给 DataSnap 准备的; 尝试了半天, 也很失望: 可能给 DataSnap 网络数据传递... 阅读全文

摘要： 添加 TGestureManager 后, 双击其图标即可进入自定义手势编辑;编辑框中, Sensitivity 用来调整手势响应的敏感度; 取消 Unidirectional 的勾选后反向手势也可识别; 其他都一目了然.一个或一组手势设计可以保存为一个 dgf 文件.通过控件属性中的 Touch - Gestures 旁边的小按钮可查看、选择或再编辑手势.通过和 TGestureManager... 阅读全文

摘要： OnGesture 事件中的 const EventInfo: TGestureEventInfo; 参数主要用于识别手势信息; 前面用过 EventInfo.GestureID, 还有 EventInfo.Location 给出了手势动作的起点坐标, 测试代码:procedure TForm1.FormGesture(Sender: TObject; const EventInfo: TGes... 阅读全文

摘要： 除了通过 OnGesture 事件识别手势, 还可以直接个某个手势指定动作.这需要用到: TActionList 或 TActionManager; 本例用了 TActionList.操作步骤:1、给窗体添加并关联 TGestureManager, 还要添加 TActionList;2、给动作关联 Action:3、给 Action 写代码.代码文件:unit Unit1;interfaceuse... 阅读全文

摘要： 本例尝试在 OnGesture 事件中响应 sgLeft、sgRight 手势; 操作步骤:1、加 TGestureManager 控件如窗体: GestureManager1;2、设置窗体属性 Touch.GestureManager := GestureManager1; 3、添加窗体的 OnCreate 事件, 写: Touch.StandardGestures := [sgLeft, sg... 阅读全文

摘要： Delphi 2010 最抢眼的新功能可能就是支持"触摸屏"了, 它包括一个 可触控的软键盘 和识别不同的触屏手势.因为手势同时支持鼠标, 所以没有触摸屏的我也可以尝试一下其大多数的功能.首次尝试的步骤:1、加 TGestureManager 控件如窗体: GestureManager1;2、设置窗体属性 Touch.GestureManager := GestureManager1; {下面程序... 阅读全文

摘要： 虽然不用 TWICImage 也可以方便实现图像的修剪, 但这是 TWICImage 的方式.测试代码:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) ... 阅读全文