2020年7月13日星期一

任务队列 - delphi中间件

任务队列 /// <author>cxg 2020-7-13</author> /// 任务队列(线程安全) unit tasks; interface uses System.SyncObjs, System.SysUtils, System.Generics.Collections, MsgPa

异步任务调度 - delphi中间件

delphi中间件| 博客园_咏南中间件和开发框架 |18:25:00

异步任务调度适用于DELPHI2009及以上版本，支持跨操作系统。 /// <author>cxg 2020-7-13</author> /// 异步任务调度 {使用: procedure TForm1.Button1Click(Sender: TObject); begin var task: T

2020年7月10日星期五

Not a hex value - 红鱼儿

红鱼儿| 博客园_红鱼儿 |11:03:00

Not a hex value

2020年7月8日星期三

图文解说 ChinaCock CCX5WebView - 红鱼儿

红鱼儿| 博客园_红鱼儿 |10:55:00

在fmx中，显示一个url，利用CCX5WebView是更好的方案，为什么呢？官方自带的WebBrowser有兼容性的问题，换成CCX5WebView就能解决，同时，由于封装的腾讯的WebView，功能更强大。现在看一下如何集成： 1.修改AndroidManifest.template.xml

Delphi用WebBrowser显示网页遇到的问题及用CCX5WebView解决 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |09:10:00

建立一个fmx项目，然后放一个WebBrowser，加一个按钮并调用下面的代码显示网页： procedure TForm2.Button1Click(Sender: TObject); begin WebBrowser1.URL:=＇https://m.xmsjcj.gongegong.com＇;

缓存字典 - delphi中间件

delphi中间件| 博客园_咏南中间件和开发框架 |08:20:00

缓存字典 bufs: TDictionary<ICrossConnection, TMemoryStream>; //缓存字典，每个连接都有自己的缓存 bufs := TDictionary<ICrossConnection, TMemoryStream>.Create; const bufsize

TBytes缓存多包数据 - delphi中间件

delphi中间件| 博客园_咏南中间件和开发框架 |08:15:00

TBytes缓存多包数据收到一个包，就追加进TBytes缓存，直到全部收完，再处理。 procedure bytesAppendBuf(var bytes: TBytes; const buf: Pointer; count: Integer); var newSize, pos: integer

通用压缩单元 - delphi中间件

delphi中间件| 博客园_咏南中间件和开发框架 |08:05:00

通用压缩单元 /// <author>cxg 2020-7-7</author> /// 支持跨os，支持d7及以上版本 unit zip; interface {$if CompilerVersion>= 21} //d2010 {$define NEWZLib} {$IFEND} uses Cl

2020年7月7日星期二

对webview和升级注意事项的全面解释 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |16:03:00

Android Webview是一项由Chrome提供支持的系统组件，使Android应用能够显示网页内容。该组件已经预装在您的设备上，您需要及时更新该组件，以确保系统拥有最新的安全更新，并修正其他错误。这是你当前浏览器内核版本检测查看： https://www.coolapp.wang/webk

2020年7月6日星期一

基于jwt制作Token - 红鱼儿

红鱼儿| 博客园_红鱼儿 |18:13:00

function TfrmSimple.BuildTokenFR(path, key: string; validtime:Int64): string; var LToken: TJWT; begin LToken := TJWT.Create; try LToken.Claims.Subject