2021年3月13日 星期六

女辅警许艳敲诈案主角真实照片 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |08:36:00

法院认定，2014年3月至2015年1月，被告人许某与时任灌云县公安局南岗派出所所长孙某发生不正当两性关系，后许某谎称其母亲李某甲知道其怀孕欲找孙某讨要说法、怀孕补偿、分手补偿等为由，先后三次向孙某索要人民币100万元； 2014年5月至8月，被告人许某与时任灌云县?..

2021年3月8日 星期一

监控linux服务器 - delphi中间件

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

监控linux服务器 """ 内存监控 """ def memory_stat(): mem = {} f = open(＇/proc/meminfo＇, ＇r＇) lines = f.readlines() f.close() for line in lines: if len(line) < 2

unigui改服务标题 - delphi中间件

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

unigui改服务标题 uses windows, uniGUIConst, procedure ResStr(rs: PResStringRec; newStr: PChar); var oldprotect: DWORD; begin//修改资源词条，uses windows, VirtualP

Delayed Close Programmatically Dropped TComboBox (If Mouse NOT Over Combo and Combo’s List) Using Multi Threading

Žarko Gajić| Žarko Gajić-On Delphi Programming |10:48:24

The Combo Box Windows control (aka TComboBox in Delphi) is one of the most frequently used user interface elements along with buttons and edits in Windows applications. TComboBox control represents an edit box with a scrollable drop-down list atta...

Delphi 10.4.2试用报告 - 红鱼儿

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

用上10.4.2这个版本，已经快一个月了，这期间把项目从10.3.3升级到这个版本，总体感觉还是不错的。具体来说： 1.原来无法在debug下编译成android的项目，现在可以了，从而可以单步跟踪，这在开发中方便了不少。遗憾的是，在android 9上可以，在android10上不行出下面...

2021年3月7日 星期日

Delphi Event Bus入门 - 红鱼儿

红鱼儿| 博客园_红鱼儿 |17:43:00

什么是Event Bus，可以百度一下这个关键词，了解一下。具体来说，好处有两点： 1.广播通信，当对象状态发生改变时，会自动通知已经订阅过的对象2.发布者与订阅者耦合性降低，发布者只管发布一条消息出去，它不关心这条消息如何被订阅者使用 Delphi 现在有了开源项目?..

FireMonkey 10.4.2 Features Updated iOS 14， Android 11， And macOS 11 Support Plus Hundreds Of Fixes

Admin| FMX Express |14:31:49

The latest version for FireMonkey is available in Delphi 10.4.2 and C++Builder 10.4.2. There are a massive number of fixes included which touch all major supported operating systems including Android, IOS, MacOS, Windows, and Linux....The postFire...

2021年3月5日 星期五

获取CPU内存磁盘使用情况 - delphi中间件

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

获取CPU内存磁盘使用情况 program Project1; {$APPTYPE CONSOLE} {$R *.res} uses {$IFDEF mswindows} Winapi.Windows, Winapi.PsAPI, {$ENDIF} system.Classes, System.Ma

2021年3月4日 星期四

获取cpu使用率 - delphi中间件

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

获取cpu使用率 支持跨操作系统获取。 unit Unit1; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils,System.StrUtils, System.Variants, System.Classes, Vcl.

获取磁盘空间 - delphi中间件

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

获取磁盘空间 跨操作系统获取指定磁盘的使用情况。 uses?System.SysUtils; procedure TForm2.Button1Click(Sender: TObject); var FreeAvailable, TotalSpace: Int64; f, t: integer; be

微服务升级 - delphi中间件

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

微服务升级 微服务升级应该考虑下面几个问题： 如何确保整个升级过程中微服务可用，即服务不中断; 如何确保微服务的新版本可用; 如何实现升级出现问题时快速回滚; 滚动升级 滚动升级是在微服务不下线的前提下对微服务的版本进行升级，整个升级过程中微服务可用。滚动...

2021年3月3日 星期三

[教程]使用 TEdgeBrowser 组件

swish| QDAC官方网站 |15:02:38

仅供有兴趣的朋友们参考，步骤有点小复杂。 1、下载 nuget。 2、在命令行执行：nuget install Microsoft.Web.WebView2 3、从微软官方下载 Webview 2 运行时。 4、在 nuget 目录下，搜索对应架构的 webview2loader.dll 并复制到你程序目录下，然后运行

nginx+keepalived - delphi中间件

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

nginx+keepalived Keepalived 简要介绍 Keepalived软件起初是专为LVS负载均衡软件设计的，用来管理并监控LVS集群系统中各个服务节点的状态，后来又加入了可以实现高可用的VRRP功能。因此，Keepalived除了能够管理LVS软件外，还可以作为其他服务（例如：Ng

2021年3月2日 星期二

CnWizards_1.2.0.1023_Unstable.exe

Cnpack| Cnpack.org |10:00:00

* [代码高亮] 修正 10.4.2 下 Error Insight 为波浪线模式时的绘制偏差问题。_x000D_ * [编辑器浮动按钮] 浮动按钮菜单支持脚本，加入一默认脚本。

2021年3月1日 星期一

升级到10.4.2遇到一个怪问题 - 红鱼儿

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

有个OpenRecordItem方法，代码如下： procedure TCRecordInfo.OpenRecordItem; var sqlstr: string; begin sqlstr := ＇＇; sqlstr := sqlstr + ＇Select * from cr_recordite

« 上一页

下一页 »