摘要: 源码下载地址:https://download.csdn.net/download/redhat588/11798294 Delphi xe 10.3.2 for windows 7 环境编译通过! 测式需要先注册百度API账号,拿到API KEY 和Secret Key后才能获取Token值 第一 阅读全文
posted @ 2019-09-21 15:21 redhat588 阅读(1259) 评论(0) 推荐(1)
摘要: 主从表查询方案优点: FIREDAC 原生支持,性能最优 代码简洁,易于维护 自动关联,减少手动处理错误 内存效率高,只加载需要的数据JSON格式: { "data": [ { "company": "DEMO", "creator": "DS", "usr_group": "", "create_ 阅读全文
posted @ 2025-09-28 14:51 redhat588 阅读(7) 评论(0) 推荐(0)
摘要: procedure TDingtalkController.GetAttendanceRecords; var UserDataSet: TDataSet; UserIds: TList<string>; Cursor, PageSize, BatchIndex, UserIndex: Intege 阅读全文
posted @ 2025-07-24 16:22 redhat588 阅读(42) 评论(0) 推荐(0)
摘要: unit MiddleWare.DingTalk; interface uses MVCFramework.Logger, MVCFramework, MVCFramework.Commons; type TDingTalkFilterMiddleware = class(TInterfacedOb 阅读全文
posted @ 2025-06-23 21:29 redhat588 阅读(25) 评论(0) 推荐(0)
摘要: procedure TMainForm.btnDataPumpClick(Sender: TObject); begin // let's prepare connections giving them a name ActiveRecordConnectionsRegistry.AddConnec 阅读全文
posted @ 2025-06-04 14:19 redhat588 阅读(25) 评论(0) 推荐(0)
摘要: 近几年有不少关于个人数据泄露的新闻(个人数据通常包含如姓名、地址、身份证号码、财务信息等),给事发公司和被泄露人都带来了不小的影响。 许多国家和地区都出台了个人数据保护的法律法规,如欧盟的通用数据保护条例(GDPR)。不管是出于遵守法规、数据保护还是隐私保护等,对个人数据加密有助于公司遵守这些法规, 阅读全文
posted @ 2024-10-14 11:28 redhat588 阅读(435) 评论(0) 推荐(0)
摘要: 单表数据集序列化(自定义忽略字段和大小写) 1 procedure TDBDemoController.DataSetTOJsonDemo1; 2 var 3 MasterDBHelper: TDBHelper; 4 ADefIgnoredFields: TMVCIgnoredList; 5 beg 阅读全文
posted @ 2024-09-02 16:53 redhat588 阅读(57) 评论(0) 推荐(0)
摘要: lSer := TMVCJsonDataObjectsSerializer.Create; try lSer.DataSetToJsonArray(MasterDBHelper.Query, lJObj.a['m'], TMVCNameCase.ncLowerCase, [], procedure( 阅读全文
posted @ 2024-08-15 17:09 redhat588 阅读(138) 评论(0) 推荐(0)
摘要: 菜单:Project-->Options-->Search Path引入地址 如:E:\Software\DelphiLib\loggerpro_1_3_1 interface uses LoggerPro, Winapi.Windows, Winapi.Messages, System.SysUt 阅读全文
posted @ 2024-03-09 16:57 redhat588 阅读(273) 评论(0) 推荐(0)
摘要: windows 批处理 阅读全文
posted @ 2023-11-20 10:34 redhat588 阅读(719) 评论(0) 推荐(0)
摘要: USE K3DBConfiger20216155555176 select A.FNUMBER, B.FNAME,A.FDATABASENAME,A.FDATACENTERID FROM T_BAS_DATACENTER AS A LEFT JOIN T_BAS_DATACENTER_L AS B 阅读全文
posted @ 2023-10-06 15:21 redhat588 阅读(91) 评论(0) 推荐(0)