红鱼儿 - 博客园

[置顶] 重建 Delphi 多层开发交流

摘要：点击链接加入群聊【Delphi 多层开发交流】：https://jq.qq.com/?_wv=1027&k=ToHI4SR7 阅读全文

posted @ 2022-08-22 13:25 红鱼儿阅读(1325) 评论(0) 推荐(0) 编辑

[置顶] 图文解说ChinaCock高德地图组件CCuniGUIAMap (一)

摘要：对于Web应用来说，集成地图功能，是客户非常需要的，将数据地图化显示，对用户了解其业务意义重大。基于此，国内运营地图的公司，也都开放了其SDK，让开发者集成到自己的项目中，满足用户的需求。对于Delphi开发者来说，做Web应用最好的方案是使用uniGUI，但是uniGUI只增加了支持Google 阅读全文

posted @ 2022-05-09 11:00 红鱼儿阅读(1101) 评论(0) 推荐(0) 编辑

值得思考

摘要：阅读全文

posted @ 2023-12-04 17:15 红鱼儿阅读(47) 评论(0) 推荐(0) 编辑

GPT实现的企业信用代码校验函数

摘要： function ValidateEnterpriseCode(EnterpriseCode: string): Boolean; var i, sum, code, weight: Integer; begin Result := False; // 企业信用代码长度校验 if Length(En 阅读全文

posted @ 2023-11-24 11:17 红鱼儿阅读(98) 评论(0) 推荐(0) 编辑

GPT4生成的校验身份证函数

摘要： function ValidateIDCard(IDCard: string): Boolean; var i, sum, code: Integer; // 身份证号码前17位加权因子 const factor: array[1..17] of Integer = (7, 9, 10, 5, 8, 阅读全文

posted @ 2023-11-23 15:54 红鱼儿阅读(11) 评论(0) 推荐(0) 编辑

易博龙宣布推出RAD Studio 11.3 Alexandria(含KeyPatch/ lsuper版下载)

摘要：这是我看到过的最详细的介绍了。原文在这里！ https://zelig.cn/delphi/202302/110.html 阅读全文

posted @ 2023-10-26 15:57 红鱼儿阅读(458) 评论(0) 推荐(0) 编辑

在Delphi中使用正则表达式校验中文姓名

摘要： uses system.RegularExpressions; function IsChineseName(const aName:string; const aMaxLength:Integer=10):Boolean;begin //只检查基本汉字： // var Pattern := '^[ 阅读全文

posted @ 2023-10-23 15:37 红鱼儿阅读(224) 评论(0) 推荐(0) 编辑

uniGUI使用WebSocket进行客户端之间的实时消息处理

摘要： Unigui可以使用WebSocket进行客户端之间的实时互相发消息。WebSocket是一种支持双向通信的网络协议，可以使客户端和服务器之间实时地进行数据交换。现在的uniGUI最新版本，经过几个版本的迭代，已经完美支持WebSocket。用起来，也非常简单，默认情况下，已经打开WebSocke 阅读全文

posted @ 2023-10-16 11:24 红鱼儿阅读(488) 评论(2) 推荐(1) 编辑

一步一步实现kbmmw的httpsys使用https功能

摘要：感谢xalion，为我们详细写的文档《一步一步实现kbmmw的httpsys使用https功能》，以下为原文： kbmmw的httpsys的功能已经实现了好长时间，但是现在各个平台都要求使用https来提供服务。今天一步一步来说一下如何使用kbmmw 的httpsys功能支持https.首先为了获得阅读全文

posted @ 2023-09-27 12:18 红鱼儿阅读(154) 评论(0) 推荐(0) 编辑

恢复Delphi工具栏

摘要：不知什么原因，Delphi ide的工具条显示错乱了，点打开单元的按钮也不好用，在界面上怎么设置也不好用，挺长时间了，今天看盒子里有人说通过操作注册表的方法，能解决，试了一下，果真好用。具体操作方法： 1.打开注册表，找到下面项计算机\HKEY_CURRENT_USER\SOFTWARE\Emba 阅读全文

posted @ 2023-09-26 08:47 红鱼儿阅读(320) 评论(0) 推荐(0) 编辑

在fmx下动态生成的TText为什么不能调整大小及字体样式

摘要： //为什么会这样呢？类似于下面这样的代码不能生效。 MyLbl := Ttext.Create(self); MyLbl.Parent := VscrbMenuBtn; // MyLbl.Font.Size := 20; MyLbl.TextSettings.Font.Size := 20; MyL 阅读全文

posted @ 2023-09-12 12:32 红鱼儿阅读(131) 评论(0) 推荐(0) 编辑

Android 实现开机自启APP

摘要：首先感谢作者stars-one分享，这是原文地址：https://www.cnblogs.com/stars-one/p/16329968.html 以下为原文内容：公司有个项目，需要实现自启动的功能，本来想着是设置桌面启动器的方式去实现，但是设备是华为平板（EMUI系统），不允许设置第三方桌面阅读全文

posted @ 2023-08-17 11:09 红鱼儿阅读(751) 评论(0) 推荐(0) 编辑

公告