摘要: 最近91eHR项目需要用到JSon数据打包,根据很多人推荐,下了LkJSON,编写了个Demo后发现LKJSON对Unicode即中文支持很糟糕,修改其代码让它支持中文,工作量还是不小,找了资料,发现SuperObject第三方控件包,试用了下并编写了个DEMO,发现还是蛮强大。废话少说,看看下面的... 阅读全文
posted @ 2015-09-07 10:42 皮皮鲁PPL 阅读(1742) 评论(0) 推荐(0) 编辑
摘要: 闲话:正在用 WebBroker 写一个小网站,感受颇多:1、如果是写一个小东西,应该先考虑下 WebBroker,因为它是分分钟即可上手的。2、如果要写一个大东西,或许也应该考虑下 WebBroker,因为相比其他它有着最高的灵活度(但这只是相像,因为我只是写了一个小东西)。3、Delphi 3 ... 阅读全文
posted @ 2015-09-07 09:25 皮皮鲁PPL 阅读(327) 评论(0) 推荐(0) 编辑
摘要: macrolen 给了这样一些数据, 说是用淘宝的 API 获取的 JSON 数据, 让我帮助解析:{"items_search_response":{"item_search":{"item_categories":{"item_category":[{"category_id":150708,"... 阅读全文
posted @ 2015-09-07 09:24 皮皮鲁PPL 阅读(298) 评论(0) 推荐(0) 编辑
摘要: 调用 Google 翻译的地址格式:http://ajax.googleapis.com/ajax/services/language/translate?v=1.0&q=" + 原始文本 + "&langpair=" + 原语言 + "%7C" + 目标语言返回的数据格式如下, 可以用 respo... 阅读全文
posted @ 2015-09-07 09:21 皮皮鲁PPL 阅读(221) 评论(0) 推荐(0) 编辑
摘要: 同上例类似, 通过 'http://clients1.google.cn/complete/search?&q=' + "关键字" 可以获取 Google 的关键字搜索排名.我用 Delphi 为关键字得到的结果是:window.google.ac.h( ["Delphi",[ ["de... 阅读全文
posted @ 2015-09-07 09:20 皮皮鲁PPL 阅读(176) 评论(0) 推荐(0) 编辑
摘要: 本例测试效果图:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class... 阅读全文
posted @ 2015-09-07 09:18 皮皮鲁PPL 阅读(317) 评论(0) 推荐(0) 编辑
摘要: SuperObject 文件包中还有一个 SuperXmlParser 单元, 可以从 XML 中解析出 ISuperObject.SuperXmlParser 只有三个函数: XMLParseString、XMLParseStream、XMLParseFile, 分别从字符串、流、文件中解析.遗憾... 阅读全文
posted @ 2015-09-07 09:13 皮皮鲁PPL 阅读(262) 评论(0) 推荐(0) 编辑
摘要: 通过 SuperObject 的公用函数 SO 实现一个 ISuperObject 接口非常方便;前面都是给它一个字符串参数, 它的参数可以是任一类型甚至是常数数组.SA 和 SO 都是返回一 ISuperObject;SO 可以产生一个 stArray 类型的 ISuperObject, 但 SA... 阅读全文
posted @ 2015-09-07 09:12 皮皮鲁PPL 阅读(465) 评论(0) 推荐(0) 编辑
摘要: 通过 ISuperObject.GetEnumerator 可获取一个 TSuperEnumerator 对象.TSuperEnumerator 主要有: MoveNext 方法、Current 属性; 使用举例:var jo: ISuperObject; e: TSuperEnumerator;b... 阅读全文
posted @ 2015-09-07 09:10 皮皮鲁PPL 阅读(314) 评论(0) 推荐(0) 编辑
摘要: 通过 ISuperObject.AsObject 可获取一个 TSuperTableString 对象.TSuperTableString 的常用属性: count、GetNames、GetValuesvar jo: ISuperObject; jts: TSuperTableString;begi... 阅读全文
posted @ 2015-09-07 09:09 皮皮鲁PPL 阅读(256) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butt... 阅读全文
posted @ 2015-09-07 09:08 皮皮鲁PPL 阅读(356) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butt... 阅读全文
posted @ 2015-09-07 09:06 皮皮鲁PPL 阅读(287) 评论(0) 推荐(0) 编辑
摘要: 这几天学习 JSON - SuperObject, 非常幸运地得到了其作者Henri Gourvest大师的同步指点! (Henri 大师也是 DSPack 和 GDI+ 头文件的作者; 大师是法国人, 竟能用中文给我回复, 没想到!).学习中发现 SuperObject 有些地方对中文(或者说 U... 阅读全文
posted @ 2015-09-07 09:04 皮皮鲁PPL 阅读(360) 评论(0) 推荐(0) 编辑
摘要: SuperObject 的 JSON 对象中还可以包含 "方法", 这太有意思了; 其方法的格式是:procedure Method(const This, Params: ISuperObject; var Result: ISuperObject);//另外, 这是其数据类型的枚举:TSuper... 阅读全文
posted @ 2015-09-07 09:03 皮皮鲁PPL 阅读(213) 评论(0) 推荐(0) 编辑
摘要: 在 JSON 中, 字符串应该在双引号中; 从上个例子才发现: 原来这个双引号可以省略, 有空格都行当然只是在程序代码中可以省略, 对象会自动识别添加的.即如此, 下面写法都可以:uses SuperObject;procedure TForm1.Button1Click(Sender: TObje... 阅读全文
posted @ 2015-09-07 09:03 皮皮鲁PPL 阅读(371) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butt... 阅读全文
posted @ 2015-09-07 09:02 皮皮鲁PPL 阅读(205) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Butt... 阅读全文
posted @ 2015-09-07 09:02 皮皮鲁PPL 阅读(446) 评论(0) 推荐(0) 编辑
摘要: 测试数据提前加入 Memo1 中:代码文件:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm... 阅读全文
posted @ 2015-09-07 09:01 皮皮鲁PPL 阅读(211) 评论(0) 推荐(0) 编辑
摘要: SuperObject 构建一个 JSON 的常用方法: 从字符串、从文件、从流.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ... 阅读全文
posted @ 2015-09-07 09:00 皮皮鲁PPL 阅读(271) 评论(0) 推荐(0) 编辑
摘要: 一直盼着 Delphi 能够直接支持 "正则表达式" 与 "JSON";Delphi 2009 刚来的时候, 有了 JSON, 但不好, 那时尝试过一点.这是以前的链接: 什么是 JSON?Delphi 2010 带了两个相关单元: DBXJSON、DBXJSONReflect 貌似很强大, 但主要... 阅读全文
posted @ 2015-09-07 08:58 皮皮鲁PPL 阅读(308) 评论(0) 推荐(0) 编辑